summaryrefslogtreecommitdiff
path: root/1592/CH6/EX6.1/Example_6_1.sce
diff options
context:
space:
mode:
Diffstat (limited to '1592/CH6/EX6.1/Example_6_1.sce')
-rwxr-xr-x1592/CH6/EX6.1/Example_6_1.sce72
1 files changed, 39 insertions, 33 deletions
diff --git a/1592/CH6/EX6.1/Example_6_1.sce b/1592/CH6/EX6.1/Example_6_1.sce
index 6dfef7a58..c9e89c3fb 100755
--- a/1592/CH6/EX6.1/Example_6_1.sce
+++ b/1592/CH6/EX6.1/Example_6_1.sce
@@ -1,33 +1,39 @@
-//Scilab Code for Example 6.1 of Signals and systems by
-//P.Ramakrishna Rao
-//Sampling of signal
-clc;
-clear f n X X_delta w;
-fs=200;
-for f=-200:200
- X(f+201)=5*[delta(f-75)+delta(f+75)];
-end
-figure(1);
-f=-200:200;
-plot2d3(f,X,-2);
-title('X(f)');
-xlabel('---> f');
-w=1;
-n=-1;
- for f=-275:275
- X_delta1(f+276)=fs*5*[delta(f-n*fs-75)+delta(f-n*fs+75)];
- end
-n=n+1;
- for f=-275:275
- X_delta2(f+276)=fs*5*[delta(f-n*fs-75)+delta(f-n*fs+75)];
-end
-n=n+1;
- for f=-275:275
- X_delta3(f+276)=fs*5*[delta(f-n*fs-75)+delta(f-n*fs+75)];
-end
-X_delta=X_delta1+X_delta2+X_delta3;
-figure(2);
-f=-275:275;
-plot2d3(f,X_delta,-2);
-title('X_delta(f) at fs=200');
-xlabel('---> f');
+//Scilab Code for Example 6.1 of Signals and systems by
+//P.Ramakrishna Rao
+//Sampling of signal
+clc;
+clear
+function [y]=delta(t)
+ if t==0
+ y=1
+else y=0
+ end
+endfunction
+fs=200;
+for f=-200:200
+ X(f+201)=5*[delta(f-75)+delta(f+75)];
+end
+figure(1);
+f=-200:200;
+plot2d3(f,X,-2);
+title('X(f)');
+xlabel('---> f');
+w=1;
+n=-1;
+ for f=-275:275
+ X_delta1(f+276)=fs*5*[delta(f-n*fs-75)+delta(f-n*fs+75)];
+ end
+n=n+1;
+ for f=-275:275
+ X_delta2(f+276)=fs*5*[delta(f-n*fs-75)+delta(f-n*fs+75)];
+end
+n=n+1;
+ for f=-275:275
+ X_delta3(f+276)=fs*5*[delta(f-n*fs-75)+delta(f-n*fs+75)];
+end
+X_delta=X_delta1+X_delta2+X_delta3;
+figure(2);
+f=-275:275;
+plot2d3(f,X_delta,-2);
+title('X_delta(f) at fs=200');
+xlabel('---> f'); \ No newline at end of file