function X = decenred(Z,moya,ecaa)
% Fonction pour dénormaliser la matrice Z en lignes

%+
%
% EVOLUTIONS
% ==========
%
% $Id$
%
% - fplod 2009-09-10T14:59:54Z aedon.locean-ipsl.upmc.fr (Darwin)
%
%   * typo in header
%   * add minimal ReStructured Text header
%
%-

%load moya;load ecaa

UN = ones(size(Z));
Moy = moya;
Moy = diag(Moy);
Moy = UN * Moy;
taille=size(Z,1);
Ecart_type = diag(sqrt((taille-1)/taille)*ecaa);
Ecart_type = UN * Ecart_type;
 
% Calcul de la matrice X des données centrées réduites
X = (3./2.)* Z .*Ecart_type + Moy;
