summaryrefslogtreecommitdiff
path: root/52/CH2/EX2.8.a/Example2_8_a.sce
diff options
context:
space:
mode:
Diffstat (limited to '52/CH2/EX2.8.a/Example2_8_a.sce')
-rwxr-xr-x52/CH2/EX2.8.a/Example2_8_a.sce11
1 files changed, 11 insertions, 0 deletions
diff --git a/52/CH2/EX2.8.a/Example2_8_a.sce b/52/CH2/EX2.8.a/Example2_8_a.sce
new file mode 100755
index 000000000..a7653ac47
--- /dev/null
+++ b/52/CH2/EX2.8.a/Example2_8_a.sce
@@ -0,0 +1,11 @@
+//Example 2.8 (a)
+//MAXIMA SCILAB TOOLBOX REQUIRED FOR THIS PROGRAM
+//Z transform of cos(Wo*n)
+clc;
+syms Wo n z;
+x1=exp(sqrt(-1)*Wo*n);
+X1=symsum(x1*(z^-n),n,0,%inf);
+x2=exp(-sqrt(-1)*Wo*n);
+X2=symsum(x2*(z^-n),n,0,%inf);
+X=(X1+X2)/2;
+disp(X,'X(z)='); \ No newline at end of file