From 8627cdf624c5b3ec8a5e372f7a6ff8e198200fca Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Olav=20M=C3=B8yner?= <olav.moyner@gmail.com>
Date: Mon, 19 Feb 2024 11:17:52 +0100
Subject: [PATCH] Add conductivity kw

---
 src/InputParser/keywords/grid.jl | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/src/InputParser/keywords/grid.jl b/src/InputParser/keywords/grid.jl
index c6f002a..5421341 100644
--- a/src/InputParser/keywords/grid.jl
+++ b/src/InputParser/keywords/grid.jl
@@ -146,6 +146,17 @@ function parse_keyword!(data, outer_data, units, cfg, f, v::Union{
     parse_and_set_grid_data!(data, outer_data, units, cfg, f, k, unit = :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)
+    k = unpack_val(v)
+    parse_and_set_grid_data!(data, outer_data, units, cfg, f, k, unit = unit_type(k))
+end
+
+function unit_type(::THERMAL_CONDUCTIVITY_TYPE)
+    return :rock_conductivity
+end
+
 function parse_keyword!(data, outer_data, units, cfg, f, v::Val{:MULTPV})
     k = unpack_val(v)
     parse_and_set_grid_data!(data, outer_data, units, cfg, f, k)