% Funcion G para reconstruccion interpolatoria y valores puntuales (IP)
%        solu=preliipvpcoefifunciong(nl,nr,x)
%        Entradas:
%             nl + nr = numero de nodos a la izquierda y derecha de x^{k}_{2*i-1} 
%             x= punto donde sustituimos (0.5 es para recuperar f^{k}_{2i-1), 1 es para f^{k}_{2i),0 para f^{k}_{2i-2))
%        Salidas:
%             coeficientes buscados

function preliipvpfiltrosfunciong(nl,nr,x)

           %Matriz para valores puntuales IP tomando nodos a la derecha
           AD= matriuipvp(0,nr+nl);
           %Matriz para valores puntuales IP tomando nodos a la izquierda
           AI= matriuipvp(nr+nl,0);
               
        for i=1:nl+nr
            if(x==0 && i==1)
                vector(i)=1;
            else   
                vector(i)=(x)^(i-1);
            end   
        end
        
        format rational
        coef=vector*AI^(-1)
        format
        sprintf('Comienza en f^{k-1}_{i-(%d)} y acaba en f^{k-1}_(i-(1))',nl+nr)
        format rational
        coef=vector*AD^(-1)
        format
        sprintf('Comienza en f^{k-1}_{i+1} y acaba en f^{k-1}_(i+(%d))',nl+nr)
        
        
     
        
 