Skip to contents

OGS6_gml

OGS6_gml.Rd

Constructor for the OGS6_gml base class

Active bindings

gml_path

Getter for private parameter '.gml_path'

name

Access to private parameter '.name'

points

Access to private parameter '.points'

polylines

Access to private parameter '.polylines'

surfaces

Access to private parameter '.surfaces'

attr_names

Getter for private parameter '.attr_names'

flatten_on_exp

Getter for private parameter '.flatten_on_exp'

Methods

Public methods

Method new()

Creates new OGS6_gml object

Usage

OGS6_gml$new(
  gml_path = NULL,
  name = NULL,
  points = NULL,
  polylines = NULL,
  surfaces = NULL
)

Arguments

gml_path

string: Optional: Path to .gml file

name

string: Geometry name

points

tibble: Must have 3 vectors named 'x', 'y' and 'z', may have optional 'name' vector

polylines

list(list("foo", c(1, 2))):

surfaces

list(list("foo", c(1, 2, 3), c(2, 3, 4)))

Method print()

Overrides default printing behaviour

Usage

OGS6_gml$print()

Method clone()

The objects of this class are cloneable with this method.

Usage

OGS6_gml$clone(deep = FALSE)

Arguments

deep

Whether to make a deep clone.

Examples

OGS6_gml$new(
    name = "cube_1x1x1_geometry",
    points = tibble::tibble(
        x = c(0, 0, 0, 0),
        y = c(0, 0, 1, 1),
        z = c(0, 1, 1, 0),
        name = c("origin", "", "", "")
    ),
    polylines = list(polyline = list("front_left",
                                     c(
                                         pnt = 0, pnt = 1
                                     ))),
    surfaces = list(surface = list(
        name = "left",
        element = c(p1 = 0, p2 = 1, p3 = 2),
        element = c(p1 = 0, p2 = 3, p3 = 2)
    ))
)
#> OGS6_gml
#> path:  
#> name:  cube_1x1x1_geometry
#> 
#> points
#> # A tibble: 4 × 4
#>       x     y     z name    
#>   <dbl> <dbl> <dbl> <chr>   
#> 1     0     0     0 "origin"
#> 2     0     0     1 ""      
#> 3     0     1     1 ""      
#> 4     0     1     0 ""      
#> 
#> polylines
#> $polyline
#> $polyline$name
#> [1] "front_left"
#> 
#> $polyline$<NA>
#> pnt pnt 
#>   0   1 
#> 
#> 
#> 
#> surfaces
#> $surface
#> $surface$name
#> [1] "left"
#> 
#> $surface$element
#> p1 p2 p3 
#>  0  1  2 
#> 
#> $surface$element
#> p1 p2 p3 
#>  0  3  2 
#> 
#>