1 files changed, 14 insertions, 0 deletions
diff --git a/3769/CH12/EX12.23/Ex12_23.sce b/3769/CH12/EX12.23/Ex12_23.sce
new file mode 100644
index 000000000..15970b722
--- /dev/null
+++ b/3769/CH12/EX12.23/Ex12_23.sce
@@ -0,0 +1,14 @@
+clear
+//Given
+N2=1000
+I1=5.0                          //A
+a2=0.4*10**-4                  //Wb
+dl=-24                             //A
+dt=0.02                              //S
+
+//Calculation
+M=(N2*a2)/I1
+eb=(-M*dl)/dt
+
+//Result
+printf("\n (i) Mutual induction between A and B is %0.3f  H", M)