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

---
 3281/CH2/EX2.26/ex2_26.jpg | Bin 0 -> 18196 bytes
 3281/CH2/EX2.26/ex2_26.sce |  36 ++++++++++++++++++++++++++++++++++++
 2 files changed, 36 insertions(+)
 create mode 100755 3281/CH2/EX2.26/ex2_26.jpg
 create mode 100755 3281/CH2/EX2.26/ex2_26.sce

(limited to '3281/CH2/EX2.26')

diff --git a/3281/CH2/EX2.26/ex2_26.jpg b/3281/CH2/EX2.26/ex2_26.jpg
new file mode 100755
index 000000000..d69cbf8a1
Binary files /dev/null and b/3281/CH2/EX2.26/ex2_26.jpg differ
diff --git a/3281/CH2/EX2.26/ex2_26.sce b/3281/CH2/EX2.26/ex2_26.sce
new file mode 100755
index 000000000..e80e76c76
--- /dev/null
+++ b/3281/CH2/EX2.26/ex2_26.sce
@@ -0,0 +1,36 @@
+//Page Number: 109
+//Example 2.26
+clc;
+//Given
+c=3D+8; //m/s
+a=2.286; //cm
+f=5D+9; //Hz
+er=2.25; 
+tandel=1D-3;
+w=2*%pi*f;
+mu=4D-7;
+sig=5.8D+7; //s/m
+
+lamc=2*a;
+lamm=c/f;//m
+lam=lamm*100;//cm
+
+ermax=(lam/a)^2;
+disp(ermax,'Maximum value of dielectric constant:');
+ermin=(lam/(2*a))^2;
+disp(ermin,'Minimum value of dielectric constant:');
+
+//Guide wavelength
+lam1=lam/sqrt(er);//cm
+lamg=lam1/sqrt(1-(lam1/lamc)^2);
+disp('cm',lamg,'Guide wavelength:');
+
+lamm1=lam1/100;
+ad=(%pi/lamm1)*(tandel/sqrt(1-(lam1/lamc)^2));
+disp('Np/m',ad,'ad:');
+bet=2*%pi/lamg;
+disp('rad/cm',bet,'Beta:');
+vp=w/(bet*100);
+disp('m/s',vp,'Phase velocity:');
+
+
-- 
cgit