%ISCIZ  funkcija, ki resi enacbo z=asinh(ro*z) za 
%	zvezno veriznico
%
%ISCIZ(T1,T2,l,z0,tol) vrne priblizek za resitev z
%T1 in T2 sta krajisci veriznice oblike T1(a,A) in
%T2(b,B), l dolzina veriznice
%z0 zacetni priblizek, tol toleranca pri ustavitvi iteracije
function z=isciz(T1,T2,l,z0,tol);
  a=T1(1);A=T1(2);b=T2(1);B=T2(2);
  napaka=1+tol;
  ro=l/(b-a)*sqrt(1-((B-A)/l)^2);
  while napaka>=tol
    z=asinh(ro*z0);
    napaka=abs(z0-z);
    z0=z;
  end
