From 68c03c65cfcfd66a3b7c324cfa8770133538f5b0 Mon Sep 17 00:00:00 2001
From: Alain Hebert <alainhebert@Alains-MacBook-Pro.local>
Date: Tue, 23 Sep 2025 11:38:23 -0400
Subject: #5: Corrections and improvements to the Baff-Refl reflector model in
 Donjon

---
 Donjon/data/Reflector_beavrs_DF-RT_Jeff3p1SHEM295_apx.x2m | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'Donjon/data/Reflector_beavrs_DF-RT_Jeff3p1SHEM295_apx.x2m')

diff --git a/Donjon/data/Reflector_beavrs_DF-RT_Jeff3p1SHEM295_apx.x2m b/Donjon/data/Reflector_beavrs_DF-RT_Jeff3p1SHEM295_apx.x2m
index 66e8aba..d738d64 100644
--- a/Donjon/data/Reflector_beavrs_DF-RT_Jeff3p1SHEM295_apx.x2m
+++ b/Donjon/data/Reflector_beavrs_DF-RT_Jeff3p1SHEM295_apx.x2m
@@ -47,9 +47,10 @@ UTL: FVol :: DUMP ;
 Param := UTL: ;
 
 INTEGER nlf := 1 ;
+EVALUATE nbZones := nbZones 1 - ; ! decreases nbZones by one
 ApxRefl := REFL_APX Geom FVol Param :: <<nameFeed>> <<nameRefl>> <<Palier>> <<htype>>
                             <<nlf>> <<LibType>> <<NuclData>> <<OptSph>> <<OptNoal>>
-                            <<OptSS>> ;
+                            <<OptSS>> <<nbZones>> ;
 
 ************************************************************************
 * MPO extrapolation of the reflector at 350 ppm Boron
-- 
cgit v1.2.3