summaryrefslogtreecommitdiff
path: root/25/CH2/EX2.4/2_4.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /25/CH2/EX2.4/2_4.sce
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 '25/CH2/EX2.4/2_4.sce')
-rwxr-xr-x25/CH2/EX2.4/2_4.sce21
1 files changed, 21 insertions, 0 deletions
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