function priklad()

[Uzly,Trojuhelniky] = nacti3dSit('plat3d-povrchovaSit.txt');
lambda = 1.5; kappa = 2*pi/lambda; phi = pi/4; Uin = 1;
[V,b] = MHP_elmgZareni(Uzly,Trojuhelniky,kappa,Uin,phi);
q = V\b;
vykresli3dPovrchoveReseni(Uzly,Trojuhelniky,abs(q))
