Skip to content

Commit 3e26d19

Browse files
committed
Fix namelist check
1 parent 22e8497 commit 3e26d19

1 file changed

Lines changed: 1 addition & 1 deletion

File tree

src/Namelists.f90

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -749,7 +749,7 @@ subroutine readNamelists(tscheme)
749749
if (ellipticity_icb /= 0.0_cp ) l_vr_icb=.true.
750750
l_vr_bc = l_vr_cmb .or. l_vr_icb
751751

752-
if ( l_vr_bc .and. ktops /= 1 .or. kbots /= 1 ) then
752+
if ( l_vr_bc .and. (ktops /= 1 .or. kbots /= 1) ) then
753753
call abortRun('! Radial flow boundary conditions not yet implemented for ktops /=1 and kbots /= 1')
754754
end if
755755

0 commit comments

Comments
 (0)