1 files changed, 32 insertions, 0 deletions
diff --git a/1628/CH3/EX3.16/Ex3_16.sce b/1628/CH3/EX3.16/Ex3_16.sce
new file mode 100755
index 000000000..2e4360618
--- /dev/null
+++ b/1628/CH3/EX3.16/Ex3_16.sce
@@ -0,0 +1,32 @@
+
+                             // Examle 3.16
+
+              // From the diagram (3.30) Apply KVL to all the 3 loop.
+              // Loop-1    5Ix+0Iy-10I1-= 100..............(i
+              // Loop-2    7Ix+ 2Iy-2I1= -50...............(ii
+              // Loop-3    3Ix-5Iy-3I1= -50................(iii
+              
+              // By using matrix form will get A*X = B  formate 
+              
+delta=[5 0 10 ; 7 2 -2 ; 3 -5 -3 ];             // value of A
+d=det(delta);                                   // Determinant of A
+
+delta1=[100 0 10 ; -50 2 -2 ; -50 -5 -3 ];      // value of A1 (when 1st colomn is replace by B) 
+d1=det(delta1);                                 // Determinant of A1
+
+delta2=[5 100 10 ; 7 -50 -2 ; 3 -50 -3 ];       // value of A2 (when 2nd colomn is replace by B)
+d2=det(delta2);                                 // Determinant of A2
+
+Ix=d1/d;                                        // Current (Ix)
+disp(' The value of Current (Ix)  = '+string(Ix)+' Amp');
+
+Iy=d2/d;                                        // Current (Iy)
+disp(' The value of Current (Iy) = '+string(Iy)+' Amp');
+
+
+
+
+       //   p 71     3.16
+
+
+