diff --git a/src/InputParser/InputParser.jl b/src/InputParser/InputParser.jl index 1cecdf4..de04eec 100644 --- a/src/InputParser/InputParser.jl +++ b/src/InputParser/InputParser.jl @@ -69,6 +69,5 @@ module InputParser skip_kw!(:GCONINJE, Inf, PARSER_MISSING_SUPPORT) skip_kw!(:WTEST, Inf, PARSER_MISSING_SUPPORT) skip_kw!(:WLIST, Inf, PARSER_MISSING_SUPPORT) - skip_kw!(:WELLSHUT, Inf, PARSER_MISSING_SUPPORT) end end diff --git a/src/InputParser/keywords/schedule.jl b/src/InputParser/keywords/schedule.jl index 623ad36..1f55fcc 100644 --- a/src/InputParser/keywords/schedule.jl +++ b/src/InputParser/keywords/schedule.jl @@ -78,6 +78,21 @@ function parse_keyword!(data, outer_data, units, cfg, f, ::Val{:WELOPEN}) push_and_create!(data, "WELOPEN", welopen) end +function parse_keyword!(data, outer_data, units, cfg, f, ::Val{:WELLSHUT}) + # WELLSHUT is recommended to be replaced with WELOPEN. For simplicity we + # convert WELLSHUT to the corresponding WELOPEN arguments. + parser_message(cfg, outer_data, "WELLSHUT", "Converting WELLSHUT to equivialent WELOPEN inputs.", color = :green) + d = "Default" + defaults = [d] + wells = get_wells(outer_data) + wellshut = parse_defaulted_group_well(f, defaults, wells, 1) + welopen = [] + for w in wellshut + push!(welopen, [w, "SHUT"], -1, -1, -1, -1, -1) + end + push_and_create!(data, "WELOPEN", welopen) +end + function parse_keyword!(data, outer_data, units, cfg, f, ::Val{:WCONPROD}) d = "Default" defaults = [