function r = req(nv,nc,con,R,n1,n2)
%calcula resistencia equivalente entre n1 e n2
A = matVtoI(nv,nc,con,R);
Atilde = A;       B = zeros(nv,1);
Atilde(n1,:) = 0; Atilde(n1,n1) = 1;
B(n2)=1;
V=Atilde\B;
r=V(n2);
return
end