Remove unused variables.

gha3mi · May 8, 2024 · 460a9b0 · 460a9b0
1 parent 8a7a766
commit 460a9b0
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/example/example_ppm1.f90 b/example/example_ppm1.f90
@@ -15,7 +15,7 @@ program example_ppm1
     type(colormap)           :: cmap
     integer(ik), allocatable :: px(:, :)
     real(rk), allocatable    :: Xg(:,:), z_values(:)
-    real(rk)                 :: z, center(3), inner_radius, outer_radius, aspect_ratio
+    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

diff --git a/example/example_ppm2.f90 b/example/example_ppm2.f90
@@ -15,7 +15,7 @@ program example_ppm2
     type(colormap)           :: cmap
     integer(ik), allocatable :: px(:, :)
     real(rk), allocatable    :: Xg(:,:), z_values(:)
-    real(rk)                 :: z, center(3), inner_radius, outer_radius, aspect_ratio
+    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