bsvc.m

本程序非常值得借鉴的一点就是,把Matlab做成了极其具有直观化的具有交互界面,类似于VB的应用程序,希望我们也能多多学习学习

function B = bsvc(a)

global DAE

B = zeros(a.n,1); 

if a.ty1
  B(a.ty1) = DAE.x(a.bcv);
end

if a.ty2
  xl = a.con(a.ty2,15);
  xc = a.con(a.ty2,16);
  B(a.ty2) = (2*DAE.x(a.alpha) - sin(2*DAE.x(a.alpha)) ...
              - pi*(2-xl./xc))./(pi*xl);
end