Когда я пытаюсь указать постоянную переменную с другой постоянной переменной, компилятор PGI выдает эту ошибку:
PGF90-S-0519-В назначении более одного резидентного объекта.
Код выглядит следующим образом:
module var
use cudafor
implicit none
integer,constant :: a,b
end
program main
use var
implicit none
a=1
b=a+1
end
Однако, если я использую b = a или b = a + 0 вместо b = a + 1, об ошибке не сообщается.