Index: /issm/trunk-jpl/src/m/psl/sharmonics.m
===================================================================
--- /issm/trunk-jpl/src/m/psl/sharmonics.m	(revision 20639)
+++ /issm/trunk-jpl/src/m/psl/sharmonics.m	(revision 20640)
@@ -23,5 +23,5 @@
    plm = legendre(l,cos(lat),'norm'); %nromalized Plm (see Matlab documents)
    for m=-l:l 
-		sh(:,1+q)=(-1)^(abs(m)).*plm(abs(m)+1,:)'.*(cos(abs(m).*lon)*(m>=0)+sin(abs(m).*lon)*(m<0)).*sqrt((2-(m==0))/(2*pi)); %orthonormalized
+		sh(:,1+q)=plm(abs(m)+1,:)'.*(cos(abs(m).*lon)*(m>=0)+sin(abs(m).*lon)*(m<0)).*sqrt((2-(m==0))*2); %4-pi norm 
       q=q+1;
    end