diff --git a/R/read_in_vtu.R b/R/read_in_vtu.R index a21b03ddf28a0c55c09046ea54d29f599b79916b..ef0a4f57a83ca1c88e80998edcd5b4fc9e875c5a 100644 --- a/R/read_in_vtu.R +++ b/R/read_in_vtu.R @@ -4,8 +4,9 @@ #'pick_vtu_file -#'@description Lets the user pick a .vtu file and adds it to the specified OGS6 class object -#'@param ogs6_obj A OGS6 class object +#'@description Lets the user pick a .vtu file and adds it to the specified OGS6 +#' class object +#'@param ogs6_obj OGS6: Simulation object #'@export pick_vtu_file <- function(ogs6_obj) { @@ -14,13 +15,13 @@ pick_vtu_file <- function(ogs6_obj) { file <- file.choose() check_file_extension(file, "vtu") - ogs6_obj$add_mesh(r2ogs6_mesh(basename(file))) + ogs6_obj$add_mesh(OGS6_mesh$new(file)) file.copy(file, ogs6_obj$sim_path) } #'read_in_vtu #'@description Wrapper function to read in a whole .vtu file -#'@param ogs6_obj A OGS6 class object +#'@param ogs6_obj OGS6: Simulation object #'@param vtu_path The path to the mesh file that should be read in #'@export read_in_vtu <- function(ogs6_obj, vtu_path) {