From 2ab595e1a486be361a1f007b14c5c5f9848b6841 Mon Sep 17 00:00:00 2001 From: Marina Kreme <amamarinak@gmail.com> Date: Thu, 28 May 2020 00:10:35 +0200 Subject: [PATCH] unnecessary file deletion --- .../compute_ambiguity_function.m | 23 -------------- .../gabormultiplier/gen_gabmul_operator.m | 23 -------------- .../generate_rectangular_mask.m | 31 ------------------- .../gabormultiplier/plot_ambiguity_function.m | 29 ----------------- .../gabormultiplier/product_of2_multipliers.m | 19 ------------ 5 files changed, 125 deletions(-) delete mode 100644 matlab/tfgm/tf_tools/gabormultiplier/compute_ambiguity_function.m delete mode 100644 matlab/tfgm/tf_tools/gabormultiplier/gen_gabmul_operator.m delete mode 100644 matlab/tfgm/tf_tools/gabormultiplier/generate_rectangular_mask.m delete mode 100644 matlab/tfgm/tf_tools/gabormultiplier/plot_ambiguity_function.m delete mode 100644 matlab/tfgm/tf_tools/gabormultiplier/product_of2_multipliers.m diff --git a/matlab/tfgm/tf_tools/gabormultiplier/compute_ambiguity_function.m b/matlab/tfgm/tf_tools/gabormultiplier/compute_ambiguity_function.m deleted file mode 100644 index ea700e1..0000000 --- a/matlab/tfgm/tf_tools/gabormultiplier/compute_ambiguity_function.m +++ /dev/null @@ -1,23 +0,0 @@ -function x = compute_ambiguity_function(x, dgt ,apply_fftshift) -%% x = compute_ambiguity_function(x, dgt ,fftshift_) -% is used to compute the ambiguity function. -% -% Inputs: -% - x : vector -% - dgt : Gabor transform operator -% -apply_fftshift: Boolean -% -%Author: Marina KREME -%% - -switch apply_fftshift - - case 'True' - x = dgt(fftshift(x)); - - case 'False' - x = dgt(x); - otherwise - fprintf('Incorrect value fftshift_\n') - -end \ No newline at end of file diff --git a/matlab/tfgm/tf_tools/gabormultiplier/gen_gabmul_operator.m b/matlab/tfgm/tf_tools/gabormultiplier/gen_gabmul_operator.m deleted file mode 100644 index e34720b..0000000 --- a/matlab/tfgm/tf_tools/gabormultiplier/gen_gabmul_operator.m +++ /dev/null @@ -1,23 +0,0 @@ -function [gabmul_op, varargout] = gen_gabmul_operator(dgt, idgt, mask) -%% GEN_GABMUL_OPERATOR computes a Gabor multiplier -% [gabmul_op, varargout] = gen_gabmul_operator(dgt, idgt, mask) -% -% Inputs: -% - dgt: Gabor transform operator -% - idgt: inverse Gabor transform operator -% - mask: binary known mask -% Output: -% - gabmul_op: gabor multiplier- handle function -% -% Author : A. Marina KREME -% e-mail : ama-marina.kreme@lis-lab.fr/ama-marina.kreme@univ-amu.fr -% Created: 2020-28-01 -%% - - - -gabmul_op = @(x)idgt(mask.*dgt(x)); -varargout{1} = mask; - - -end \ No newline at end of file diff --git a/matlab/tfgm/tf_tools/gabormultiplier/generate_rectangular_mask.m b/matlab/tfgm/tf_tools/gabormultiplier/generate_rectangular_mask.m deleted file mode 100644 index a026f3a..0000000 --- a/matlab/tfgm/tf_tools/gabormultiplier/generate_rectangular_mask.m +++ /dev/null @@ -1,31 +0,0 @@ -function mask = generate_rectangular_mask(nbins, hop, sig_len, t_lim, f_lim) -%% GENERATE_RECTANGULAR_MASK -% This function generates a rectangular mask -% mask = generate_rectangular_mask(nbins, hop, sig_len, t_lim, f_lim) -% Inputs: -% - nbins: numbers of channels (int) -% - hop : length of time shift (int) -% - sig_len: signal length (int) -% - t_lim : time value interval -% - f_lim : frequency value interval -% -% Outputs: -% - mask : mask -% Author : A. Marina KREME -%% - - -M = nbins/2 +1; -N = sig_len/hop; - -if size(f_lim,2)~=2 || size(t_lim,2)~=2 - error("Incorrect value. f_lim or t_lim must be an interval") -end - -mask = zeros(M,N); -f_lim = round(f_lim*size(mask,1)); -t_lim =round(t_lim*size(mask,2)); - -mask(f_lim(1):f_lim(2),t_lim(1):t_lim(2))=1; - -end diff --git a/matlab/tfgm/tf_tools/gabormultiplier/plot_ambiguity_function.m b/matlab/tfgm/tf_tools/gabormultiplier/plot_ambiguity_function.m deleted file mode 100644 index 4601375..0000000 --- a/matlab/tfgm/tf_tools/gabormultiplier/plot_ambiguity_function.m +++ /dev/null @@ -1,29 +0,0 @@ -function plot_ambiguity_function(x, dgt , dgt_params, signal_params, dynrange) - -%% plot_ambiguity_function(x, dgt , dgt_params, signal_params, dynrange) - -% This function compute and plot ambiguity function for a given vector -% -% Inputs: -% - x: signal -% -dgt: Gabor transform operator -% - dgt_params: Signals parameters(sig_len, fs) -% - signal_params: Discrete Gabor Transform parameters(hop, nbins,win, ect..) -% - dynrange : dynamic range (optional) -% -% Author: Marina KREME -%% - - - -if nargin==4 - dynrange = 100; -end - -apply_fftshift ='True'; - -x = compute_ambiguity_function(x, dgt ,apply_fftshift); -plotdgtreal(x, dgt_params.hop, dgt_params.nbins, signal_params.fs,'dynrange', dynrange) - - -end diff --git a/matlab/tfgm/tf_tools/gabormultiplier/product_of2_multipliers.m b/matlab/tfgm/tf_tools/gabormultiplier/product_of2_multipliers.m deleted file mode 100644 index 49c49eb..0000000 --- a/matlab/tfgm/tf_tools/gabormultiplier/product_of2_multipliers.m +++ /dev/null @@ -1,19 +0,0 @@ -function mul1mul2= product_of2_multipliers(dgt, idgt, mask1, mask2) -% mul1mul2= product_of2_multipliers(direct_stft, adjoint_stft, mask1, mask2) -% -% This function generates the product of two multipliers -% associated with two masks. -% -% Inputs: -% - dgt: short-time Fourier transfrom operator -% - idgt: inverse short-time Fourier transfrom operator -% - mask1, mask2: binary known mask -% Output: -% - mul1mul2, mul2mul1: product of two gabor multipliers- handle function -% - - -mul1mul2 = @(x)idgt(mask1.*dgt(idgt(mask2.*dgt(x)))); - - -end \ No newline at end of file -- GitLab