diff options
Diffstat (limited to '51/CH11')
-rwxr-xr-x | 51/CH11/EX11.2/11_2.sce | 23 |
1 files changed, 12 insertions, 11 deletions
diff --git a/51/CH11/EX11.2/11_2.sce b/51/CH11/EX11.2/11_2.sce index bf0f47b03..a3e24ce42 100755 --- a/51/CH11/EX11.2/11_2.sce +++ b/51/CH11/EX11.2/11_2.sce @@ -1,11 +1,12 @@ -clc;
-clear;
-D=4;//in
-T1=540;//degree R
-p1=100;//psia
-T2=453;//degree R
-p2=18.4;//psia
-
-dratio=(p1/T1)*(T2/p2);
-sdif=(cv*(log(T2/T1)))+(R*(log(dratio)));//ft*lb/lbm*(degree R); change in entropy
-disp("ft*lb/lbm*(degree R)",sdif,"The change in entropy between (1) and (2)=")
+clc; +clear; +D=4;//in +T1=540;//degree R +p1=100;//psia +T2=453;//degree R +p2=18.4;//psia +cv = 133; +R =53.3; +dratio=(p1/T1)*(T2/p2); +sdif=(cv*(log(T2/T1)))+(R*(log(dratio)));//ft*lb/lbm*(degree R); change in entropy +disp("ft*lb/lbm*(degree R)",sdif,"The change in entropy between (1) and (2)=")
\ No newline at end of file |