summaryrefslogtreecommitdiff
path: root/macros/rceps.sci
diff options
context:
space:
mode:
Diffstat (limited to 'macros/rceps.sci')
-rw-r--r--macros/rceps.sci38
1 files changed, 19 insertions, 19 deletions
diff --git a/macros/rceps.sci b/macros/rceps.sci
index 831611f..48b2b37 100644
--- a/macros/rceps.sci
+++ b/macros/rceps.sci
@@ -1,23 +1,23 @@
- /*Description
- Real cepstrum and minimum-phase reconstruction
- If called with two output arguments,
- the minimum phase reconstruction of the signal x is returned in ym.Calling Sequence
- [y,ym] = rceps(x)
- Parameters
- x : A vector or a Matirx
- y : Real cepstrum
- ym : Minimum-phase reconstruction
- Dependencies fft1 , ifft1
- Example:
- // create a 45 Hz sine wave sampled at 100 Hz.
- t = 0:0.01:1.27;
- s1 = sin(2*%pi*45*t);
- s2 = s1 + 0.5*[zeros(1,20) s1(1:108)]; //Add an echo of the signal, with half the amplitude, 0.2 seconds after the beginning of the signal.
- c = rceps(s2); // real cepstrum of signal
- plot(t,c)
-*/
function [y, xm]= rceps(x)
- if(argn(2)~= 1 )
+// Description
+// Real cepstrum and minimum-phase reconstruction
+// If called with two output arguments,
+// the minimum phase reconstruction of the signal x is returned in ym.Calling Sequence
+// [y,ym] = rceps(x)
+// Parameters
+// x : A vector or a Matirx
+// y : Real cepstrum
+// ym : Minimum-phase reconstruction
+// Dependencies fft1 , ifft1
+// Example:
+// // create a 45 Hz sine wave sampled at 100 Hz.
+// t = 0:0.01:1.27;
+// s1 = sin(2*%pi*45*t);
+// s2 = s1 + 0.5*[zeros(1,20) s1(1:108)]; //Add an echo of the signal, with half the amplitude, 0.2 seconds after the beginning of the signal.
+// c = rceps(s2); // real cepstrum of signal
+// plot(t,c)
+
+ if(argn(2)~= 1 )
error("Wrong number of Input Arguments");
end
if(argn(1)>2)