% archivo: falsopositivo.m
%
% Script con todo el proceso del análisis de falso positivo
%

clear all;

%Proceso completo del análisis de falso positivo

Fs=44100/8;        %frecuencia de muestreo
alpha=0.35;        %umbral

% cargamos el bloque de 3 segundos y obtenemos su huella

audio1=readwav('pictures5512_3sg.wav');
f1=fingerprint_princ(audio1);
[m,n]=size(f1);

% cargamos el archivo con el que vamos a comparar, entero

audio2=readwav('1123075521_5512_20min.wav');
f2=fingerprint_princ(audio2);

%se comparan ambas huellas

d=busqueda(f1,f2);
d=d./(m*n);             %BER de cada comparación

% sacamos la media y la desviacion estandar y llamamos a la herramienta
% dfittool

media=mean(d)
desv=std(d)

dfittool

