PHASESMtg(g) Mtg = Mtg #-analytic 10.44 -7.65e-3 -6669 0 1.014e6 # CH4 solubilities 25 - 100?C log_k -100 T_c 190.6; -P_c 45.4; -Omega 0.008ENDRATESMtg2CH410 k = 1/86400 # 1/day20 rate = k * GAS("Mtg(g)")30 moles = rate * TIME40 SAVE molesSOLUTION 1ENDGAS_PHASE 1Mtg(g) 100CH4(g) 0ENDKINETICSMtg2CH4-formula CH4 +1 Mtg -1-m0 100-time 30*8640ENDINCREMENTAL_REACTIONSENDUSER_GRAPH 1 -headings time CH4(aq) CH4(g) Mtg(g) -axis_titles "Days" "Molality" "Moles in gas phase" -initial_solutions false -connect_simulations true -plot_concentration_vs x -start10 GRAPH_X TOTAL_TIME / 8640020 GRAPH_Y MOL("CH4")30 GRAPH_SY GAS("CH4(g)"), GAS("Mtg(g)") -end -active trueUSE solution 1USE gas_phase 1USE kinetics 1END
PHASESMtg(g) # No aqueous Mtg = Mtg #-analytic 10.44 -7.65e-3 -6669 0 1.014e6 # CH4 solubilities 25 - 100?C log_k -100 T_c 190.6; -P_c 45.4; -Omega 0.008CH4(g) # No gas CH4 = CH4 log_k 100 #-log_k -2.8 #-analytic 10.44 -7.65e-3 -6669 0 1.014e6 # CH4 solubilities 25 - 100?C -T_c 190.6; -P_c 45.4; -Omega 0.008CH4(g)_logk # for logk calculation CH4 = CH4 -log_k -2.8 -analytic 10.44 -7.65e-3 -6669 0 1.014e6 # CH4 solubilities 25 - 100?C -T_c 190.6; -P_c 45.4; -Omega 0.008ENDRATESMtg2CH410 k = 1e-7 # 1/d20 logk = LK_PHASE("CH4(g)_logk")30 sr_calc = ACT("CH4") / (PR_PHI("Mtg(g)") * PR_P("Mtg(g)") * 10^logk)40 rate = k * (1 - sr_calc)50 moles = rate * TIME60 SAVE molesENDSOLUTION 1ENDGAS_PHASE 1Mtg(g) 10ENDKINETICSMtg2CH4-formula CH4 +1 Mtg -1-m0 100-time 20*8640ENDINCREMENTAL_REACTIONSENDUSER_GRAPH 1 -headings time CH4(aq) CH4(g) Mtg(g) -axis_titles "Days" "Molality" "Moles in gas phase" -initial_solutions false -connect_simulations true -plot_concentration_vs x -start10 GRAPH_X TOTAL_TIME / 8640020 GRAPH_Y MOL("CH4")30 GRAPH_SY GAS("CH4(g)"), GAS("Mtg(g)") -end -active trueUSE solution 1USE gas_phase 1USE kinetics 1END