Skip to content

Commit d3e39e1

Browse files
committed
Fix for check_ranges() needs a rethink.
1 parent 1fe7734 commit d3e39e1

File tree

1 file changed

+1
-2
lines changed

1 file changed

+1
-2
lines changed

src/offline/cable_checks.F90

+1-2
Original file line numberDiff line numberDiff line change
@@ -205,8 +205,7 @@ MODULE cable_checks_module
205205

206206
TYPE(ranges_type), SAVE :: ranges
207207

208-
IF (cable_user%GW_MODEL) ranges%sucs = [30., 800.] ! MMY the range [-0.8, -0.03] doesn't suit Mark Decker's version
209-
208+
210209
INTERFACE check_range
211210
MODULE PROCEDURE :: check_range_d1
212211
MODULE PROCEDURE :: check_range_d2

0 commit comments

Comments
 (0)