%This program re-orders the cell array myData, output from thermochron.m
%so that it's in the right order: 1H,1M,1L,1UL...
a={[] [] [] []};
myOrdered={a,a,a,a,a,a,a,a,a,a  ,a,a,a,a,a,a,a,a,a,a  ,a,a,a,a,a,a,a,a,a,a ...
        ,a,a,a,a,a,a,a,a,a,a  ,a,a,a,a,a,a,a,a,a,a  ,a,a,a,a,a,a,a,a,a,a  ,...
        a,a,a,a,a,a,a,a,a,a  ,a,a,a,a,a,a,a,a,a,a  ,a,a,a,a,a,a,a,a,a,a  ,...
        a,a,a}; % 93-cell array,  each cell is a cell array of 4 arrays 

for i=1:length(myData);
    switch upper(myData{1,i}{1,1})
        
        %%%%%%%
        case '1L'
            myOrdered{1,1}=myData{1,i};
        case '1M'
            myOrdered{1,2}=myData{1,i};
        case '1H'
            myOrdered{1,3}=myData{1,i};
        case '1UL'
            myOrdered{1,4}=myData{1,i};
        %%%%%%%%%%            
        case '2L'
            myOrdered{1,5}=myData{1,i};
        case '2M'
            myOrdered{1,6}=myData{1,i};
        case '2H'
            myOrdered{1,7}=myData{1,i};
        case '2UL'
            myOrdered{1,8}=myData{1,i};                        
        
            
        %%%%%%%%%%    
        case '3L'
            myOrdered{1,9}=myData{1,i};
        case '3M'
            myOrdered{1,10}=myData{1,i};
        case '3H'
            myOrdered{1,11}=myData{1,i};
        case '3UL'
            myOrdered{1,12}=myData{1,i};
            
        %%%%%%%%%%%%  
        case '4L'
            myOrdered{1,13}=myData{1,i};
        case '4M'
            myOrdered{1,14}=myData{1,i};
        case '4H'
            myOrdered{1,15}=myData{1,i};
        case '4UL'
            myOrdered{1,16}=myData{1,i};    
            
            %%%%%%%%%%%%  
        case '5L'
            myOrdered{1,17}=myData{1,i};
        case '5M'
            myOrdered{1,18}=myData{1,i};
        case '5UL'
            myOrdered{1,19}=myData{1,i};
         
            %%%%%%%%%%%%%%% 
        case '6L'
            myOrdered{1,20}=myData{1,i};
        case '6M'
            myOrdered{1,21}=myData{1,i};
        case '6H'
            myOrdered{1,22}=myData{1,i};
        case '6UL'
            myOrdered{1,23}=myData{1,i};
            
              %%%%%%%%%%%%%%% 
        case '7L'
            myOrdered{1,24}=myData{1,i};
        case '7M'
            myOrdered{1,25}=myData{1,i};
        case '7H'
            myOrdered{1,26}=myData{1,i};
        case '7UL'
            myOrdered{1,27}=myData{1,i};
            
            %%%%%%%%%%%%%%% 
        case '8L'
            myOrdered{1,28}=myData{1,i};
        case '8M'
            myOrdered{1,29}=myData{1,i};
        case '8H'
            myOrdered{1,30}=myData{1,i};
        case '8UL'
            myOrdered{1,31}=myData{1,i};
            
               %%%%%%%%%%%%%%% 
        case '9L'
            myOrdered{1,32}=myData{1,i};
        case '9H'
            myOrdered{1,33}=myData{1,i};
        
            
            %%%%%%%%%%%%%%% 
        case '10L'
            myOrdered{1,34}=myData{1,i};
        case '10M'
            myOrdered{1,35}=myData{1,i};
        case '10H'
            myOrdered{1,36}=myData{1,i};
        case '10UL'
            myOrdered{1,37}=myData{1,i};
            
            %%%%%%%%%%%%%%% 
        case '11L'
            myOrdered{1,38}=myData{1,i};
        case '11M'
            myOrdered{1,39}=myData{1,i};
        case '11H'
            myOrdered{1,40}=myData{1,i};
        case '11UL'
            myOrdered{1,41}=myData{1,i};
            
            %%%%%%%%%%%%%%%
        case '12L'
            myOrdered{1,42}=myData{1,i};
        case '12M'
            myOrdered{1,43}=myData{1,i};
        case '12H'
            myOrdered{1,44}=myData{1,i};
        case '12UL'
            myOrdered{1,45}=myData{1,i};
            
            %%%%%%%%%%%%%%%
        case '13L'
            myOrdered{1,46}=myData{1,i};
        case '13M'
            myOrdered{1,47}=myData{1,i};
        case '13H'
            myOrdered{1,48}=myData{1,i};
        case '13UL'
            myOrdered{1,49}=myData{1,i};
            
            %%%%%%%%%%%%%%%
        case '14L'
            myOrdered{1,50}=myData{1,i};
        case '14M'
            myOrdered{1,51}=myData{1,i};
        case '14H'
            myOrdered{1,52}=myData{1,i};
        case '14UL'
            myOrdered{1,53}=myData{1,i};
            
             %%%%%%%%%%%%%%%
        case '15L'
            myOrdered{1,54}=myData{1,i};
        case '15M'
            myOrdered{1,55}=myData{1,i};
        case '15H'
            myOrdered{1,56}=myData{1,i};
        case '15UL'
            myOrdered{1,57}=myData{1,i};
            
            %%%%%%%%%%%%%%%
        case '16L'
            myOrdered{1,58}=myData{1,i};
        case '16M'
            myOrdered{1,59}=myData{1,i};
        case '16H'
            myOrdered{1,60}=myData{1,i};
        case '16UL'
            myOrdered{1,61}=myData{1,i};
            
            %%%%%%%%%%%%%%%
        case '17L'
            myOrdered{1,62}=myData{1,i};
        case '17M'
            myOrdered{1,63}=myData{1,i};
        case '17H'
            myOrdered{1,64}=myData{1,i};
        case '17UL'
            myOrdered{1,65}=myData{1,i};
            
            %%%%%%%%%%%%%%%
        case '18L'
            myOrdered{1,66}=myData{1,i};
        case '18H'
            myOrdered{1,67}=myData{1,i};
        case '18UL'
            myOrdered{1,68}=myData{1,i};
            
            %%%%%%%%%%%%%%%
        case '19L'
            myOrdered{1,69}=myData{1,i};
        case '19M'
            myOrdered{1,70}=myData{1,i};
        case '19H'
            myOrdered{1,71}=myData{1,i};
        case '19UL'
            myOrdered{1,72}=myData{1,i};
            
            %%%%%%%%%%%%%%%
        case '20L'
            myOrdered{1,73}=myData{1,i};
        case '20M'
            myOrdered{1,74}=myData{1,i};
        case '20H'
            myOrdered{1,75}=myData{1,i};
        case '20UL'
            myOrdered{1,76}=myData{1,i};
            
            %%%%%%%%%%%%%%%
        case '1TL'
            myOrdered{1,77}=myData{1,i};
        case '1TM'
            myOrdered{1,78}=myData{1,i};
        case '1TH'
            myOrdered{1,79}=myData{1,i};
            
            %%%%%%%%%%%%%%%
        case '2TM'
            myOrdered{1,80}=myData{1,i};
        case '2TH'
            myOrdered{1,81}=myData{1,i};
            
            %%%%%%%%%%%%%%%
        case '3TL'
            myOrdered{1,82}=myData{1,i};
        case '3TM'
            myOrdered{1,83}=myData{1,i};
        case '3TH'
            myOrdered{1,84}=myData{1,i};
            
            %%%%%%%%%%%%%%%
        case '4TL'
            myOrdered{1,85}=myData{1,i};
        case '4TM'
            myOrdered{1,86}=myData{1,i};
        case '4TH'
            myOrdered{1,87}=myData{1,i};
            
            %%%%%%%%%%%%%%%
        case '5TL'
            myOrdered{1,88}=myData{1,i};
        case '5TM'
            myOrdered{1,89}=myData{1,i};
        case '5TH'
            myOrdered{1,90}=myData{1,i};
            
            %%%%%%%%%%%%%%%
        case '6TL'
            myOrdered{1,91}=myData{1,i};
        case '6TM'
            myOrdered{1,92}=myData{1,i};
        case '6TH'
            myOrdered{1,93}=myData{1,i};
        otherwise %append onto the end if it doesn't match.
            myOrdered{1,length(myOrdered)+1}=myData{1,i};
    end           
end