diff options
Diffstat (limited to 'TIPE_2007/Octave/Multiplication.m')
| -rw-r--r-- | TIPE_2007/Octave/Multiplication.m | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/TIPE_2007/Octave/Multiplication.m b/TIPE_2007/Octave/Multiplication.m deleted file mode 100644 index eb53abc..0000000 --- a/TIPE_2007/Octave/Multiplication.m +++ /dev/null @@ -1,22 +0,0 @@ -function[R]=Multiplication(P,Q) - -n=length(P); -N=2*n; -A=zeros(1,N); -B=zeros(1,N); -R=zeros(1,N); - -for i=1:n - A(i)=P(i); - B(i)=Q(i); -end - -%On calcule les transformées de chaque élément. -A=TFDB(A); -B=TFDB(B); -%On effectue les produits -for i=1:N - R(i)=A(i)*B(i); -end -R=TFDIB(R); -endfunction |