Mercurial > hg > octave-lyh

comparison scripts/general/bitget.m @ 5003:a0e7231a58eb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2004-09-16 16:44:44 by jwe]
author jwe
date Thu, 16 Sep 2004 16:46:32 +0000
parents 0896307b1b48
children c08cb1098afc
comparison
equal deleted inserted replaced
5002:d894b803ccb5 5003:a0e7231a58eb
33 if (nargin != 2) 33 if (nargin != 2)
34 usage ("bitget (A, n)"); 34 usage ("bitget (A, n)");
35 endif 35 endif
36 36
37 if (isa (A, "double")) 37 if (isa (A, "double"))
38 Amax = log2 (Bmax) + 1; 38 Amax = log2 (bitmax) + 1;
39 _conv = @double; 39 _conv = @double;
40 else 40 else
41 if (isa (A, "uint8")) 41 if (isa (A, "uint8"))
42 Amax = 8; 42 Amax = 8;
43 _conv = @uint8; 43 _conv = @uint8;