Remove unused variables

Signed-off-by: Seyed Ali Ghasemi <info@gha3mi.com>
gha3mi · Apr 29, 2024 · dfaf7b2 · dfaf7b2
1 parent bf41335
commit dfaf7b2
Showing 1 changed file with 0 additions and 2 deletions.
diff --git a/example/shape_tetragon.f90 b/example/shape_tetragon.f90
@@ -5,8 +5,6 @@ program shape_tetragon
     implicit none
 
     type(nurbs_surface) :: shape                !! Declare a NURBS surface object
-    real(rk), allocatable :: Xc(:,:), Wc(:)     !! Arrays for control points and weights
-    real(rk), allocatable :: knot1(:), knot2(:) !! Arrays for knot vectors in both dimensions
 
     !-----------------------------------------------------------------------------
     ! Setting up the NURBS tetrangon