diff options
Diffstat (limited to '29/CH4/EX4.3.1')
-rwxr-xr-x | 29/CH4/EX4.3.1/exa4_3_1.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/29/CH4/EX4.3.1/exa4_3_1.sce b/29/CH4/EX4.3.1/exa4_3_1.sce new file mode 100755 index 000000000..48b482254 --- /dev/null +++ b/29/CH4/EX4.3.1/exa4_3_1.sce @@ -0,0 +1,16 @@ +//Caption:overall_transmittance
+// example 4.3.1
+//page 63
+syms G1 G2 H1;
+// forward path denoted by P1,P2 and so on and loop by L1,L2 and so on
+//path factor by D1,D2 and so on and graph determinant by D
+L1=-G1*H1;
+L2=-G2*H1;
+P1=G1;
+P2=G2;
+D1=1;
+D2=1;
+D=1-(L1+L2);
+Y=(P1*D1+P2*D2)/D;
+Y=simple(Y)
+disp(Y,"C(s)/R(s)=")
\ No newline at end of file |