function [t1,X1,l]=vyhazet_radky4(t,X)
clc
n=length(t);
k=1;
nn=size(X,2);
for i=1:n
   for j=1:nn
    if X(i,j)==0;
    t2(k)=i;
    end;
    end;
    k=k+1;
end;
m=length(t2);
kk=1;
for j=1:m
    if t2(j)==0
    t1(kk)=t(i);
    kk=kk+1;
    end
    end
    
end;   
t1=t1';
% X1=X1';
l=length(t1);
t2
