关于Fortran子程序中的变量 INTENT ，我有几个问题 . 例如，几周前，我发布了一个关于不同Fortran主题的问题(In Fortran 90, what is a good way to write an array to a text file, row-wise?)，其中一个回复包括定义 tick 和 tock 命令的代码 . 我发现这些对我的代码运行有用 . 我在下面粘贴了 tick 和 tock 并在一个简单的例子中使用它们来计算 DO 循环：

MODULE myintenttestsubs

IMPLICIT NONE

CONTAINS

SUBROUTINE tick(t)

INTEGER, INTENT(OUT) :: t

CALL system_clock(t)

END SUBROUTINE tick

! returns time in seconds from now to time described by t

REAL FUNCTION tock(t)

INTEGER, INTENT(IN) :: t

INTEGER :: now, clock_rate

CALL system_clock(now,clock_rate)

tock = real(now - t)/real(clock_rate)

END FUNCTION tock

END MODULE myintenttestsubs

PROGRAM myintenttest

USE myintenttestsubs

IMPLICIT NONE

INTEGER :: myclock, i, j

REAL :: mytime

CALL tick(myclock)

! Print alphabet 100 times

DO i=1,100

DO j=97,122

WRITE(*,"(A)",ADVANCE="NO") ACHAR(j)

END DO

END DO

mytime=tock(myclock)

PRINT *, "Finished in ", mytime, " sec"

END PROGRAM myintenttest

这导致了我关于 INTENT 的第一个问题(我的第二个问题，下面是关于未明确指定INTENT的子例程或函数参数/变量)：

要启动计时器，我写 CALL tick(myclock) ，其中 myclock 是一个整数 . 子程序的 Headers 是 SUBROUTINE tick(t) ，因此它接受虚拟整数 t 作为参数 . 但是，在子程序内， t 被赋予INTENT(OUT)： INTEGER, INTENT(OUT) :: t . 怎么会这样？我天真的假设是INTENT(OUT)意味着可以修改这个变量的值并将其输出到子程序之外 - 而不是读入 . 但显然 t 被读入子程序;我将整数 myclock 传递给子程序 . 所以，由于 t 被声明为INTENT(OUT)， t 似乎也会出现？

我注意到在函数 tock(t) 中，整数变量 now 和 clock_rate 没有明确给出INTENT . 那么，这些变量的范围是什么？只有 now 和 clock_rate 才能在函数中看到吗？ (类似于INTENT(NONE)或INTENT(LOCAL)，虽然没有这样的语法？)而且，虽然这是一个函数，但子例程是否也适用？有时，当我编写子程序时，我想声明"temporary"这样的变量 - 仅在子程序中看到的变量(例如，在最终输出的赋值之前的步骤中修改输入) . 这是缺少指定的INTENT完成的吗？

我查看了一个文本(Fortran 90 text by Hahn)，在其中，他给出了以下对参数意图的简要描述：

参数意图 . 可以使用intent属性指定虚拟参数，即，是否要将它们用作输入或输出，或者两者都用作

SUBROUTINE PLUNK(X, Y, Z)

REAL, INTENT(IN) :: X

REAL, INTENT(OUT) :: Y

REAL, INTENT(INOUT) :: Z

...

如果intent为IN，则伪参数的子值可能不会在子程序中更改 . 如果意图是OUT，则相应的实际参数必须是变量 . 诸如CALL PLUNK(A，(B)，C)之类的调用会产生编译器错误 - (B)是表达式，而不是变量 . 如果意图是INOUT，则相应的实际参数必须再次是变量 . 如果伪参数没有意图，则实际参数可以是变量或表达式 . 建议给出所有伪参数的意图 . 特别是，所有函数参数都应具有意图IN . 意图也可以在单独的声明中指定，例如意图(INOUT)X，Y，Z .

上面的文字似乎甚至没有提到论证/变量范围;似乎主要是讨论在子例程或函数内是否可以更改参数/变量值 . 这是真的，如果是这样，我对于INTENT的范围有什么假设？