function [x] = inverse(u)
  x = cdfnor("X",zeros(u),ones(u),u,ones(u)-u);
endfunction


N=10000;
VDC=vector_vdc(p,N);
Rand=rand(1,N,"unif");

G_VDC=inverse(VDC);
G_RAN=inverse(Rand);
for i=1:100
    conv_vdc(i) = mean(G_VDC(1:i*100));
    conv_ran(i)	= mean(G_Rand(1:i*100));
end
plot2d(conv_ran);
plot2d(conv_vdc);