回 帖 发 新 帖 刷新版面

主题:[讨论]这个输出格式有什么问题

    DO I=1,NUM
    ......
    MPLANE=MPLANE+1
    WRITE(6,1)MPLANE
1    FORMAT(' +  MPLANE=',I8)
    ......
    ENDDO

上述输出格式采用compaq fortran固定格式编译时,能在屏幕上只出现一次“MPLANE=”,右边的数会自动累加,而采用自由格式编译时都会重新输出一次“+  MPLANE=”,这是什么原因,跟采用的格式有关吗,还是我写的时候有错误?有什么方法能在自由格式中实现上述功能吗?
请大虾不吝赐教,谢谢!
    

回复列表 (共2个回复)

沙发

自由格式时,输出语句在循环里面,当然会每次都输出' +  MPLANE='了。固定格式没用过,照这样说固定格式的这功能还真不错。

板凳

额。输出格式有点复杂, 等待楼下解答www.jinxiaoblog.com

我来回复

您尚未登录,请登录后再回复。点此登录或注册