initial commit / add all books

7 files changed, 65 insertions, 0 deletions

diff --git a/42/CH10/EX10.1/sadiku_10_1.sce b/42/CH10/EX10.1/sadiku_10_1.sce
new file mode 100755
index 000000000..9d22d6b91
--- /dev/null
+++ b/42/CH10/EX10.1/sadiku_10_1.sce
@@ -0,0 +1,22 @@
+clear;

+clc;

+format('v',6);

+disp('Direction of wave propagation is -ax');

+w=10^8,c=3*10^8;

+B=w/c;

+disp(B,'Value of beta=');

+T=2*%pi/w;

+disp(T/2*10^9,'Time taken to travel half of wave length in nS= ');

+t=0

+x=-2*%pi:%pi/16:2*%pi;

+Ey=50*cos(10^8 *t +B*x);

+subplot(2,2,1)

+plot(x,Ey);

+t=T/4;

+Ey=50*cos(10^8 *t +B*x);

+subplot(2,2,2)

+plot(x,Ey);

+t=T/2;

+Ey=50*cos(10^8 *t +B*x);

+subplot(2,2,3)

+plot(x,Ey);
\ No newline at end of file
diff --git a/42/CH10/EX10.10/sadiku_10_10.sce b/42/CH10/EX10.10/sadiku_10_10.sce
new file mode 100755
index 000000000..0951436be
--- /dev/null
+++ b/42/CH10/EX10.10/sadiku_10_10.sce
@@ -0,0 +1,8 @@
+clear;

+clc;

+kx=0,ky=.866,kz=.5,Eo=10^-9 /(36*%pi),Uo=4*%pi*10^-7;

+k=sqrt(kx*kx+ky*ky+kz*kz);

+w=k/(sqrt(Uo*Eo));

+disp(w*10^-6,'w im Mrad/sec');

+l=2*%pi/k;

+disp(l,'lamda = ')

diff --git a/42/CH10/EX10.2/sadiku_10_2.sce b/42/CH10/EX10.2/sadiku_10_2.sce
new file mode 100755
index 000000000..fe47ad353
--- /dev/null
+++ b/42/CH10/EX10.2/sadiku_10_2.sce
@@ -0,0 +1,9 @@
+clear;

+clc;

+Ho=10,n=200*%e^(%i*%pi/6),P=atan(3^.5),b=.5,e=10^-9 /(36*%pi);

+Eo=n*Ho;

+disp('a=w*sqrt(u*e/2*(1+(c/(w*e)^2)^.5)-1)');

+disp('b=w*sqrt(u*e/2*(1+(c/(w*e)^2)^.5)+1)');

+a=b*((sqrt(((1+(tan(P))^2)^.5)-1))/(sqrt(((1+(tan(P))^2)^.5)+1)));

+disp(a,'Value of alpha=');

+disp(1/a,'Skin depth = ')
\ No newline at end of file
diff --git a/42/CH10/EX10.3/sadiku_10_3.sce b/42/CH10/EX10.3/sadiku_10_3.sce
new file mode 100755
index 000000000..3e063eb1b
--- /dev/null
+++ b/42/CH10/EX10.3/sadiku_10_3.sce
@@ -0,0 +1,7 @@
+clear;

+clc;

+B=1,n=60*%pi,Ur=1,Eo=10^-9 /(36*%pi),Uo=4*%pi*10^-7;

+Er=Uo*Ur/(n^2 *Eo);

+disp(Er,'Er =');

+w=B/sqrt(Eo*Er*Uo*Ur);

+disp(w*10^-6, 'w in Mrad/sec');
\ No newline at end of file
diff --git a/42/CH10/EX10.4/sadiku_10_4.sce b/42/CH10/EX10.4/sadiku_10_4.sce
new file mode 100755
index 000000000..d1844c6df
--- /dev/null
+++ b/42/CH10/EX10.4/sadiku_10_4.sce
@@ -0,0 +1,5 @@
+clear;

+clc;

+c=3,w=10^8,Ur=20,Eo=10^-9 /(36*%pi),Er=1,Uo=4*%pi*10^-7;

+a=sqrt(Uo*Ur*w*c/2);

+disp(a,'alpha = beta =');//as c/w*E>>1

diff --git a/42/CH10/EX10.6/sadiku_10_6.sce b/42/CH10/EX10.6/sadiku_10_6.sce
new file mode 100755
index 000000000..e7fc6ab92
--- /dev/null
+++ b/42/CH10/EX10.6/sadiku_10_6.sce
@@ -0,0 +1,7 @@
+clear;

+clc;

+a=2*10^-3,b=6*10^-3,t=10^-3,l=2,c=5.8*10^7;

+Ri=l/(c*%pi*a*a);

+Ro=l/(c*%pi*((b+t)^2-b^2));

+Rdc=Ro+Ri;

+disp(Rdc*10^3,'Resistance in mOhm');
\ No newline at end of file
diff --git a/42/CH10/EX10.7/sadiku_10_7.sce b/42/CH10/EX10.7/sadiku_10_7.sce
new file mode 100755
index 000000000..1bcfe4b6f
--- /dev/null
+++ b/42/CH10/EX10.7/sadiku_10_7.sce
@@ -0,0 +1,7 @@
+clear;

+clc;

+a=0,b=.8,Eo=10^-9 /(36*%pi),Uo=4*%pi*10^-7,Ur=1,w=2*%pi*10^7;

+Er=b^2/(Uo*Eo*w*w);

+disp(Er);

+n=sqrt(Uo/(Eo*Er));

+disp(n);
\ No newline at end of file