В основной программе модуль объявляется со многими переменными следующим образом:
module my_module
integer kindi
parameter (kindi=4)
integer (kindi) my_var_from_module
end module my_module
В определенной функции используется модуль, но, похоже, единственная переменная из модуля не имеет типа:
subroutine my_function(param1, param2)
use my_module
implicit none
integer (kindi) param1, param2
print*, 'my_var_from_module = ', my_var_from_module
end function
Также я попытался объявить переменную локально с тем же именем, но она заменила ее значение.
В результате получено сообщение от компилятора:
error #6404: This name does not have a type, and must have an explicit type.