diff --git a/src/MNH/advecuvw_rk.f90 b/src/MNH/advecuvw_rk.f90 index 9e9dfe35dc58154882335e2a9350f4a61b7e3fd0..0185087231e5f3039ef2e3d475639035dd4aa3ea 100644 --- a/src/MNH/advecuvw_rk.f90 +++ b/src/MNH/advecuvw_rk.f90 @@ -219,6 +219,9 @@ SELECT CASE (HTEMP_SCHEME) ISPL = 6 CASE('RK65') ISPL = 6 + CASE DEFAULT + PRINT *,'ERROR: UNKNOWN HTEMP_SCHEME' + CALL ABORT() END SELECT ! !