From c8a03d6fd23040d48f1dfa1d905671f0c803202e Mon Sep 17 00:00:00 2001 From: rem1776 Date: Mon, 5 Aug 2024 09:47:39 -0400 Subject: [PATCH] remove whitespace --- mpp/include/mpp_util.inc | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/mpp/include/mpp_util.inc b/mpp/include/mpp_util.inc index c52b7e396..d49a9ecba 100644 --- a/mpp/include/mpp_util.inc +++ b/mpp/include/mpp_util.inc @@ -1390,7 +1390,7 @@ end function rarray_to_char ' in file '//trim(FILENAME)//'.') end if if ( len_trim(str_tmp) == LENGTH) then - write(UNIT=text, FMT='(I5)') LENGTH + write(UNIT=text, FMT='(I5)') LENGTH call mpp_error(FATAL, 'get_ascii_file_num_lines: Length of output string ('//trim(text)//& & ' is too small. Increase the LENGTH value.') end if