diff options
Diffstat (limited to '671/CH7/EX7.16/7_16.sce')
| -rwxr-xr-x | 671/CH7/EX7.16/7_16.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/671/CH7/EX7.16/7_16.sce b/671/CH7/EX7.16/7_16.sce new file mode 100755 index 000000000..633449c76 --- /dev/null +++ b/671/CH7/EX7.16/7_16.sce @@ -0,0 +1,14 @@ +Pl1=1500
+f1=50
+Pl2=3000
+f2=75
+
+Y=[1,f1;1,f2]
+X=inv(Y)*[Pl1/f1;Pl2/f2]
+
+Ph1=X(1)*f1
+Pe1=X(2)*f1*f1
+Ph2=X(1)*f2
+Pe2=X(2)*f2*f2
+
+disp(Ph1,Pe1,Ph2,Pe2)
\ No newline at end of file |