pro do_sweasp_lt
swea_l1_common
year_str = '2006'
for month = 12, 12 do begin
   if month lt 10 then month_str = '0'+strcompress(month,/rem) else $
      month_str = strcompress(month,/rem)
   case month of
      1: num_days = 31
      2: num_days = 28
      3: num_days = 31
      4: num_days = 30
      5: num_days = 31
      6: num_days = 30
      7: num_days = 31
      8: num_days = 31
      9: num_days = 30
      10: num_days = 31
      11: num_days = 30
      12: num_days = 31
   endcase
   for date = 1, num_days do begin
      date_str = strcompress(date,/rem)
      if date lt 10 then date_str = '0'+date_str
      timespan,year_str+'-'+month_str+'-'+date_str,1
;      load_sta_l1_sweadist
;      mk_sta_sweasp_cdf
      load_stb_l1_sweadist
      mk_stb_sweasp_cdf
      tplot_names,names=mytnames
      store_data,delete=mytnames
   endfor
endfor

year_str = '2007'
for month = 1, 9 do begin
   if month lt 10 then month_str = '0'+strcompress(month,/rem) else $
      month_str = strcompress(month,/rem)
   case month of
      1: num_days = 31
      2: num_days = 28
      3: num_days = 31
      4: num_days = 30
      5: num_days = 31
      6: num_days = 30
      7: num_days = 31
      8: num_days = 31
      9: num_days = 30
      10: num_days = 31
      11: num_days = 30
      12: num_days = 31
   endcase
   for date = 1, num_days do begin
      date_str = strcompress(date,/rem)
      if date lt 10 then date_str = '0'+date_str
      timespan,year_str+'-'+month_str+'-'+date_str,1
;      load_sta_l1_sweadist
;      mk_sta_sweasp_cdf
      load_stb_l1_sweadist
      mk_stb_sweasp_cdf
      tplot_names,names=mytnames
      store_data,delete=mytnames
   endfor
endfor

return
end