Helper Function: Read Meta General

Usage

read_meta_general(content_general)

Arguments

content_general: lines with content general (see example)

Value

tibble with columns description, modelstart_datetime and unit L,T,M

Examples

path_tlevel <- system.file("extdata/model/test/T_LEVEL.out", package = "kwb.hydrus1d")
content <- readLines(path_tlevel)
content_general <- content[3:5]
cat(content_general)
#>  Flextreat Hydraulic Model                                                 Date:  30. 6.2022    Time:  12:49:10  Units: L = cm   , T = days , M = mmol 
read_meta_general(content_general)
#> # A tibble: 1 × 5
#>   description               modelstart_datetime unit_L unit_T unit_M
#>   <chr>                     <chr>               <chr>  <chr>  <chr> 
#> 1 Flextreat Hydraulic Model 30.6.2022 12:49:10  cm     days   mmol