我正在尝试使用 pack 返回出现特定字母的字符数组的索引。我在用; 结果 = pack([(az,az=1,10)],[((text(i) == testarray(1)),i=1,10)]) 其中 results 是一个整数数组，text 和 testarray 是字符数组。 代码编译正确并且似乎可以运行，但结果始终为空。任何人都可以帮助我吗？我是一位经验丰富的 FORTRAN 程序员，但没有使用 pack 函数的经验。
我预计“results = pack([(az,az=1,c3)],[((text(i) == testarray(1)),i=1,c3)])”会使用隐含的 do针对相等性测试循环以创建一个临时逻辑掩码，然后用于选择由“az”循环创建的数组，并给我逻辑掩码为真的索引。 我正在使用 GNU fortran 12.1.0