## ---- include = FALSE---------------------------------------------------------
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

## ---- setup-------------------------------------------------------------------
library(dynatop)
data("Swindale")
model <- Swindale$model

## ----model_parts--------------------------------------------------------------
names(model)

## ----hillslope_parts----------------------------------------------------------
head(model$hillslope)

## ----channel_parts------------------------------------------------------------
head(model$channel)

## ----gauge--------------------------------------------------------------------
model$gauge

## ----point_inflow-------------------------------------------------------------
model$point_inflow

## ----diffuse_inflow-----------------------------------------------------------
model$diffuse_inflow

## ----flow_direction-----------------------------------------------------------
head(model$flow_direction)

## ----precip_input-------------------------------------------------------------
head(model$precip_input)

## ----pet_input----------------------------------------------------------------
head(model$pet_input)