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

---
 25/CH2/EX2.4/2_4.sce | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)
 create mode 100755 25/CH2/EX2.4/2_4.sce

(limited to '25/CH2/EX2.4/2_4.sce')

diff --git a/25/CH2/EX2.4/2_4.sce b/25/CH2/EX2.4/2_4.sce
new file mode 100755
index 000000000..eba66e05c
--- /dev/null
+++ b/25/CH2/EX2.4/2_4.sce
@@ -0,0 +1,21 @@
+// example:-2.4,page no.-34.
+// program to show that a circularly polarized plane wave can be decomposed in to RHCP and LHCP.
+A=sym('A');
+B=sym('B');
+Eo=sym('Eo');
+x=sym('x');
+y=sym('y');
+Ko=sym('Ko');
+z=sym('z');
+E=Eo*(x+2*y)*exp(-%i*Ko*z);   // given
+// can be written as:=>E=A*(x-y)*exp(-%i*Ko*z)+B*(x+y)*exp(-%i*Ko*z),so
+p=[1 1;-%i/2 %i/2];
+q=[A;B];
+r=[1;1];
+p*q==Eo*r;
+q=inv(p)*Eo*r;
+//result
+disp('value of A and B will be=')
+disp(q)
+disp(q(1,1)*(x-y)*exp(-%i*Ko*z)+q(2,1)*(x+y)*exp(-%i*Ko*z),'E=')
+//conclusion:-any linearly polarized wave can be decomposed in to two circularly polarized waves.
\ No newline at end of file
-- 
cgit