From e2774801a5f509b30e539cb7f257d583aec1480b Mon Sep 17 00:00:00 2001 From: Zhuoran Han Date: Fri, 10 Aug 2018 09:22:08 -0500 Subject: [PATCH] Fixed the typo --- src/tallies/tally_filter_zernike.F90 | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/tallies/tally_filter_zernike.F90 b/src/tallies/tally_filter_zernike.F90 index b680fc06d0..73fda7fade 100644 --- a/src/tallies/tally_filter_zernike.F90 +++ b/src/tallies/tally_filter_zernike.F90 @@ -133,7 +133,7 @@ contains if (bin <= last) then first = last - n m = -n + (bin - first)*2 - label = "Zernike expansion, Z" // trim(to_str((n-1))) // "," & + label = "Zernike expansion, Z" // trim(to_str(n)) // "," & // trim(to_str(m)) exit end if @@ -196,7 +196,7 @@ contains integer, intent(in) :: bin character(MAX_LINE_LEN) :: label - label = "Zernike expansion, Z" // trim(to_str(2*bin)) // ",0" + label = "Zernike expansion, Z" // trim(to_str(2*(bin-1))) // ",0" end function text_label_zn_rad !===============================================================================