立即注册 登录
气象家园 返回首页

主啊的个人空间 https://bbs.06climate.com/?69999 [收藏] [复制] [分享] [RSS]

日志

fortran读取CSV数据:读取数据并根据时间进行筛选出

已有 100 次阅读2018-4-29 22:39

http://bbs.fcode.cn/thread-1393-1-1.html
Program Main
02  Implicit None
03  Character(len=1024) :: c
04  integer :: k
05  Open(12,File="文件名.csv")
06  Open(13,File="输出文件名.csv")
07  Do
08    Read(12,'(a1024)',iostat=k) c
09    if( k /= 0 ) exit
10    if( index( c , '2017/3' ) > 0 ) write(13,'(a)') trim(c)
11  End Do
12  Close(12)
13End Program Main

评论 (0 个评论)

facelist doodle 涂鸦板

您需要登录后才可以评论 登录 | 立即注册

Copyright ©2011-2014 bbs.06climate.com All Rights Reserved.  Powered by Discuz! (京ICP-10201084)

本站信息均由会员发表,不代表气象家园立场,禁止在本站发表与国家法律相抵触言论

返回顶部