论坛 › Fortran语法讨论 › 读取文件出现错误forrt1: severe(64),求指教如何修改，感谢

sophia666888 发表于 2021-4-20 11:48:25

读取文件出现错误forrt1: severe(64),求指教如何修改，感谢

本帖最后由 sophia666888 于 2021-4-20 11:51 编辑

blob:http://bbs.fcode.cn/cbd916fd-6d01-4ab5-bf64-e5ad8c176f56

vvt 发表于 2021-4-20 15:01:52

本帖最后由 vvt 于 2021-4-20 15:03 编辑

简单一点。
Implicit None
integer :: i , j , k
character(len=30) wlno
real :: wave(4,7) = 0
Open(12,File="F0form.txt")
Do i = 1 , 3
    Read(12,*)
End Do
Do i = 1 , 4
    read(12,*) j , wlno , k , wave(i,:k)
End Do
Close(12)
End

sophia666888 发表于 2021-4-20 16:13:24

vvt 发表于 2021-4-20 15:01
简单一点。
Implicit None
integer :: i , j , k


感谢指导！

布衣龙共 发表于 2021-4-20 20:14:42

非必要时候，不要用格式化输入。

sophia666888 发表于 2021-4-21 09:28:56

布衣龙共 发表于 2021-4-20 20:14
非必要时候，不要用格式化输入。

好的，感谢提醒

查看完整版本: 读取文件出现错误forrt1: severe(64),求指教如何修改，感谢