vnnolinealaux2.m

function [difobjetivo, difrestricciones] = vnnolinealaux2(U, F)
%vnnolinealaux2
%   [difeobjetivo, difrestricciones] = vnnolinealaux2(U, F)
%
%   Funci�n auxiliar de vnnolineal. Calcula el gradiente de la funci�n
%   objetivo y el jacobiano de las restricciones de VN con MATLAB 5

filas = size(U,2)-1;
k = U(1);
X = U(2:filas+1);

               %-k
difobjetivo = [-1             ;   %dk
               zeros(filas,1)];   %dX

                    %-X F(k)         1-sum(X)        sum(X)-1
difrestricciones = [-X*forma1(F, k), 0             , 0             ;    %dk
                    -forma0(F, k)  , -ones(filas,1), ones(filas,1)];    %dX