function s = vectorNorm(x,p)
% vectorNorm  Compute p-norms of vectors

if nargin<2, p=2;  end

switch p
    case 2
        s = L2norm(x);
    case 1
        s = L1norm(x);
    case Inf
        s = Linfnorm(x);
    otherwise
        error('p = %g not allowed')
end

end

% --------------------------------------
function s = L2norm(x)
% L2norm Compute the L2 norm of vector x

s = 0.0;

end

% --------------------------------------
function s = L1norm(x)
% L1norm Compute the L1 norm of vector x

s = 0.0;

end

% --------------------------------------
function s = Linfnorm(x)
% Linfnorm Compute the L-infinity norm of vector x

s = 0.0;
end
