%[Ie0]=subIe0(Minc,V0,z0); function [Ie0]=subIe0(Minc,V0,z0) % Calculo de YBUS0 Ve0=Minc*V0; Ie0=z0\Ve0;