function[ZAB,ZBC,ZCA,ZAG,ZBG,ZCG]=PDistComp(Va,Vb,Vc,Ia,Ib,Ic,I0,k,Km,I0p) ZAB=(Va-Vb)/(Ia-Ib); ZBC=(Vb-Vc)/(Ib-Ic); ZCA=(Vc-Va)/(Ic-Ia); ZAG=Va/(Ia+k*3*I0+Km*I0p); ZBG=Vb/(Ib+k*3*I0+Km*I0p); ZCG=Vc/(Ic+k*3*I0+Km*I0p);