如何获得指定字符串的行数？

mormint

比如一个文件有300行，在中间有一行是“aa bbbb”，其中aa在整个文件中只出现过一次，我想获得“aa bbbb”是文件的第多少行。
我有一个想法是：
打开文件
获得文件的总行数nline
do i=1, nline
  用index找aa，如果找到，则循环结束
end do
那么此时的i就是我要的结果

我想请教一下有没有什么函数能直接或者更简洁的实现这个目的？

另外还有一个问题，subroutine中如果读取了很多数组，这些数组没有被传递，当subroutine返回的时候，这些数组所在内存有没有被释放？

先行感谢！

fcode

1. 没有更便捷的函数可以实现这个功能了。
2. 非save属性的局部变量数组会自动释放。allocatable 的局部变量数组也会被自动释放。分配的指针数组不会释放。

mormint

了解了，非常感谢。
我对指针还不是很了解，正好程序要简单的调用一下Matlab，之后会再仔细学习下的~