From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001 From: priyanka Date: Wed, 24 Jun 2015 15:03:17 +0530 Subject: initial commit / add all books --- 944/CH5/EX5.17/example5_17_TACC.sce | 28 ++++++++++++++++++++++++++++ 1 file changed, 28 insertions(+) create mode 100755 944/CH5/EX5.17/example5_17_TACC.sce (limited to '944/CH5/EX5.17') diff --git a/944/CH5/EX5.17/example5_17_TACC.sce b/944/CH5/EX5.17/example5_17_TACC.sce new file mode 100755 index 000000000..0944668df --- /dev/null +++ b/944/CH5/EX5.17/example5_17_TACC.sce @@ -0,0 +1,28 @@ +//example 5.17 + +clear; +clc; + +disp("C3H6(g)+4.5O2(g)-->3CO2(g)+3H2O(l)"); +//Given: +S=-339.23;//standard change in entropy [J/K] +T=298;//temperature[K] +Hf1=20.42;//enthalpy of formation of C3H6(g)[J] +Hf2=-393.51;//enthalpy of formation of CO2(g)[J] +Hf3=-285.83;//enthalpy of formation of H2O(l)[J] +dn=3-4.5-1;//change in no. of moles +R=8.314;//Universal gas constant[J/K/mol] + +//To find the Helmholts free energy and Gibbs free energy +H=3*Hf2+3*Hf3-Hf1;//Enthalpy of the reaction[J] +U=H-dn*R*0.001*T;//Change in internal energy of the reaction[J] +A=U-T*S*0.001;//Helmholts free energy change[J] +G=A+dn*R*0.001*T;//Gibbs free energy change[J] +printf("The change in Helmholts free energy is %f J",A); +printf("\nThe change in Gibbs free energy is %f J ",G); + + + + + + -- cgit