在假定使用缺省惯例的情况下,并非必须使用 OPEN 语句。如果逻辑单元上的第一个操作是 I/O 语句,而不是 OPEN 或 INQUIRE,则会引用文件 fort.n,其中 n 为逻辑单元号(0、5 和 6 除外,它们有特殊意义)。
这些文件无需在程序执行前就存在。如果对文件的第一个操作不是 OPEN 或 INQUIRE 语句,则会创建这些文件。
示例:以下代码中,如果 WRITE 是该单元上的第一个输入/输出操作,则会创建文件 fort.25:
demo% cat TestUnit.f IU=25 WRITE( IU, ’(I4)’ ) IU END demo% |
上述程序将打开文件 fort.25,并将一条格式化记录写入该文件:
demo% f95 -o testunit TestUnit.f demo% testunit demo% cat fort.25 25 demo% |