constraints for EBA and CBA [C, Ceq] = cbaf2(x,p)
0001 function [C, Ceq] = cbaf2(x,p) 0002 0003 % constraints for EBA and CBA 0004 % [C, Ceq] = cbaf2(x,p) 0005 0006 C = [ x(p.ind_v) .* x(p.ind_dmu) + p.epsilon; ... 0007 - x(p.ind_v) .* x(p.ind_y) + p.epsilon ]; 0008 0009 % no EBA constraints where v = 0 0010 0011 C(find(x(p.ind_v)==0)) = -1; 0012 0013 % no CBA constraints where v = 0 0014 0015 C(find(x(p.ind_v)==0) + length(p.ind_v))=-1; 0016 0017 Ceq = [];