function [f,J,domerr] = mcp_funjac(z,jacflag)

[f,J,domerr] = mcpdf(z);

return;
    
