From 81cc3c4a1272be989b53060b16bb1b1206e9a6d6 Mon Sep 17 00:00:00 2001
From: Karl-Michael Schindler <karl-michael.schindler@web.de>
Date: Wed, 11 Dec 2024 16:03:34 +0100
Subject: [PATCH] Fix module name
---
tests/seteps/setepsdriver-f90-new-1.f90 | 2 +-
tests/seteps/setepsdriver-f90-new-2.f90 | 4 ++--
2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/tests/seteps/setepsdriver-f90-new-1.f90 b/tests/seteps/setepsdriver-f90-new-1.f90
index 1cf80f4..915e825 100644
--- a/tests/seteps/setepsdriver-f90-new-1.f90
+++ b/tests/seteps/setepsdriver-f90-new-1.f90
@@ -1,7 +1,7 @@
program setepsdriver
use seteps_mod
- use oscillator_mod
+ use oscillatorType_mod
implicit none
diff --git a/tests/seteps/setepsdriver-f90-new-2.f90 b/tests/seteps/setepsdriver-f90-new-2.f90
index b228a92..ba002eb 100644
--- a/tests/seteps/setepsdriver-f90-new-2.f90
+++ b/tests/seteps/setepsdriver-f90-new-2.f90
@@ -1,7 +1,7 @@
program setepsdriver
use seteps_mod
- use oscillator_mod
+ use oscillatorType_mod
implicit none
@@ -84,7 +84,7 @@ program setepsdriver
write (12, '(30("(", g16.8, ",", g16.8, ") "))') (eps(j), j = 1, layers)
do j = 1, layers
if (abs((eps(j) - epsReference(j, i))/(eps(j) + epsReference(j, i))) > 1e-5) then
-! write (*,*) 'wn: ', wn, 'eps: ', eps(j), 'epsReference: ', epsReference(j, i)
+ write (*,*) 'wn: ', wn, 'eps: ', eps(j), 'epsReference: ', epsReference(j, i)
testresult = .false.
endif
enddo
--
GitLab