From 6434eac9fedc3b30a94808bee399b75ec5cb9877 Mon Sep 17 00:00:00 2001 From: Brian Ok Date: Sun, 23 Jun 2024 21:32:32 -0400 Subject: [PATCH] fix typos --- src/simulation/m_body_forces.fpp | 4 ++-- src/simulation/m_ibm.fpp | 6 +++--- 2 files changed, 5 insertions(+), 5 deletions(-) diff --git a/src/simulation/m_body_forces.fpp b/src/simulation/m_body_forces.fpp index c83ed683e..490f0f45b 100644 --- a/src/simulation/m_body_forces.fpp +++ b/src/simulation/m_body_forces.fpp @@ -104,8 +104,8 @@ contains !> This subroutine calculates the source term due to body forces !! so the system can be advanced in time - !! @param q_cons_vf Conservative varaibles - !! @param q_prim_vf Primitive varaibles + !! @param q_cons_vf Conservative variables + !! @param q_prim_vf Primitive variables subroutine s_compute_body_forces_rhs(q_cons_vf, q_prim_vf, rhs_vf) type(scalar_field), dimension(sys_size), intent(in) :: q_prim_vf diff --git a/src/simulation/m_ibm.fpp b/src/simulation/m_ibm.fpp index 36a577644..8b5ed5914 100644 --- a/src/simulation/m_ibm.fpp +++ b/src/simulation/m_ibm.fpp @@ -122,16 +122,16 @@ contains !> Subroutine that updates the conservative variables at the ghost points !! @param q_cons_vf Conservative variables - !! @param q_prim_vf Primitive varaibles + !! @param q_prim_vf Primitive variables subroutine s_ibm_correct_state(q_cons_vf, q_prim_vf, pb, mv) type(scalar_field), & dimension(sys_size), & - intent(INOUT) :: q_cons_vf !< Conservative Variables + intent(inout) :: q_cons_vf !< Conservative Variables type(scalar_field), & dimension(sys_size), & - intent(INOUT) :: q_prim_vf !< Primitive Variables + intent(inout) :: q_prim_vf !< Primitive Variables real(kind(0d0)), dimension(startx:, starty:, startz:, 1:, 1:), optional, intent(inout) :: pb, mv