From 62ef5c57fa0b4280c20207ddf9ad9eb52de53d8f Mon Sep 17 00:00:00 2001
From: kousuke-nakano <37653569+kousuke-nakano@users.noreply.github.com>
Date: Wed, 13 Sep 2023 20:07:18 +0900
Subject: [PATCH] added yes_ontarget = .true. to the failed tests. i.e., there
 was an undefined variable in the test scripts.

---
 src/a_module_tests/test_upwinvp.f90         | 5 ++++-
 src/a_module_tests/test_upwinvp_complex.f90 | 5 ++++-
 2 files changed, 8 insertions(+), 2 deletions(-)

diff --git a/src/a_module_tests/test_upwinvp.f90 b/src/a_module_tests/test_upwinvp.f90
index 88c6b5b..e0cf617 100644
--- a/src/a_module_tests/test_upwinvp.f90
+++ b/src/a_module_tests/test_upwinvp.f90
@@ -14,12 +14,15 @@
 ! along with this program. If not, see <http://www.gnu.org/licenses/>.
 
 program test_upwinvp
+    use constants, only: yes_ontarget
     implicit none
     integer, parameter :: nel = 3, indt = 4
     real*8 :: psi(indt, nel, 2), ainv(nel), ainvn(nel), winv(nel, indt)
     integer :: i, j, k
     real*8, parameter :: eps = 1.0e-10  ! A small value for numerical comparison
-
+    
+    yes_ontarget = .true.
+    
     ! Initialize test data
     winv = 0.0
     do i = 1, indt
diff --git a/src/a_module_tests/test_upwinvp_complex.f90 b/src/a_module_tests/test_upwinvp_complex.f90
index c8b29b1..c91ac3c 100644
--- a/src/a_module_tests/test_upwinvp_complex.f90
+++ b/src/a_module_tests/test_upwinvp_complex.f90
@@ -14,12 +14,15 @@
 ! along with this program. If not, see <http://www.gnu.org/licenses/>.
 
 program test_upwinvp_complex
+    use constants, only: yes_ontarget
     implicit none
     integer, parameter :: nel = 3, indt = 4
     complex*16 :: psi(indt, nel, 2), ainv(nel), ainvn(nel), winv(nel, indt), expected(nel, indt)
     integer :: i, j, k
     real*8, parameter :: eps = 1.0e-10  ! A small value for numerical comparison
-
+    
+    yes_ontarget = .true.
+    
     ! Initialize test data
     winv = cmplx(0.0, 0.0)
     do i = 1, indt