SOLUTION 0 temp 25 units mmol/kgw pH 7.0 Cr(6) 0.385 Na 10.0 charge Cl 10.0 SOLUTION 1-15 temp 25 units mmol/kgw pH 7.0EQUILIBRIUM_PHASES 1-15 CO2(g) -3.5 Calcite 0.0ENDRATESZVI_Corrosion-start20 f1 = 0.130 PUT(f1,1)40 fC = (PHASE_VM("Calcite")*EQUI("Calcite"))/SOLN_VOL50 SA = 65*EXP(-1*fC) 75 PUT(SA, 2)80 rate = f1 * SA * M 85 PUT(rate, 3)90 moles = rate * TIME200 SAVE moles-endCr_Reduction-start10 Cr_six = TOT("Cr(6)")20 if (Cr_six <= 0) then goto 20030 Crk = 1e-635 PUT(Crk, 4)40 K = 1e-550 f1 = Cr_six55 S = GET(2)60 rate = Crk * S * (f1/(K + f1))65 PUT(rate, 5)70 moles = rate * TIME200 SAVE moles-endKINETICS 1-15Cr_Reduction -formula Fe+3 1.0 H2O 4.0 Cr+3 1.0 CrO4-2 -1.0 H+ -8.0 Fe -1.0 -tol 1e-30 -bad_step_max 1000ZVI_Corrosion -m0 29.10 -formula Fe 1.0 -tol 1e-30 -bad_step_max 1000 ENDTRANSPORT -cells 15 -length 0.01 #meters -shifts 2310 -time_step 561.2 #seconds -flow_direction forward -boundary_condition flux flux -dispersivity 0.0014 -correct_disp true -diffusion_coef 0.595e-9 #####diffusion coeff for Cr3+ cation is used### -punch_cells 1-15 -punch_frequency 1 -print_cells 1-15 -print_frequency 1SELECTED_OUTPUT -file HOPE_1.sel -reset trueUSER_PUNCH -headings ZVI_Corr_k ZVI_Corr_SA ZVI_Corr_rate Cr_reduction_k Cr_reduction_rate Na_Conc Cl_Conc Cr(VI)_Conc Cr(III)_Conc Fe(II)_Conc Fe(III)_Conc Fe_Conc SI_Aragonite SI_Calcite SI_Siderite SI_Ferrihydrite KIN(Cr_reduction) KIN(ZVI_Corrosion)10 ZVI_Corr_k = GET(1)20 ZVI_Corr_SA = GET(2)30 ZVI_Corr_rate = GET(3)40 Cr_reduction_k = GET(4)50 Cr_reduction_rate = GET(5)60 PUNCH ZVI_Corr_k, ZVI_Corr_SA, ZVI_Corr_rate, Cr_reduction_k, Cr_reduction_rate, TOT("Na"), TOT("Cl"), TOT("Cr(6)"), TOT("Crtri"), TOT("Fe(2)"), TOT("Fe(3)"), TOT("Fe"), SI("Aragonite"), SI("Calcite"), SI("Siderite"), SI("Ferrihydrite"), KIN("Cr_Reduction"), KIN("ZVI_Corrosion")END