在Fortran程序中我想让程序暂停

Program Main

logical :: bExist = .FALSE.

Do

Inquire( File = "a.txt" , exist = bExist)

if ( bExist ) Exit

End Do

!// 此处是你的后续代码，比如 open 打开该文件等

End Program Main

意思就是，不停的循环。直到文件存在为止。

我想这个可能不一定能满足你的需求。

我猜你是想等另一个程序把结果输出吧？

但是，另一个程序创建这个文件之后，可能写入文件内容还需要一点时间。

如果你的程序一旦发现文件创建了，就开始读的话，可能会打开文件冲突。（也就是两个程序都打开同一个文件，会出错的）

不是太清楚你的循环语句是怎样的，有些是有限制条件，在这个条件里面才执行循环内容，而一旦不符合条件，程序就会跳出循环，还有一种就是你循环的内容里面存在逻辑错误，这个错误使得你的循环在一定次数时（eg:67次），无法继续进行下一步，如此就会默认为程序已执行完，自动跳出！

所以，如果想让你的问题被真的解决，就先自己认真、仔细检查下你的程序吧。

---