water <- define_water(ph = 4, temp = 25, alk = 5) %>%
decarbonate_ph(co2_removed = .95)
example_df <- water_df %>%
define_water_chain() %>%
decarbonate_ph_chain(input_water = "defined_water", output_water = "decarb", co2_removed = .95)
Run the code above in your browser using DataLab