fortran 中字符串数字混合读取

参考此处帖子 :http://bbs.lasg.ac.cn/?action-viewthread-tid-14968

需要读取数据如下

 zone  i=        2001    j=         151

读取方法如下:

	read(77,'(a)')str
	ip=index(str,"=") 
	str(1:ip)=''
	ip=index(str,'=')
	str(ip-1:ip)=''
	read(str,*)i,j	


你可能感兴趣的:(fortran)