RATES Quartz -start 1 A0 = parm(1) 2 V = parm(2) 10 rate = (A0 / V) * (m/m0)^0.67 * 10^-13.7 * (1 - SR("Quartz")) 20 save rate * time -endKINETICSQuartz -formula SiO2 -m0 158.8 # initial moles of quartz -parms 23.13 0.16 -time_step 150 second # kinetics computed INCREMENTAL_REACTIONS trueSOLUTION 1# Define the initial solution composition (this will be used for all cells) pH 10.0 pe 4.0 redox pe units mol/L Na 1e-6 Cl 1e-6 Si 1e-6 # 15 cm long reservoir; 60 ml/hr (60 cm3/cm2/hr); TRANSPORT cells 6 # number of cells in the 1-D domain shifts 60 #60 * 0.25 hr = 150 minute simulation run time lengths 0.025 # domain length is 15e-2 and 6 cells #dispersivities 0.01 0.0 # longitudinal and transverse dispersivity (m) dispersivities 0 diffusion_coefficient 0 time_step 150 second # flow at 60 cm3/cm2/hr --> 2.5 mins per cell flow_direction forward boundary_conditions flux flux punch_frequency 6 USER_GRAPH -chart_title "Si conc vs. Time" -axis_titles "Time (s)" "Si (mol/L)" #-axis_scale x_axis 0 900 # 900 s in 15 mins #-initial_solutions true -start 10 graph_x total_time / 60 # total_time is in seconds; divide by 60 for mins 20 graph_y tot("Si")*gfw("SiO2") -endEND
RATES Quartz -start 1 A0 = parm(1) 2 V = parm(2) 10 rate = (A0 / V) * (m/m0)^0.67 * 10^-13.7 * (1 - SR("Quartz")) 20 save rate * time -endKINETICS 1-6Quartz -formula SiO2 -m0 158.8 # initial moles of quartz -parms 23.13 0.16 -time_step 150 second # kinetics computed INCREMENTAL_REACTIONS trueSOLUTION 0 pH 10.0 pe 4.0 temp 25 redox pe units mol/L Na 1e-6 Cl 1e-6 Si 1e-6 SOLUTION 1-6# Define the initial solution composition (this will be used for all cells) pH 10.0 pe 4.0 temp 100 redox pe units mol/L Na 1e-6 Cl 1e-6 Si 1e-6 # 15 cm long reservoir; 60 ml/hr (60 cm3/cm2/hr); TRANSPORT cells 6 # number of cells in the 1-D domain shifts 60 #60 * 0.25 hr = 150 minute simulation run time lengths 0.025 # domain length is 15e-2 and 6 cells #dispersivities 0.01 0.0 # longitudinal and transverse dispersivity (m) dispersivities 0 diffusion_coefficient 0 time_step 150 second # flow at 60 cm3/cm2/hr --> 2.5 mins per cell flow_direction forward boundary_conditions flux flux punch_frequency 6 USER_GRAPH -chart_title "Si conc vs. Time" -axis_titles "Time (s)" "SiO2 (ppm)" #-axis_scale x_axis 0 900 # 900 s in 15 mins #-initial_solutions true -start 10 graph_x total_time / 60 # total_time is in seconds; divide by 60 for mins 20 graph_y tot("Si")*gfw("SiO2")*1000 -endEND