Mercurial > hg > octave-nkf

comparison scripts/plot/axis.m @ 594:45172f0adca5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1994-08-09 05:38:41 by jwe]
author jwe
date Tue, 09 Aug 1994 05:38:41 +0000
parents 8e42786004d6
children a0cc17145462
comparison
equal deleted inserted replaced
593:6f948c6251a9 594:45172f0adca5
38 if (len != 2 && len != 4 && len != 6) 38 if (len != 2 && len != 4 && len != 6)
39 error ("axis: expecting vector with 2, 4, or 6 elements"); 39 error ("axis: expecting vector with 2, 4, or 6 elements");
40 endif 40 endif
41 41
42 if (len > 1) 42 if (len > 1)
43 eval (sprintf ("set xrange [%d:%d];", ax (1), ax (2))); 43 eval (sprintf ("set xrange [%g:%g];", ax (1), ax (2)));
44 endif 44 endif
45 45
46 if (len > 3) 46 if (len > 3)
47 eval (sprintf ("set yrange [%d:%d];", ax (3), ax (4))); 47 eval (sprintf ("set yrange [%g:%g];", ax (3), ax (4)));
48 endif 48 endif
49 49
50 if (len > 5) 50 if (len > 5)
51 eval (sprintf ("set zrange [%d:%d];", ax (5), ax (6))); 51 eval (sprintf ("set zrange [%g:%g];", ax (5), ax (6)));
52 endif 52 endif
53 53
54 else 54 else
55 error ("axis: expecting vector with 2, 4, or 6 elements"); 55 error ("axis: expecting vector with 2, 4, or 6 elements");
56 endif 56 endif