pro done_gui,event

;Author: Rick Pernak, NASA Goddard Space Flight Center

widget_control,event.top,get_uvalue=datptr
dat = *datptr
vis = {vis:*dat.vis_un,vis_edit:*dat.vis_edit,vis_con:*dat.vis_con}
;	det:dat.udet,shape:dat.shape}

;free up pointers
ptr_free, datptr
ptr_free, dat.vis_un
ptr_free, dat.vis_edit
ptr_free, dat.vis_con
ptr_free, dat.visin
ptr_free, dat.visfit
ptr_free, dat.sigma
ptr_free, dat.visin

widget_control,event.top,/destroy

end