TITLE Cleaning water from benzene pollution by air strippingSOLUTION_MASTER_SPECIES#element species alk gfw_formula element_gfwBenzene Benzene 0.0 C6H6 78.115SOLUTION_SPECIESBenzene = Benzene log_k 0 delta_h 0 kcalPHASESBenzene(g) Benzene = Benzene log_k -2.727 # log(K_Henry in mol/L/Atm) delta_h 8.097 kcal T_c 288.85; -P_c 48.3; -Omega 0.212ENDGAS_PHASE 1 -pressure 1 # external pressure at the top of the colomn? -fixed_volume -volume 0.1 # LBenzene(g) 0ENDUSER_GRAPH 1 -headings vol Dissolved_benzene Standard Gas_benzene -axis_titles "Liter gas per liter of water" "Dissolved Benzene, mg/L" "Gas-phase Benzene, moles" -axis_scale y_axis auto auto auto auto log -axis_scale sy_axis auto auto auto auto log -initial_solutions true -connect_simulations true -plot_concentration_vs x -start10 PUT(GET(1) + (GAS("Benzene(g)") > 0) * 0.1, 1)20 GRAPH_X GET(1)30 GRAPH_Y TOT("Benzene")*GFW("Benzene")*1000, 0.00540 GRAPH_SY GAS("Benzene(g)") -endENDSOLUTION 1 Water polluted with benzeneunits mmol/kgwpH 7 chargetemp 25Benzene 1 # 78.1 mg/kgw (at the standard for drinking water <0.005 mg/L)water 1 # kgENDUSE SOLUTION 1USE GAS_PHASE 1SAVE solution 1 ENDUSE SOLUTION 1USE GAS_PHASE 1SAVE solution 1 ENDUSE SOLUTION 1USE GAS_PHASE 1SAVE solution 1 ENDUSE SOLUTION 1USE GAS_PHASE 1SAVE solution 1 ENDUSE SOLUTION 1USE GAS_PHASE 1SAVE solution 1 ENDUSE SOLUTION 1USE GAS_PHASE 1SAVE solution 1 ENDUSE SOLUTION 1USE GAS_PHASE 1SAVE solution 1 ENDUSE SOLUTION 1USE GAS_PHASE 1SAVE solution 1 ENDUSE SOLUTION 1USE GAS_PHASE 1SAVE solution 1 ENDUSE SOLUTION 1USE GAS_PHASE 1SAVE solution 1 ENDUSE SOLUTION 1USE GAS_PHASE 1SAVE solution 1 END
10 PUT(GET(1) + (GAS("Benzene(g)") > 0) * 0.1, 1)
USE solution 1USE gas_phase 1SAVE solution 1SAVE gas_phase 1