updatefigdata.m
bde8e520bdf2geom_testpardiso

updatefigdata.m
View Options

			function updatefigdata(control, event, Othercontrol, fig, M)


			if strcmp(event.EventName,'ValueChanged')
			fieldstep=floor(control.Value);
			control.Value=fieldstep;
			else
			fieldstep=floor(event.Value);
			end
			Othercontrol.Value=fieldstep;

			sgtitle(fig,sprintf('step=%d t=%0.5e s',(fieldstep-1)M.it1,double((fieldstep-1)M.it1)*M.dt))

			%% update Position histogram
			ax1=fig.Children(end);
			ax1.Children.CData=M.N(:,:,fieldstep);

			view(ax1,2)
			%% update ES Potential
			fig.Children(end-2).Children(1).ZData=M.pot(:,:,fieldstep)';
			%% update Radial electric field
			fig.Children(end-4).Children(1).ZData=M.Er(:,:,fieldstep)';
			%% update Axial electric field
			fig.Children(end-6).Children(1).ZData=M.Ez(:,:,fieldstep)';
			drawnow limitrate



			end