Skip to content

Commit

Permalink
Fix array size for RADIAL_BINS and DEPTH_BINS
Browse files Browse the repository at this point in the history
Use the proper array lengths $MAXRADII and $MAXZPLANE. Previously, the
compiler issued warnings because the arrays sizes were set to $MAXRZ
here, while in the RZ applications they were set to $MAXRADII and
$MAXZPLANE.
  • Loading branch information
mainegra authored and ftessier committed May 24, 2017
1 parent fa3d8f2 commit d966f03
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion HEN_HOUSE/utils/grids.mortran
Original file line number Diff line number Diff line change
Expand Up @@ -222,7 +222,7 @@ PARAMETER CUTOFF=0.3; "changes SFIG if 10% of uncertainties are less"
"than 0.2%"
$REAL RESULTS($MAXZREG,$MAXRADII,$MAXCMPTS),
UNCRT($MAXZREG,$MAXRADII,$MAXCMPTS),
RADIAL_BINS($MAXRZ),DEPTH_BINS($MAXRZ),
RADIAL_BINS($MAXRADII),DEPTH_BINS($MAXZPLANE),
TMP2,TMP3;
CHARACTER*60 EXPLANATIONS($MAXCMPTS);
CHARACTER*4 LABELS($MAXCMPTS);
Expand Down

0 comments on commit d966f03

Please sign in to comment.