Mercurial > repos > public > sbplib

annotate arrowAnnotation.m @ 1290:b0208b130880 feature/boundary_optimized_grids

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add option to pass a boundary optimized grid to Rectangle.getGrid
author Vidar Stiernström <vidar.stiernstrom@it.uu.se>
date Wed, 01 Jul 2020 17:34:40 +0200
parents 2412f407749a
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
957
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
1 % Draw an arrow from p1 to p2, with text attached
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
2 function [h] = arrowAnnotation(p1,p2)
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
3 ah = gca;
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
4 xl = ah.XLim(1);
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
5 xr = ah.XLim(2);
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
6
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
7 yl = ah.YLim(1);
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
8 yr = ah.YLim(2);
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
9
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
10 dx = xr - xl;
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
11 dy = yr - yl;
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
12
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
13 s = [
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
14 ah.Position(1) + (p1(1) - xl)/dx*ah.Position(3),
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
15 ah.Position(1) + (p2(1) - xl)/dx*ah.Position(3),
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
16 ];
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
17 t = [
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
18 ah.Position(2) + (p1(2) - yl)/dy*ah.Position(4),
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
19 ah.Position(2) + (p2(2) - yl)/dy*ah.Position(4),
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
20 ];
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
21
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
22 h = annotation('arrow', s, t);
2412f407749a Add function for drawing arrow on plot
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
23 end