Fix for check_ranges() needs a rethink.

CABLE-LSM · Jan 17, 2025 · eb6a56c · eb6a56c
1 parent 4109e58
commit eb6a56c
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/src/offline/cable_checks.F90 b/src/offline/cable_checks.F90
@@ -205,8 +205,7 @@ MODULE cable_checks_module
 
   TYPE(ranges_type), SAVE :: ranges
 
-  IF (cable_user%GW_MODEL) ranges%sucs = [30., 800.]   ! MMY the range [-0.8, -0.03] doesn't suit Mark Decker's version
-
+
   INTERFACE check_range
     MODULE PROCEDURE :: check_range_d1
     MODULE PROCEDURE :: check_range_d2