From a8ad8a6fb0fdcf97101759264015be6db6b1b8f7 Mon Sep 17 00:00:00 2001
From: cflag <cedric.flageul@univ-poitiers.fr>
Date: Tue, 8 Nov 2022 08:34:41 +0100
Subject: [PATCH] Remove unused variables
---
src/BC-Cavity.f90 | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/BC-Cavity.f90 b/src/BC-Cavity.f90
index 93aa2663..9cf189fb 100644
--- a/src/BC-Cavity.f90
+++ b/src/BC-Cavity.f90
@@ -35,7 +35,7 @@ contains
real(mytype), dimension(xsize(1), xsize(2), xsize(3), numscalar) :: phi1
real(mytype) :: x
- integer :: k, j, i, is
+ integer :: i
! This does not apply in case of restart
if (irestart == 0) then
--
GitLab