大佬们，我想找到两个组分在sout中的位置，该用什么语句

ASPEC11

大佬们，我想找到两个组分在sout中的位置，该用什么语句？实现”找到挥发组分(水)、聚合物组分(尼龙 66)在流股 SOUT 中的位置“的目的，我看有的程序是像附件那么写，看不懂。

fcode

请尽量用编程语言来提问，而不是专业语言。

如果你想在一个数组中搜索某个值，所在的位置。那么可以用

result = FindLoc(array, value, dim [, mask] [,kind] [,back])  这个 函数
详解：https://gcc.gnu.org/onlinedocs/gfortran/FINDLOC.html

如果你的编译器比较老，可能不支持这个新的标准函数，你可以用
result = MinLoc(array [, dim] [, mask] [, kind]) 这个函数
但需要做一些小的思维转换，用 result = MinLoc( array , 1 , array==value) 这种形式