dw_temp = dw * EXP(dw_t/TK - dw_t/298.15) * viscos_0_25 / VISCOS
SOLUTION-temp 25Na 1Cl 1REACTION_TEMPERATURE10 20 30 40 50USER_PRINT10 REM Calculation of temperature dependence of Na+ diffusion coefficient20 dw = 1.33e-9 # SOLUTION_SPECIES30 dw_t = 122 # SOLUTION_SPECIES40 viscos_0_25 = 0.890023918294650 dw_temp = dw * EXP(dw_t/TK - dw_t/298.15) * viscos_0_25 / VISCOS60 PRINT "DIFF_C(Na+): ", DIFF_C("Na+")70 PRINT "Dw(TK): ", dw_tempEND