function res = rmscant6( t,n,v )

pp = P(n);
som = 0;
l = 2^n;

for k = 1:l
    for kk = 1:l
        som = som +exp(i*(pp(k)-pp(kk))*t)*exp(20*(v(k)+v(kk)))*(abs(v(k)+v(kk)))^(-3);
    end
end;

res = 2^(-2*n)*som;


end

