diff --git a/src/InputParser/keywords/grid.jl b/src/InputParser/keywords/grid.jl index bcc7023..763c4a2 100644 --- a/src/InputParser/keywords/grid.jl +++ b/src/InputParser/keywords/grid.jl @@ -149,15 +149,17 @@ function parse_keyword!(data, outer_data, units, cfg, f, v::Val{:MULTREGT}) data["MULTREGT"] = mreg end -function parse_keyword!(data, outer_data, units, cfg, f, v::Union{ - Val{:MULTX}, Val{:MULTY}, Val{:MULTZ}, - Val{Symbol("MULTX-")}, Val{Symbol("MULTY-")}, Val{Symbol("MULTZ-")} - } - ) +const MULTXYZ_TYPE = Union{Val{:MULTX}, Val{:MULTY}, Val{:MULTZ},Val{Symbol("MULTX-")}, Val{Symbol("MULTY-")}, Val{Symbol("MULTZ-")}} + +function parse_keyword!(data, outer_data, units, cfg, f, v::MULTXYZ_TYPE) k = unpack_val(v) parse_and_set_grid_data!(data, outer_data, units, cfg, f, k, unit = :id, default = 1.0) end +function unit_type(::MULTXYZ_TYPE) + return :id +end + const THERMAL_CONDUCTIVITY_TYPE = Union{Val{:THCROCK}, Val{:THCWATER}, Val{:THCGAS}, Val{:THCSOLID}, Val{:THCAVE}} function parse_keyword!(data, outer_data, units, cfg, f, v::THERMAL_CONDUCTIVITY_TYPE) @@ -198,6 +200,10 @@ function parse_keyword!(data, outer_data, units, cfg, f, v::REGION_TYPE) parse_and_set_grid_data!(data, outer_data, units, cfg, f, k, T = Int) end +function unit_type(::REGION_TYPE) + return :id +end + function parse_keyword!(data, outer_data, units, cfg, f, ::Val{:PORO}) parse_and_set_grid_data!(data, outer_data, units, cfg, f, :PORO) end diff --git a/src/InputParser/keywords/props.jl b/src/InputParser/keywords/props.jl index 4c1fa0a..e887656 100644 --- a/src/InputParser/keywords/props.jl +++ b/src/InputParser/keywords/props.jl @@ -390,3 +390,13 @@ function parse_keyword!(data, outer_data, units, cfg, f, ::Val{:AQUCT}) parser_message(cfg, outer_data, "AQUCT", PARSER_MISSING_SUPPORT) end + +function parse_keyword!(data, outer_data, units, cfg, f, v::Val{:SWATINIT}) + k = unpack_val(v) + parser_message(cfg, outer_data, "SWATINIT", PARSER_JUTULDARCY_MISSING_SUPPORT) + parse_and_set_grid_data!(data, outer_data, units, cfg, f, k, unit = unit_type(k)) +end + +function unit_type(::Val{:SWATINIT}) + return :id +end