Mercurial > repos > public > sbplib
comparison +grid/old/triang_interp_pts.m @ 0:48b6fb693025
Initial commit.
author | Jonatan Werpers <jonatan@werpers.com> |
---|---|
date | Thu, 17 Sep 2015 10:12:50 +0200 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
-1:000000000000 | 0:48b6fb693025 |
---|---|
1 % Creates a transfinite interpolation from connecting the four points wiht straight lines. | |
2 function [S, g1, g2, g3] = triang_interp_pts(p1,p2,p3) | |
3 if size(p1) ~= [2 1] | |
4 error('p1 is strange!'); | |
5 end | |
6 | |
7 g1 = @(t)(p1 + t*(p2-p1)); | |
8 g2 = @(t)(p2 + t*(p3-p2)); | |
9 g3 = @(t)(p3 + t*(p1-p3)); | |
10 | |
11 S = grid.triang_interp(g1,g2,g3); | |
12 end |