Значение LEN_TRIM для переменной

Question

У меня есть этот код на Фортране, где я хочу определить, сколько (допустимых) записей имеет 1-мерная символьная переменная (dummy).Для этого я использую LEN_TRIM, чтобы проверить, превышает ли длина фактической записи значение 0:

program test

implicit none

integer :: x1, x2
character(len=10), dimension(2) :: dummy

dummy(1) = "VALUE"

x1 = LEN_TRIM(dummy(1))
x2 = LEN_TRIM(dummy(2))

end program

Здесь значения x1 и x2 имеют значение 10. Однако, если я изменю кодto:

x1 = LEN_TRIM('VALUE ')
x2 = LEN_TRIM('   ')

x1 становится 5, а x2 становится 0.

Почему оба варианта приводят к разным результатам?Я использую компилятор Intel.

Answer 1

LEN_TRIM возвращает длину указанной строки , игнорируя конечные пробелы .Итак, во втором примере результаты совершенно верны.Что касается первого примера, попробуйте инициализировать пустышку с dummy=' ', а затем выполните dummy(1)='VALUE'