Mercurial > octave-nkf
diff scripts/geometry/griddatan.m @ 19867:9fc020886ae9
maint: Clean up m-files to follow Octave coding conventions.
Try to trim long lines to < 80 chars.
Use '##' for single line comments.
Use '(...)' around tests for if/elseif/switch/while.
Abut cell indexing operator '{' next to variable.
Abut array indexing operator '(' next to variable.
Use space between negation operator '!' and following expression.
Use two newlines between endfunction and start of %!test or %!demo code.
Remove unnecessary parens grouping between short-circuit operators.
Remove stray extra spaces (typos) between variables and assignment operators.
Remove stray extra spaces from ends of lines.
| author | Rik <rik@octave.org> |
|---|---|
| date | Mon, 23 Feb 2015 14:54:39 -0800 |
| parents | 4197fc428c7d |
| children | 7503499a252b |
line wrap: on
line diff
--- a/scripts/geometry/griddatan.m Mon Feb 23 16:42:25 2015 +0000 +++ b/scripts/geometry/griddatan.m Mon Feb 23 14:54:39 2015 -0800 @@ -62,7 +62,7 @@ if (strcmp (method, "nearest")) ## search index of nearest point idx = dsearchn (x, tri, xi); - valid = !isnan (idx); + valid = ! isnan (idx); yi(valid) = y(idx(valid)); elseif (strcmp (method, "linear")) @@ -70,13 +70,13 @@ [tri_list, bary_list] = tsearchn (x, tri, xi); ## only keep the points within triangles. - valid = !isnan (tri_list); - tri_list = tri_list(!isnan (tri_list)); - bary_list = bary_list(!isnan (tri_list), :); + valid = ! isnan (tri_list); + tri_list = tri_list(! isnan (tri_list)); + bary_list = bary_list(! isnan (tri_list), :); nr_t = rows (tri_list); ## assign x,y for each point of simplex - xt = reshape (x(tri(tri_list,:),:), [nr_t, n+1, n]); + xt = reshape (x(tri(tri_list,:),:), [nr_t, n+1, n]); yt = y(tri(tri_list,:)); ## Use barycentric coordinate of point to calculate yi