function plot_profiles

path_initial= ['C:\Documents and Settings\sylvie.lorsolo\My Documents\research\Cd project\'];
input_data.hurricane='\TKE\katrina\';
input_data.jour='28\10km\';

files1=dir([path_initial]);
for i=3:length(files1)
    
    files2=dir([path_initial,files1(i).name]);
    for j=3:length(files2)
        files3=dir([path_initial,files1(i).name,'\',files2(j).name]);
        for k=3:4
            files4=dir([path_initial,files1(i).name,'\',files2(j).name,'\',files3(k).name,'\*.w']);
            input_data.path1=[path_initial,files1(i).name,'\',files2(j).name,'\',files3(k).name,'\'];
%             input_data.hurricane=files1(i).name
%             input_data.jour=files2(j).name
            for ii=1:2:length(files4)
                figure
                input_data.file_number=ii;
                [ws,radwind,tangwind,w,dbz, x_fill, y_fill, z_fill,L]=read_w_files(input_data,'ws');
                input_data.file_number=ii+1;
                [ws,radwind,tangwind,w,dbz, x_fill, y_fill, z_fill,L]=read_w_files(input_data,'ws');
                saveas(gcf,[input_data.path1,files4(ii).name,'_ws.png']);
                close
            end
                
            end
        end
    end
