function [ E ] = pouze_primy( d_pr,E0,f,vzd_m1,vzd_m2,vzd )
vln=((3*10^(8))/(f*10^(6)));
k=((2*pi())/(vln));


    E=((E0/d_pr)*exp(-1i*k*d_pr));

end

