CUDA上的PGI Fortran编译器中的恒定内存

Question

当我尝试用另一个常量变量指定一个常量变量时​​，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，则不会报告任何错误。