Skip to content

Commit

Permalink
Merge pull request #311 from njoy/fix/mt-typo
Browse files Browse the repository at this point in the history
Fix/mt typo
  • Loading branch information
whaeck authored Sep 27, 2023
2 parents c94170f + 3a469f9 commit 4d7357d
Show file tree
Hide file tree
Showing 2 changed files with 3 additions and 2 deletions.
1 change: 1 addition & 0 deletions ReleaseNotes.md
Original file line number Diff line number Diff line change
Expand Up @@ -7,6 +7,7 @@ This update fixes the following issues:
- Fixed issues in acer to properly print already existing dosimetry and photoatomic ace files when running a stand-alone acer iopt=7 job.
- The meaning of legord and ifissp in the ERRORR input file has been repurposed when mfcov=34. The values now represent the L,L1 values of the MF34 sub-subsection to be calculated (instead of the first one). By default, the L=1,L1=1 sub-subsection will be calculated which in almost all cases will correspond to the first sub-subsection in the MF34 data (as a result, the default behaviour of NJOY2016 will not change).
- Increased allocation of arrays to accommodate ENDF/B-VIII.1 evaluations.
- Fixed a typo in the name for MT195 in ACER.

## [NJOY2016.71](https://github.com/njoy/NJOY2016/pull/301)
This update adds the new MF7 MT451 (thermal scattering general information) ENDF format to MODER so that this module will be able to interpret the new MF7 section. No other capability in NJOY2016 currently uses the information in this section.
Expand Down
4 changes: 2 additions & 2 deletions src/acecm.f90
Original file line number Diff line number Diff line change
Expand Up @@ -67,7 +67,7 @@ subroutine mtname(mt,name,izai)
'(n,2nhe3) ','(n,3nhe3) ','(n,4nhe3) ','(n,3n2p) ','(n,3n2a) ',&
'(n,3npa) ','(n,dt) ','(n,npd) ','(n,npt) ','(n,ndt) ',&
'(n,nphe3) ','(n,ndhe3) ','(n,nthe3) ','(n,nta) ','(n,2n2p) ',&
'(n,phe3) ','(n,dhe3) ','(n,he3a) ','(n,4n2p) ','(n,2n2a) ',&
'(n,phe3) ','(n,dhe3) ','(n,he3a) ','(n,4n2p) ','(n,4n2a) ',&
'(n,4npa) ','(n,3p) ','(n,n3p) ','(n,3n2pa) ','(n,5n2p) ',& !200
'(n,p*0) ',&
'(n,p*1) ','(n,p*2) ','(n,p*3) ','(n,p*4) ','(n,p*5) ',&
Expand Down Expand Up @@ -148,7 +148,7 @@ subroutine mtname(mt,name,izai)

!-- default name value is blank unless reset below.
name=''

!--when iverf=-1 the endf version used to create this file is
! unknown. we assume it comes from version 6 but if the file
! originated from version 5 or earlier the name assigned here
Expand Down

0 comments on commit 4d7357d

Please sign in to comment.