summaryrefslogtreecommitdiff
path: root/1697/CH3/EX3.4
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1697/CH3/EX3.4
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1697/CH3/EX3.4')
-rwxr-xr-x1697/CH3/EX3.4/Exa3_4.sce23
1 files changed, 23 insertions, 0 deletions
diff --git a/1697/CH3/EX3.4/Exa3_4.sce b/1697/CH3/EX3.4/Exa3_4.sce
new file mode 100755
index 000000000..b4a0e5672
--- /dev/null
+++ b/1697/CH3/EX3.4/Exa3_4.sce
@@ -0,0 +1,23 @@
+//Exa 3.4
+clc;
+clear;
+close;
+//given data :
+r=1;//in Km
+r=r*10^3;//in m
+I=0.5;//in A
+//For theta = 45 degree
+theta=45 ;//in degree
+E=(60*I/r)*((cos(%pi*cos(theta*%pi/180)/2))/sin(theta*%pi/180));
+disp(E*10^3,"E-Field for 45 degree angle in mV/m :");
+ETA_o=120*%pi;//constant
+H=E/ETA_o;//in A/m
+disp(H*10^3,"H-Field for 45 degree angle in mV/m :");
+
+//For theta = 90 degree
+theta=90 ;//in degree
+E=(60*I/r)*((cos(%pi*cos(theta*%pi/180)/2))/sin(theta*%pi/180));
+disp(E*10^3,"E-Field for 90 degree angle in mV/m :");
+ETA_o=120*%pi;//constant
+H=E/ETA_o;//in A/m
+disp(H*10^3,"H-Field for 90 degree angle in mV/m :"); \ No newline at end of file