blob: dd9d949789bc2e0c6df0d4dd1b11f625125b439d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
//Chapter 13 Thermodynamics Entropy and Free Energy
clc;
clear;
//Initialisation of Variables
F= 18430 //cal
F1= -31350 //cal
F2= 26224 //cal
R= 1.99 //cal/mole K
T= 25 //C
//CALCULATIONS
F3= F+F1+F2
Ksp= 10**(-F3/(R*(273+T)*2.303))
//RESULTS
mprintf("Solubility product = %.2e",Ksp)
|