Question

在fortran 源代码中 怎样定位到输出命令行？

就是怎样知道输出命令“write（*，*） ....” 在什么位置！谢啦

Answer 1

逆向输出到DOS窗口，WRITE(*,*)"A",这个"A"一般也就在本行输出出来。
如果你要具体一点你可以这样写：
WRITE(*,100)
100 FORMAT(//,T1,"A")
那么就是本行再换两行（//），然后第一列（T1）输出。
如果你想输出到文件，那么：
OPEN=(unit=8,file="OUTPUT.TXT")
WRITE(8,100)
100 FORMAT(//,T1,"A")
那么输出的文本OUTPUT.TXT就会有一个A，格式和在窗口输出一样。

追问

还是不太清楚你说的 “逆向输出”是什么意思？因为我的源代码里包含好多子程序，我想知道输出的某一部分是在哪个子程序的什么地方有这个输出命令，谢谢

追答

逆向输出是“你想输出”，O(∩_∩)O哈哈~。
要是想知道输出的某一部分是在哪个子程序的什么地方有这个输出命令，你可以看关键字，输出文本有关键字的。还有输出格式。
大不了你每次CALL 一个子程序，之前就加上一段
WRITE(*,*)"下面的输出是某某子程序搞的鬼！！！！！"
哈哈，一切搞定。