Fortran写入文件

open(100,file='results.d',status='replace',position='append')
write(100,'(<nx+1>(2x,I5.3))') chi
write(100,'(<ny>(2x,f25.15))')  delta
close(100)

Status: 'new': 原来不存在
            ‘old’ :  原来存在
            ‘replace’: 若存在,则替换原文件,若不存在,创建新文件
            ‘scratch’: 打开暂存盘,不需要名字,file可省略。暂存盘会在程序结束后自动删除。
            ‘unknown’: 根据编译器决定,通常同replace。默认为unknow

Format: I5.3 : 5个字符宽度输出整数,最少3个数字
             F25.15: 25个字符宽度输出整数,最少输出15个数字

Position: asis: 打开时的读取位置,不特别指定,通常为文件开头,这是默认值
               rewind: 打开时的读取位置在文件开头
               append: 打开时的读取位置在文件结尾

 

posted @ 2020-12-02 00:13  qinghev  阅读(939)  评论(0编辑  收藏  举报