Skip to content

Commit db43b35

Browse files
committed
Longer error string in get_polynomial_coordinate
Lengthened a message string in get_polynomial_coordinate so that it will give a valid fatal error message in some cases of failures rather than resulting a segmentation fault with no message output. All answers are bitwise identical.
1 parent a2df3b7 commit db43b35

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/ALE/regrid_interp.F90

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -373,7 +373,7 @@ function get_polynomial_coordinate( N, h, x_g, edge_values, ppoly_coefs, &
373373
real :: grad ! gradient during N-R iterations [A]
374374
integer :: i, k, iter ! loop indices
375375
integer :: k_found ! index of target cell
376-
character(len=200) :: mesg
376+
character(len=320) :: mesg
377377
logical :: use_2018_answers ! If true use older, less acccurate expressions.
378378

379379
eps = NR_OFFSET

0 commit comments

Comments
 (0)