Merge pull request #224 from njoy/fix/tendl-d-pt184

Fix/tendl d+pt184

ReleaseNotes.md

@@ -1,6 +1,11 @@
 # Release Notes—NJOY2016
 Given here are some release notes for NJOY2016. Each release is made through a formal [Pull Request](https://github.com/njoy/NJOY2016/pulls) made on GitHub. There are links in this document that point to each of those Pull Requests, where you can see in great details the changes that were made. Often the Pull Requests are made in response to an [issue](https://github.com/njoy/NJOY2016/issues). In such cases, links to those issues are also given.
 
+## [NJOY2016.65](https://github.com/njoy/NJOY2016/pull/224)
+This release fixes a processing issue for the d+Pt184 from TENDL-2021 in ACER. Some logic issue lead to MT11 being ignored as a deuteron producing reaction and this lead to processing problems in ACER.
+
+This release addresses issue [\#184](https://github.com/njoy/NJOY2016/issues/184) and [\#223](https://github.com/njoy/NJOY2016/issues/223).
+
 ## [NJOY2016.64](https://github.com/njoy/NJOY2016/pull/202)
 This fixes a bug in ACER when producing photonuclear ACE files using some TENDL2019 evaluations. The use of LAW=4 in MF6 of these evaluations lead to corrupted ACE files related to incorrect logic in counting secondary particle producing reactions.
 

src/acefc.f90

@@ -5380,7 +5380,7 @@ subroutine acelod(nin,suff,matd,tempd,newfor,mcnpx,ismooth)
          if (mt.eq.5.and.mt5p.eq.0) iskip=0
       else if (izai.eq.1002) then
          iskip=1
-         if (mt.eq.2.or.mt.eq.32.or.mt.eq.35.or.&
+         if (mt.eq.2.or.mt.eq.11.or.mt.eq.32.or.mt.eq.35.or.&
            mt.eq.104.or.mt.eq.114.or.mt.eq.115.or.mt.eq.117.or.&
            mt.eq.157.or.mt.eq.158.or.mt.eq.169.or.&
            mt.eq.170.or.mt.eq.171.or.mt.eq.182.or.&

src/vers.f90

@@ -3,6 +3,6 @@ module version
    ! These values are updated during the NJOY revision-control process.
    implicit none
    private
-   character(8),public::vers='2016.64'
-   character(8),public::vday='24May21'
+   character(8),public::vers='2016.65'
+   character(8),public::vday='01Nov21'
 end module version

tests/71/CMakeLists.txt

@@ -0,0 +1,16 @@
+configure_file("${CMAKE_CURRENT_SOURCE_DIR}/input"
+               "${CMAKE_CURRENT_BINARY_DIR}/input" COPYONLY )
+
+configure_file("${CMAKE_CURRENT_SOURCE_DIR}/referenceTape33"
+               "${CMAKE_CURRENT_BINARY_DIR}/referenceTape33" COPYONLY )
+configure_file("${CMAKE_CURRENT_SOURCE_DIR}/referenceTape34"
+               "${CMAKE_CURRENT_BINARY_DIR}/referenceTape34" COPYONLY )
+configure_file("${CMAKE_CURRENT_SOURCE_DIR}/referenceTape35"
+               "${CMAKE_CURRENT_BINARY_DIR}/referenceTape35" COPYONLY )
+
+configure_file("${RESOURCES}/d-078_Pt_184-TENDL2021.endf"
+               "${CMAKE_CURRENT_BINARY_DIR}/tape20" COPYONLY )
+
+add_test( NAME "Test71"
+          COMMAND ${Python3_EXECUTABLE} "../execute.py"
+          WORKING_DIRECTORY "${CMAKE_CURRENT_BINARY_DIR}" )

tests/71/input

@@ -0,0 +1,19 @@
+-- MT11 produces deuterons
+moder
+ 20 -21
+moder
+ -21 -22
+acer
+ -21 -22 0 31 32
+ 1 1 1 .10 /
+ 'TENDL-2021 deuteron + Pt184' /
+ 7807 0.0 /
+ /
+ /
+acer
+ 0 31 33 34 35
+ 7 1 1 -1 /
+ 'TENDL-2021 deuteron + Pt184' /
+viewr
+ 33 43
+stop