function scatter_plot(handles)

disp('Plot MODIS scatter diagram')

drawnow
figure(handles.airs_figure)
axes(handles.scatter_axes)
cla

for n = 1:handles.modis.num_color
  if ~isempty(handles.modis.sub_x_data{n})
    hold on
    plot(handles.modis.sub_x_data{n}, handles.modis.sub_y_data{n}, '^')
    h = findobj(gca, 'type', 'line');
    set(h(1), 'Color', handles.modis.cmap(n, :))
  end
end

xlabel(handles.modis.x_label);
ylabel(handles.modis.y_label);
title('MODIS Scatter Diagram');
