如何获得不同类型的模块以进行代码重用?

这是下一个(2020年?)的辩论主题Fortran标准。在当前版本中,无法参数化Fortran模块。许多人认为这是一个很大的缺陷(参见comp.lang.fortran上的讨论)。

您可以使用预处理器(通常是C预处理器)并包含文件。将类型定义为包含文件中的宏名称

  MYTYPE :: x

#define MYTYPE real
#include "module-template.F90"
#undef MYTYPE

#define MYTYPE complex
#include "module-template.F90"
#undef MYTYPE

 gfortran -cpp
 ifort -fpp

和类似(请参阅编译器手册)。

https://github.com/LadaF/PoisFFT/blob/master/src/fft-inc.f90

包含在

https://github.com/LadaF/PoisFFT/blob/master/src/fft.f90

mod_real 和 mod_complex 。您可以类似于示例执行此操作,也可以使用宏连接生成模块名称。看见 C preprocessor macro: concatenation (example for Fortan90) Concatenate strings in a macro using gfortran