From 4825dfda8e7c4d9e70921988c44467fa1314d079 Mon Sep 17 00:00:00 2001 From: Spencer Bryngelson Date: Sun, 22 Dec 2024 11:24:26 -0500 Subject: [PATCH] Update m_body_forces.fpp --- src/simulation/m_body_forces.fpp | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/src/simulation/m_body_forces.fpp b/src/simulation/m_body_forces.fpp index 9892e48f4..2ab03627c 100644 --- a/src/simulation/m_body_forces.fpp +++ b/src/simulation/m_body_forces.fpp @@ -12,14 +12,14 @@ module m_body_forces use m_nvtx -#ifdef MFC_OpenACC - use openacc -#endif +#ifdef MFC_OpenACC + use openacc +#endif ! ========================================================================== implicit none - private; + private; public :: s_compute_body_forces_rhs, & s_initialize_body_forces_module, & s_finalize_body_forces_module