function [ClassMeanL,ClassMeanR,ClassMeanT,ClassMeanB,ClassMeanF,TotalMeanL,TotalMeanR,TotalMeanT,TotalMeanB,TotalMeanF,pcL,pcR,pcT,pcB,pcF] = Recog_Train(map,nbcol)

people=128;


for i=1:people
    
FL=[];
FR=[];
FT=[];
FB=[];
FF=[];

   for j=5:5:30
       
    s=['iis4848' '\' num2str(i) '\' num2str(j) '.bmp'];

    X=imread(s);
    X=double(X);
    [LL1,T,T,T]=mdwt(X,'db1');
    coef1=wcodemat(LL1,nbcol);

    [row,col]=size(X);



    % ++++ だ澄