Mercurial > hg > octave-lyh
comparison scripts/polynomial/deconv.m @ 14872:c2dbdeaa25df
maint: use rows() and columns() to clarify m-files.
* gradient.m, interp1q.m, rat.m, tsearchn.m, image.m, imwrite.m, area.m,
contourc.m, hist.m, isocolors.m, isonormals.m, meshz.m, print.m, __bar__.m,
__go_draw_axes__.m, __interp_cube__.m, __marching_cube__.m, __patch__.m,
__print_parse_opts__.m, __quiver__.m, rose.m, shrinkfaces.m, stairs.m,
surfnorm.m, tetramesh.m, text.m, deconv.m, spline.m, intersect.m, setdiff.m,
setxor.m, union.m, periodogram.m, pcg.m, perms.m: Replace size (x,1) with
rows (x) and size(x,2) with columns(x).
| author | Rik <octave@nomad.inbox5.com> |
|---|---|
| date | Tue, 17 Jul 2012 13:34:19 -0700 |
| parents | 5d3a684236b0 |
| children |
comparison
equal
deleted
inserted
replaced
| 14871:26c4ca9782b0 | 14872:c2dbdeaa25df |
|---|---|
| 66 lc = la + length (b) - 1; | 66 lc = la + length (b) - 1; |
| 67 if (ly == lc) | 67 if (ly == lc) |
| 68 r = y - conv (a, b); | 68 r = y - conv (a, b); |
| 69 else | 69 else |
| 70 ## Respect the orientation of Y" | 70 ## Respect the orientation of Y" |
| 71 if (size (y, 1) <= size (y, 2)) | 71 if (rows (y) <= columns (y)) |
| 72 r = [(zeros (1, lc - ly)), y] - conv (a, b); | 72 r = [(zeros (1, lc - ly)), y] - conv (a, b); |
| 73 else | 73 else |
| 74 r = [(zeros (lc - ly, 1)); y] - conv (a, b); | 74 r = [(zeros (lc - ly, 1)); y] - conv (a, b); |
| 75 endif | 75 endif |
| 76 if (ly < la) | 76 if (ly < la) |