diff options
Diffstat (limited to '3504/CH2/EX2.15')
| -rw-r--r-- | 3504/CH2/EX2.15/Ex2_15.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/3504/CH2/EX2.15/Ex2_15.sce b/3504/CH2/EX2.15/Ex2_15.sce new file mode 100644 index 000000000..757d52b54 --- /dev/null +++ b/3504/CH2/EX2.15/Ex2_15.sce @@ -0,0 +1,13 @@ +//To determine the voltage V_23 of the given network. +clc; +Z=[(1/2)+(1/3) -(1/3) -(1/2);-(1/3) (1/3)+(1/(%i*4)) 0;-(1/2) 0 (1/2)+(1/(%i*2))] +D=det(Z) +Z_2=[(1/2)+(1/3) 1 -(1/2);-(1/3) 0 0;-(1/2) 0 (1/2)+(1/(%i*2))] +D_2=det(Z_2) +Z_3=[(1/2)+(1/3) -(1/3) 1;-(1/3) (1/3)+(1/(%i*4)) 0;-(1/2) 0 0] +D_3=det(Z_3) +V_2=D_2/D +V_3=D_3/D +V_23=V_2-V_3 +//Using Cramer's rule +disp(V_23,'Required voltage in the polar form(V)') |