From 547e47bc7bf0b93c9bbc8f588c53cbb3bde3ad1c Mon Sep 17 00:00:00 2001 From: lb1192176991-lab Date: Tue, 2 Jun 2026 04:05:28 +0800 Subject: [PATCH] fix: correct internal spelling typos MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit - BC_SlIP_WALL → BC_SLIP_WALL (lowercase 'l' typo, Fortran is case-insensitive so it compiled, but grep missed this site) - lb → lB (lowercase 'l' vs uppercase 'B' consistency in m_finite_differences.fpp allocate) - fite_path_dest → file_path_dest (typo in variable name) Fixes #1498 (partial — items 2, 4, 5). --- src/common/m_boundary_common.fpp | 2 +- src/common/m_finite_differences.fpp | 2 +- toolchain/mfc/test/case.py | 4 ++-- 3 files changed, 4 insertions(+), 4 deletions(-) diff --git a/src/common/m_boundary_common.fpp b/src/common/m_boundary_common.fpp index 6eb5383f75..1fe0d3e4f7 100644 --- a/src/common/m_boundary_common.fpp +++ b/src/common/m_boundary_common.fpp @@ -260,7 +260,7 @@ contains call s_symmetry(q_prim_vf, 3, 1, k, l, pb_in, mv_in, q_T_sf) case (BC_PERIODIC) call s_periodic(q_prim_vf, 3, 1, k, l, pb_in, mv_in, q_T_sf) - case (BC_SlIP_WALL) + case (BC_SLIP_WALL) call s_slip_wall(q_prim_vf, 3, 1, k, l, q_T_sf) case (BC_NO_SLIP_WALL) call s_no_slip_wall(q_prim_vf, 3, 1, k, l, q_T_sf) diff --git a/src/common/m_finite_differences.fpp b/src/common/m_finite_differences.fpp index 32075eb034..0bc85518ed 100644 --- a/src/common/m_finite_differences.fpp +++ b/src/common/m_finite_differences.fpp @@ -39,7 +39,7 @@ contains #ifdef MFC_POST_PROCESS if (allocated(fd_coeff_s)) deallocate (fd_coeff_s) - allocate (fd_coeff_s(-fd_number_in:fd_number_in,lb:lE)) + allocate (fd_coeff_s(-fd_number_in:fd_number_in,lB:lE)) #endif ! Computing the 1st order finite-difference coefficients diff --git a/toolchain/mfc/test/case.py b/toolchain/mfc/test/case.py index bfc4b1f9eb..befaba37c7 100644 --- a/toolchain/mfc/test/case.py +++ b/toolchain/mfc/test/case.py @@ -479,9 +479,9 @@ def create_input_lagrange(path_test): def copy_input_lagrange(path_example_input, path_test): folder_path_dest = path_test + "/input/" - fite_path_dest = folder_path_dest + "lag_bubbles.dat" + file_path_dest = folder_path_dest + "lag_bubbles.dat" file_path_src = common.MFC_EXAMPLE_DIRPATH + path_example_input + "/input/lag_bubbles.dat" if not os.path.exists(folder_path_dest): os.mkdir(folder_path_dest) - shutil.copyfile(file_path_src, fite_path_dest) + shutil.copyfile(file_path_src, file_path_dest)