Skip to content

Commit eb6a56c

Browse files
committed
Fix for check_ranges() needs a rethink.
1 parent 4109e58 commit eb6a56c

1 file changed

Lines changed: 1 addition & 2 deletions

File tree

src/offline/cable_checks.F90

Lines changed: 1 addition & 2 deletions
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)