PCA_MAT_AFUN - Auxiliary function used in PCA_MAT.
 
  Copyright 2011 Dimitrios Zeimpekis, Eugenia Maria Kontopoulou, 
                 Efstratios Gallopoulos