diff --git a/src/programs/ectrans-benchmark-driver_mod.F90 b/src/programs/ectrans-benchmark-driver_mod.F90 index 666c7b64..c4bdbf6b 100644 --- a/src/programs/ectrans-benchmark-driver_mod.F90 +++ b/src/programs/ectrans-benchmark-driver_mod.F90 @@ -15,7 +15,7 @@ MODULE transform_driver_mod use ectrans_mod, only: setup_trans0 use ectrans_mod, only: setup_trans use ectrans_mod, only: inv_trans -!use ectrans_mod, only: dir_trans +use ectrans_mod, only: dir_trans use ectrans_mod, only: trans_inq use ectrans_mod, only: specnorm implicit none @@ -26,7 +26,7 @@ MODULE transform_driver_mod !#include "setup_trans0.h" !#include "setup_trans.h" !#include "inv_trans.h" -#include "dir_trans.h" +!#include "dir_trans.h" !#include "trans_inq.h" !#include "specnorm.h" diff --git a/src/trans/module/ectrans_mod.F90 b/src/trans/module/ectrans_mod.F90 index eda231c7..e755526d 100644 --- a/src/trans/module/ectrans_mod.F90 +++ b/src/trans/module/ectrans_mod.F90 @@ -20,6 +20,10 @@ end module ectrans_mod contains #include "inv_trans.F90" end submodule inv_trans_mod +submodule (ectrans_mod) dir_trans_mod +contains +#include "dir_trans.F90" +end submodule dir_trans_mod submodule (ectrans_mod) trans_inq__mod contains #include "trans_inq.F90"