子程序中声明了可变大小的数组为虚参，在主程序中的调用

楚香饭 · 发表于 2021-10-23 17:33:21

本帖最后由楚香饭于 2021-10-23 17:34 编辑

子程序中
CHARACTER(LEN=100)::FNAME
改为
CHARACTER(LEN=*)::FNAME

REAL(KIND=8),ALLOCATABLE::TEMP_READTXT(:,:) !临时存储中间数据

改为
REAL(KIND=8)::TEMP_READTXT(:,:) !临时存储中间数据

子程序改为module中包含。主程序 use 该module

楚香饭 · 发表于 2021-10-23 17:35:59

现阶段的 Fortran 程序，应该完全放弃外部子程序。所有子程序，全部放入module。
整个代码，只有 module 和主程序。

[子程序] 子程序中声明了可变大小的数组为虚参，在主程序中的调用

新人勋章

爱心勋章

水王勋章

元老勋章

热心勋章