Skip to content
Snippets Groups Projects
all_transform.pro 887 B
pro all_transform, group=group

  default, group, 'GSF'
  o=obj_new('cws_read',scale=1.0)
  o->set_group, group

; arr_pro = ['cmb', 'cph', 'ctt', 'cth', 'ctp', 'cod', 'ref', 'lwp']   ; OK
; arr_pro = ['cmb', 'cph', 'ctt', 'cth', 'ctp', 'cod', 'ref', 'lwp']
  arr_pro = ['cmb', 'cph', 'cod', 'ref', 'lwp']
;  arr_pro = ['cmb2', 'cph2','ctp2', 'ctt2', 'cod2', 'ref2']
  npro = n_elements(arr_pro)

  day   = [13,17,18,22,03]
  month = [ 6, 6, 6, 6, 7]

  for d = 0, 4 do begin 
;  for d = 0, 0 do begin 
    for p = 0, npro-1 do begin 
      product = arr_pro[p]
      o->set_product, product
      for h=0,23 do begin 
;      for h=12,12 do begin 
        for m=00,45,15 do begin 
;        for m=00,00,15 do begin 
          print, '=== TIME: ', h, m
          o->set_date,2008,month[d],day[d],h,m
            o->transformIt, /force
        endfor
      endfor
    endfor
  endfor 

end