Skip to content

Commit 8627b41

Browse files
sbryngelsonclaude
andcommitted
Remove Fortran PROHIBIT checks now handled by Python validator
The three build-flag compatibility checks moved to case_validator.py in the previous commit no longer need Fortran-side enforcement. Remove them and their now-empty subroutines: - pre_process/m_checker.fpp: s_check_parallel_io (parallel_io + --no-mpi) - simulation/m_checker.fpp: s_check_inputs_geometry_precision (3D cyl + --single) - post_process/m_checker.fpp: s_check_inputs_output_format (precision=2 + --single) Co-Authored-By: Claude Sonnet 4.6 <noreply@anthropic.com>
1 parent 233a1f6 commit 8627b41

3 files changed

Lines changed: 0 additions & 27 deletions

File tree

src/post_process/m_checker.fpp

Lines changed: 0 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -24,16 +24,8 @@ contains
2424
!> Checks compatibility of parameters in the input file.
2525
!! Used by the post_process stage
2626
impure subroutine s_check_inputs
27-
28-
call s_check_inputs_output_format
29-
3027
end subroutine s_check_inputs
3128

32-
!> Checks constraints on output format parameters
33-
impure subroutine s_check_inputs_output_format
34-
@:PROHIBIT(precision == 2 .and. wp == sp)
35-
end subroutine s_check_inputs_output_format
36-
3729
!> Checks constraints on fft_wrt
3830
impure subroutine s_check_inputs_fft
3931
integer :: num_procs_y, num_procs_z

src/pre_process/m_checker.fpp

Lines changed: 0 additions & 10 deletions
Original file line numberDiff line numberDiff line change
@@ -24,16 +24,6 @@ contains
2424
!> Checks compatibility of parameters in the input file.
2525
!! Used by the pre_process stage
2626
impure subroutine s_check_inputs
27-
28-
call s_check_parallel_io
29-
3027
end subroutine s_check_inputs
3128

32-
!> Checks if mpi is enabled with parallel_io
33-
impure subroutine s_check_parallel_io
34-
#ifndef MFC_MPI
35-
@:PROHIBIT(parallel_io, "MFC built with --no-mpi requires parallel_io=F")
36-
#endif
37-
end subroutine s_check_parallel_io
38-
3929
end module m_checker

src/simulation/m_checker.fpp

Lines changed: 0 additions & 9 deletions
Original file line numberDiff line numberDiff line change
@@ -36,7 +36,6 @@ contains
3636
else if (recon_type == MUSCL_TYPE) then
3737
call s_check_inputs_muscl
3838
end if
39-
call s_check_inputs_geometry_precision
4039
end if
4140

4241
call s_check_inputs_time_stepping
@@ -76,14 +75,6 @@ contains
7675
"For 3D simulation, p must be greater than or equal to (num_stcls_min*muscl_order - 1), whose value is "//trim(numStr))
7776
end subroutine s_check_inputs_muscl
7877

79-
!> Checks constraints on geometry and precision
80-
impure subroutine s_check_inputs_geometry_precision
81-
! Prevent spherical geometry in single precision
82-
#ifdef MFC_SINGLE_PRECISION
83-
@:PROHIBIT(.not. (cyl_coord .neqv. .true. .or. (cyl_coord .and. p == 0)), "Fully 3D cylindrical grid (geometry = 3) is not supported in single precision.")
84-
#endif
85-
end subroutine s_check_inputs_geometry_precision
86-
8778
!> Checks constraints on time stepping parameters
8879
impure subroutine s_check_inputs_time_stepping
8980
if (.not. cfl_dt) then

0 commit comments

Comments
 (0)