24小时热门版块排行榜    

查看: 646  |  回复: 5

匿名

用户注销 (小有名气)

本帖仅楼主可见

» 猜你喜欢

已阅   同方向广播   申请模拟EPI   编辑   查看我的主页

匿名

用户注销 (小有名气)

本帖仅楼主可见
2楼2014-04-27 06:58:41
已阅   申请模拟EPI   编辑   查看我的主页

lsloneil

专家顾问 (正式写手)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感谢参与,应助指数 +1
faxxaf: 金币+10, ★★★很有帮助 2014-04-27 17:00:31
月只蓝: 金币+3, 鼓励交流! 2014-04-28 18:35:46
自己稍微看一下源代码就不难了解cnfile的格式,比如说writcn这个subroutine

        subroutine writcn ( cnfile, box )
        common / block1 / rx, ry, rz
!c    *******************************************************************
!c    ** subroutine to write out the configuration to unit 10          **
!c    *******************************************************************
        integer     n
        parameter ( n = 108 )
        character   cnfile*(*)
        real        rx(n), ry(n), rz(n)
        real        box
        integer     cnunit
        parameter ( cnunit = 10 )
!c   ********************************************************************
        open ( unit = cnunit, file = cnfile, status = 'unknown',
     :         form = 'unformatted'                        )
        write ( cnunit ) n, box
        write ( cnunit ) rx, ry, rz
        close ( unit = cnunit )
        return
        end
很容易知道cnfile的格式是
n box
rx
ry
rz

注意这里的格式是unformatted,也就是说这个文件是一个二进制文件(binary file),你可以把格式设成formatted,这样你可以用一般的文本编辑器看到这个文件。

如果你不太了解fortran的输入输出,建议先学习一下,网上资料很多。
3楼2014-04-27 07:45:46
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

匿名

用户注销 (小有名气)

本帖仅楼主可见
4楼2014-04-27 22:30:22
已阅   申请模拟EPI   编辑   查看我的主页

匿名

用户注销 (小有名气)

本帖仅楼主可见
5楼2014-04-29 09:00:49
已阅   申请模拟EPI   编辑   查看我的主页

匿名

用户注销 (小有名气)

本帖仅楼主可见
6楼2014-04-29 14:51:30
已阅   申请模拟EPI   编辑   查看我的主页
相关版块跳转 我要订阅楼主 faxxaf 的主题更新
信息提示
请填处理意见