1 files changed, 11 insertions, 0 deletions
diff --git a/25/CH5/EX5.7/5_7.sce b/25/CH5/EX5.7/5_7.sce
new file mode 100755
index 000000000..059e7d614
--- /dev/null
+++ b/25/CH5/EX5.7/5_7.sce
@@ -0,0 +1,11 @@
+// example:-5.7,page no.-238.
+// program to find the admittance matrix for bridge-T network.
+syms Za Z1 Z2 Z3 Y Ya Yb D;
+Za=[Z1+Z2 Z2;Z2 Z1+Z2];
+Yb=[1/Z3 -1/Z3;-1/Z3 1/Z3];
+Y1=1/Z1;Y2=1/Z2;
+Ya=1/Za;
+Y=Ya+Yb;
+D=((Z2+Z1)^2-Z2^2);
+// result
+disp(Y,'admittance matrix for bridge-T network=')
+\ No newline at end of file