【已解决】fortran读取txt问题

muggle

修改如下：
        type station2
        character name*20,id*8,name2*20
        integer lon,lat
        real high
        endtype
        type(station2),dimension(N*365*63)::sta2



        open(23,file='f:\winter\data\jiequ\xinjiang.txt')
        do i=1,56
        read(23,*) sta2(i).id,sta2(i).name,sta2(i).name2
        enddo
        close(23)

muggle

修改如下：
        type station2
        character name*20,id*8,name2*20
        integer lon,lat
        real high
        endtype
        type(station2),dimension(N*365*63)::sta2



        open(23,file='f:\winter\data\jiequ\xinjiang.txt')
        do i=1,56
        read(23,*) sta2(i).id,sta2(i).name,sta2(i).name2
        enddo
        close(23)

南国的佳人

楼主为什么修改了这么多版本呢？

muggle

南国的佳人 发表于 2017-1-24 10:01
楼主为什么修改了这么多版本呢？

我只点了一次发表回复，但是显示出来三遍。。。不是我的错

南国的佳人

muggle 发表于 2017-1-24 10:20
我只点了一次发表回复，但是显示出来三遍。。。不是我的错

{:eb520:}{:eb520:}系统bug

muggle

南国的佳人 发表于 2017-1-25 11:47
系统bug

soga

halakaka

不错  正巧也在弄 借鉴了