Я хотел бы получить доступ к реальной переменной с именем, равным строке символов, которая у меня есть. Что-то вроде этого (я сделаю пример максимально чистым):
character(len=5) :: some_string
real :: value
value = 100.0
some_string = 'value'
На данный момент, как мне создать ассоциацию между массивом символов value и именем моей реальной переменной value, чтобы я мог записать значение 100,0, ссылаясь на строку some_string?
В Фортране такого практически не будет. В языке нет таких «динамических» языковых функций. Имена переменных используются только во время компиляции и просто не существуют во время выполнения (имена были преобразованы компилятором в машинные адреса).
Вот как я работаю над этим:
character(100) :: s
integer :: val
val = 100
write(s,*) val
print *,trim(s)
Это выводит 100 на экран. Однако есть некоторая странность, которую я не понимаю, символ s должен быть очень большим (100 в его случае). Например, если вы используете 3 вместо 100, это не сработает. Это не критично, так как это исправляет использование обрезки, но было бы неплохо, если бы кто-нибудь ответил, почему это так.
В любом случае, это должно сработать.
