function [ summary_data ] = ReadSummaryExport( filenm )


   fid = fopen(filenm);
   
   fseek(fid,0,'eof');
   end_position = ftell(fid);
   fseek(fid,0,'bof');
   
   remain = fgets(fid);
   for j = 1:2   
     [token,remain] = strtok(remain, ',')   
   end
   summary_data.ListFile = token;
   
   remain = fgets(fid);
   for j = 1:2   
     [token,remain] = strtok(remain, ',')   
   end
   summary_data.StartTime = token;
 
   remain = fgets(fid);
   for j = 1:2   
     [token,remain] = strtok(remain, ',')   
   end
   summary_data.SamplingTimeStr = token;
   
   k1 = strfind(token, 'min');
   k2 = strfind(token, 'sec');
   
   if(isempty(k1))
       summary_data.SamplingSeconds = str2num(token(1:k2-1));
   else
       summary_data.SamplingSeconds = 60*str2num(token(1:k1-1))+str2num(token(k1+3:k2-1));
   end
   
   
   
   
   remain = fgets(fid);
   remain = fgets(fid);

   remain = fgets(fid);
   for j = 1:2   
     [token,remain] = strtok(remain, ',')   
   end
   summary_data.ParticlesPerml = str2num(token);
   
   fclose(fid);
   
end

