function DM_changeprofile(hObject,handles)

global data
crest_line = getPosition(data.duneline);
crest_line = interp1(crest_line(:,2),crest_line(:,1),data.y(:,1)); %Interp crest line 2 grid
crest_line_y = data.y(~isnan(crest_line),1);
Index = interp1(data.y(:,1),1:length(data.y(:,1)),(max(crest_line_y)+min(crest_line_y))/2,'nearest');

changeIndex = get(hObject,'Value');
DM_plot_profile(handles,Index+changeIndex);