Mercurial > repos > public > sbplib
view +draw/prompt_point.m @ 815:fae41958af4f feature/burgers1d
Add support for artificial viscosity to the 1d burgers scheme.
- Add support for artificial viscosity by parametrizing the discretization operator and boundary closure on the viscosity.
- Add a time stepper which evaluates and updates the residual viscosity of the solution.
author | Vidar Stiernstrom <vidar.stiernstrom@it.uu.se> |
---|---|
date | Thu, 06 Sep 2018 12:43:51 +0200 |
parents | 48b6fb693025 |
children | 00eb5db89da5 |
line wrap: on
line source
function [p, button] = prompt_point(s,varargin) default_arg('s',[]) set(gcf,'Pointer','crosshair') if ~isempty(s) fprintf(s,varargin{:}); end a = gca; function get_point(src,event) cp = a.CurrentPoint; p = cp(1,1:2)'; a.ButtonDownFcn = []; end a.ButtonDownFcn = @get_point; waitfor(a,'ButtonDownFcn', []) set(gcf,'Pointer','arrow') end