意图进入fortran的别名

Question

如果虚拟变量是意图（IN），那么使用别名调用fortran子程序是合法的（或者是否可以给出trubles）？我必须在我的代码中做这样的事情：

  program myprogram
     ......
     ......
     call check(itstrt, itstrt )
     do k= itstrt,itend
        call check(itstrt, k)
     enddo
  end

  subroutine check(itstrt, k)
  integer , intent(in)    :: itstrt, k
     if(k==itstrt) write(*,*) 'I gotta do something'
  end 

我知道我可以轻松地使用额外的变量varPROV = itstrt来调用第一个检查作为调用检查（itstrt，varPROV）但是我想知道标准说什么，以及这样做的麻烦。 谢谢 甲

Answer 1

这是合法的。别名和INTENT(IN)（单独）的问题与尝试定义虚拟变量的程序有关 - 可能是由出现在赋值语句左侧的变量或类似变量。