From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 83/CH2/EX2.6/example_2_6.sce | 13 +++++++++++++
 1 file changed, 13 insertions(+)
 create mode 100755 83/CH2/EX2.6/example_2_6.sce

(limited to '83/CH2/EX2.6/example_2_6.sce')

diff --git a/83/CH2/EX2.6/example_2_6.sce b/83/CH2/EX2.6/example_2_6.sce
new file mode 100755
index 000000000..8ec5b5006
--- /dev/null
+++ b/83/CH2/EX2.6/example_2_6.sce
@@ -0,0 +1,13 @@
+//Chapter 2
+//Example 2.6
+//page 65
+//To find mutual inductance between power line and telephone line and voltage induced in telephone line
+
+clear;clc;
+D1=sqrt(1.1*1.1+2*2); //from figure 2.14
+D2=sqrt(1.9*1.9+2*2);  //from figure 2.14
+Mpt=0.921*log10(D2/D1);  //mutual inductance
+Vt=abs(%i*2*%pi*50*Mpt*10^(-3)*100);//when 100A is flowing in the power lines
+
+printf("\n\nMutual inductance between power line and telephone line = %f mH/km\n\n",Mpt);
+printf("\n\nVoltage induced in the telephone circuit = %.3f V/km\n\n",Vt);
\ No newline at end of file
-- 
cgit