qujiandiv.m

来自「用MATLAB编的配电网自动化的一些程序」· M 代码 · 共 11 行

function y=qujiandiv(a,b,e)
a(1,1)=a*(1-e);
a(1,2)=a*(1+e);
b(1,1)=b*(1-e);
b(1,2)=b*(1+e);
c(1,1)=a(1,1)/b(1,2);
c(1,3)=a(1,2)/b(1,1);
y=c/(a/b);
y(1,2)=1;
y1=y';
y=[(1-e)/(1+e);1;(1+e)/(1-e)]';