library(tidyverse)
source("R/read_rcl.R")
rcl <- read_rcl("data/test.rcl")