blob: f91e006b1f05c077953bf2566620691771b843a1 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
//Caption:overall_transmittance
// example 4.3.2
//page 64
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
P1=G1;
P2=G2;
L1=-G1*H1;
D1=1;
D2=1;
D=1-(L1);
Y=(P1*D1+P2*D2)/D;
Y=simple(Y);
disp(Y,"C(s)/R(s)=")
|
