%% norma degli ingressi selezionati


%%%%%%%%%%% conf per PEM


% stampiamo per ogni sensore (la norma di) gli ingressi usati (per gli Mnpf)
for k=1:length(Dati)    
    in_sel_tmp = [];
    tt = length(Dati(1,k).t.pem_norm.mod(1,3).Mpem_BIC.nb);
    for i=1:tt
        try
        norm_i = norm(Dati(1,k).t.pem_norm.mod(1,3).Mpem_BIC(1,i).b);
        catch
            norm_i = NaN;
        end
        in_sel_tmp = [in_sel_tmp norm_i];
    end
    
    Conf_ingressi.in_pem(1,k).in_selez = in_sel_tmp;
end

% stampa in txt

fid = fopen('ValidazioneChiuso\conf_norme_ingressi_PEM_selez_locale.txt', 'w+');

caso = ['Mpem_BIC n1500 selez_locale' '\t'];
fprintf(fid, [ caso, '\n']);    
for k=1:length(Dati)
    v = ['Sens \t'];
    tt = length(Dati(1,k).t.pem_norm.mod(1,3).Mpem_BIC.nb);
    for i=1:tt
       v = [v num2str(Dati(1,k).t.pem_norm.mod(1,3).in_selez(i)) '\t' ];  
    end
   fprintf(fid, [v  '\n']);
    v=[];
    for i=1:tt
       v = [v num2str(Conf_ingressi.in_pem(1,k).in_selez(i),3) '\t' ]; 
    end
    fprintf(fid, [num2str(k) '\t' v  '\n']);
end 


fclose(fid);


disp('fine')


%% norma degli ingressi selezionati


%%%%%%%%%%% conf per Mnpf


% stampiamo per ogni sensore (la norma di) gli ingressi usati (per gli Mnpf)
for k=1:length(Dati)    
    in_sel_tmp = [];
    tt = length(Dati(1,k).t.sseh_yy_norm(2,3).Mnpf.nb);
    for i=1:tt
        try
        norm_i = norm(Dati(1,k).t.sseh_yy_norm(2,3).Mnpf(1,i).b);
        catch
            norm_i = NaN;
        end
        in_sel_tmp = [in_sel_tmp norm_i];
    end
    
    Conf_ingressi.in_sseh(1,k).in_selez = in_sel_tmp;
end

% stampa in txt

fid = fopen('ValidazioneChiuso\conf_norme_ingressi_Mnpf.txt', 'w+');

caso = ['Mpem_BIC n1500 selez_locale' '\t'];
fprintf(fid, [ caso, '\n']);    
for k=1:length(Dati)
%    v = ['Sens \t'];
    tt = length(Dati(1,k).t.sseh_yy_norm(2,3).Mnpf.nb);
%    for i=1:tt
%       v = [v num2str(Dati(1,k).t.pem_norm.mod(1,3).in_selez(i)) '\t' ];  
%    end
%   fprintf(fid, [v  '\n']);
    v=[];
    for i=1:tt
       v = [v num2str(Conf_ingressi.in_sseh(1,k).in_selez(i),3) '\t' ]; 
    end
    fprintf(fid, [num2str(k) '\t' v  '\n']);
end 


fclose(fid);


disp('fine')