From 376c76d07e7aac5821a6f4cf6ef73aea43735239 Mon Sep 17 00:00:00 2001 From: Wim Haeck Date: Thu, 1 Aug 2024 11:07:55 -0600 Subject: [PATCH] Increasing array size --- ReleaseNotes.md | 1 + src/viewr.f90 | 3 +-- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/ReleaseNotes.md b/ReleaseNotes.md index f7b90156..48ac223a 100644 --- a/ReleaseNotes.md +++ b/ReleaseNotes.md @@ -4,6 +4,7 @@ Given here are some release notes for NJOY2016. Each release is made through a f ## [NJOY2016.77](https://github.com/njoy/NJOY2016/pull/xxx) This update fixes the following issues: - Background cross section values for reactions other than total, elastic, fission and capture were not handled properly in the unresolved resonance region. The background for total, elastic, fission and capture is integrated into the unresolved resonance cross section values in the genunr subroutine. In the emerge subroutine, the background in the unresolved resonance region was therefore zeroed out for any resonance reaction. This has never been an issue but now we have LRF=7 evaluations that can define reactions other than total, elastic, fission and capture. Test 82 was added to detect this issue in the future. + - Increased the size of internal arrays in VIEWR. ## [NJOY2016.76](https://github.com/njoy/NJOY2016/pull/340) This update fixes the following issues: diff --git a/src/viewr.f90 b/src/viewr.f90 index 19b948ee..ea1c9a5c 100644 --- a/src/viewr.f90 +++ b/src/viewr.f90 @@ -1272,7 +1272,7 @@ subroutine set3d(iplot,xyz,nxyz) integer::i,j,nn,k,ncurv,major,minor,itop,ibot,l,n real(kr)::wt,xlo,xhi,ylo,yhi,zlo,zhi,xn,yn,zn,yy real(kr)::top,bot,xop,yop,zop - integer::lll(400) + integer::lll(2000) real(kr)::x(2000),y(2000),z(2000) real(kr),parameter::big=1.e10_kr real(kr),parameter::d0=.001e0_kr @@ -1663,4 +1663,3 @@ subroutine ascalv(m,z1,z2,major,minor) end subroutine ascalv end module viewm -