798
2
0
大宗师
open(unit=12,file='windspeed.txt') do k=1,filenum_read write(12,30)read_data(k,1:filenum_valid) end do close(unit=12) 30 format(60F7.3,/)
使用道具 举报
本版积分规则 发表回复 回帖后跳转到最后一页
捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )
GMT+8, 2024-5-3 14:44
Powered by Tencent X3.4
© 2013-2024 Tencent