Mercurial > hg > octave-nkf
view scripts/general/flipud.m @ 4:b4df021f796c
[project @ 1993-08-08 01:26:08 by jwe]
Initial revision
author | jwe |
---|---|
date | Sun, 08 Aug 1993 01:26:08 +0000 |
parents | |
children | 16a24e76d6e0 |
line wrap: on
line source
function y = flipud (x) # usage: flipud (x) # # Return x with the rows swapped. # # See also: fliplr, rot90 if (nargin != 1) error ("usage: flipud (x)"); endif y = x; nr = rows (x); y = x (nr:-1:1, :); endfunction