Параметр подпрограммы Fortran изменяется при вызове [дубликат]
ПРИМЕЧАНИЕ. Я предлагаю проверить @ ответ Хэмиша ниже; это не связано с несовершенной «маскировкой» в описанном здесь решении.
Вы можете приблизиться к нескольким теням; один для каждой стороны
box-shadow: 12px 0 15px -4px rgba(31, 73, 125, 0.8), -12px 0 8px -4px rgba(31, 73, 125, 0.8);Изменить
Добавить еще 2 окна - тени для верхнего и нижнего фронта, чтобы замаскировать пропущенное.
box-shadow: 0 9px 0px 0px white, 0 -9px 0px 0px white, 12px 0 15px -4px rgba(31, 73, 125, 0.8), -12px 0 15px -4px rgba(31, 73, 125, 0.8);
1 ответ
Самый простой способ сделать это в современном Fortran - это модули.
Рассмотрим
module globals
implicit none
integer :: x
end module globals
program main
use globals
implicit none
call mysub
print *,x
end program main
subroutine mysub
use globals
implicit none
x = 1
end subroutine mysub
В этой парадигме вы указываете свои «глобальные» переменные в модуле и use, что модуль везде, где вы хотите получить доступ к ним.
Если вы просто используете это для объявления констант (параметров), вы можете упростить это:
module globals
implicit none
integer, parameter :: x=1
end module globals
program main
use globals
implicit none
print *,x
end program main
. Более старый метод для этого включает блоки common и include файлов, которые объявили о каждой процедуре, к которой они обращались. Если вы найдете учебник, посвященный блочному методу common, я советую вам игнорировать их и избегать их использования в новом коде.