subroutine csvread(stemp,ncol,rcol)
implicit none
character*256 stemp
integer ilen, ncol, i, i1, i2,ipos(21)
character*(*) rcol(4)
fcode 发表于 2017-6-24 09:39
character*(*) rcol(4)中(4)表示
rcol是一个数组,数组大小为 4
欢迎光临 Fortran Coder (http://bbs.fcode.cn/) | Powered by Discuz! X3.2 |