From 7dfcc480ba1e19bd3232349fc733caef94034292 Mon Sep 17 00:00:00 2001
From: stainer_t <thomas.stainer@oecd-nea.org>
Date: Mon, 8 Sep 2025 13:48:49 +0200
Subject: Initial commit from Polytechnique Montreal

---
 PyGan/data/assertV.py | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)
 create mode 100755 PyGan/data/assertV.py

(limited to 'PyGan/data/assertV.py')

diff --git a/PyGan/data/assertV.py b/PyGan/data/assertV.py
new file mode 100755
index 0000000..84183fa
--- /dev/null
+++ b/PyGan/data/assertV.py
@@ -0,0 +1,17 @@
+#
+# Assert procedure for non-regression testing
+# Recover a value from a list of real arrays
+# Author: A. Hebert
+#
+def assertV(lcmobj,key,iset,ipos,refvalue):
+  lcmobj.lib()
+  val=lcmobj[key][iset-1][ipos-1]
+  delta=abs((val-refvalue)/refvalue)
+  if delta < 1.0e-4:
+    print("Test successful; delta=",delta)
+  else:
+    print("Reference=",refvalue,"Calculated=",val)
+    print("------------")
+    print("TEST FAILURE")
+    print("------------")
+    raise Exception("abort in assertV")
-- 
cgit v1.2.3