fortran程序能运行，生成结果是空的？

fcode

这代码逻辑太差了，完全看不懂你要做什么。

主程序里打开了 sk_06R.txt，然后啥也没读，溜了一圈就走了。

然后打开 ms_06R_26.txt 文件，读入到 istr19，然后就啥也没了。

然后打开 ACC_06R.txt，输出了 cor数组，这个cor数组没有值。

cor函数需要 x y n，计算 coefficient
但是和上面的 istr19,cor数组没有任何关联。