; --------------------------------------------------------------------------
; PROCEDURE clear_retrieved_cloud_panel
; --------------------------------------------------------------------------
; PURPOSE:
;   This procedure clears all the checkboxes and radio buttons
;   on the retrieved_cloud_panel.  
;
PRO clear_retrieved_cloud_panel, SAVE_VIEW=SAVE_VIEW

   COMMON CIPS_GLOBAL_STATE, cips_global_options   
   COMMON RETRIEVED_CLOUD_BTNS, cloud_panel_buttons
   COMMON CLOUD_WINDOW_STATE, cloud_window_options
   
   if n_elements(cloud_window_options) eq 0 then return

   if (cips_global_options.is_cloud eq 0) then return

   cloud_window_options.view = ''
   cloud_window_options.unc = 0
   cloud_window_options.surf_view = 0
   cloud_window_options.show_coast = 0
   cloud_window_options.sza_contours = 0
   cloud_window_options.latlon_contours = 0
   
   widget_control, cloud_panel_buttons.cld_props_btns, set_button=0
   widget_control, cloud_panel_buttons.unc_btn, set_button=0
   widget_control, cloud_panel_buttons.surface_btn, set_button=0
   widget_control, cloud_panel_buttons.map_proj_btn, set_button=0
   widget_control, cloud_panel_buttons.contour_btns, set_button=0
   widget_control, cloud_panel_buttons.contours_base_cloud, set_button=0
   
return
end