开放语句中“iostat”参数的含义是什么？

Question

我对在打开文件中使用“iostat”参数感到困惑。如前所述，当 open 命令成功时，'iostat' 的值为 0。

open(unit=99, file='vel_zcor22.txt', status='old', iostat=ierr, err=100)
100 if(ierr .ne. 0) then
    print*, 'open file error'
endif   
print*, ierr 

为什么不是 'iostat' 用来告诉状态，而不是 'ierr'。根据我对赋值运算符的理解，“ierr”将其值传递给“iostat”。那么'ierr'在这个过程中扮演什么角色呢？

Answer 1

在open 语句中，iostat=ierr 使用iostat= 作为说明符。不是赋值，而是将ierr的值传递给变量iostat。

很像在子例程或函数引用中使用关键字（其中call sub(a=x) 将实际参数x 与虚拟参数a 相关联），发生的情况更多：

使用变量ierr 存储语句的结果状态。

因此，当“iostat 的值为 0”时，真正发生的是变量 ierr 被定义。

您可以使用任何变量名代替ierr，通常使用iostat：

open(..., iostat=iostat, ...)

同样，您看到的其他部分也不是作业。那就是：

open(unit=99, file='vel_zcor22.txt', status='old', iostat=ierr, err=100)

可能看起来像作业，但它仍然在说：

在单元 99 上打开此文件，状态为 'old'，如果出现错误，将控制权传递给标记为 100 的语句。

它没有将变量 unit 设置为 99 等。