function Alok = alok_derder(uzly_lok,tau_lok)

R_lok = uzly_lok(2)-uzly_lok(1);

B = (1/R_lok) * [ -1 1 ];

Alok = tau_lok * B' * B * abs(R_lok);
