function [gp]= genprob(S,F,DATA,GMM)
gp=1;
for t=1:1:F
s=0;    
    for k=1:1:S             
s=s+GMM{1}(k)*gaussvalue(DATA(:,t),GMM{3}{k},GMM{2}{k});
    end
s    
gp=gp*s;    
end


