回 帖 发 新 帖 刷新版面

主题:字符串的忧虑

请问怎么输出文件中的某一字符串下面的数字,最好举个例子,谢谢

回复列表 (共4个回复)

沙发

什么是:某一字符串下面的数字?

板凳


-15 67                                                      
ITEM: ATOMS id type x y z                                   
1586 1 6.48048 3.69877 -10.7853                             
1587 1 5.50828 2.37501 -11.4744                             
4146 1 3.04137 9.13152 -14.8948                             
……
ITEM: ATOMS id type x y z                                   
1596 1 5.48048 3.69877 -10.7853                             
1487 1 5.50828 2.37501 -11.4744                             
4146 1 3.04137 9.13152 -14.8948 
就是想输出ITEM: ATOMS id type x y z  下面的数组

3 楼

program output
implicit none
integer id=1,type(num),i
real x,y,z
type=(/...data../)
x=(/....data...../)
y=(/..data..../)
z=(/...data...../)
print*,"ITEM: ATOMS id type x y z"
do i=1,num
print*,id,type(i),x(i),y(i),z(i)
end do
end program

4 楼

谢谢

我来回复

您尚未登录,请登录后再回复。点此登录或注册