From 8df54535625a5f7e291748affa32c0795809add9 Mon Sep 17 00:00:00 2001 From: Zbigniew Piotrowski Date: Fri, 3 Nov 2023 13:09:41 +0100 Subject: [PATCH] add missing dir_trans module entry --- src/programs/ectrans-benchmark-driver_mod.F90 | 4 ++-- src/trans/module/ectrans_mod.F90 | 4 ++++ 2 files changed, 6 insertions(+), 2 deletions(-) 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"