Mercurial > octave-nkf
comparison scripts/plot/mplot.m @ 5214:eecc24b92d97
[project @ 2005-03-16 17:14:12 by jwe]
author | jwe |
---|---|
date | Wed, 16 Mar 2005 17:14:12 +0000 |
parents | 92be67bc9301 |
children | 32c569794216 |
comparison
equal
deleted
inserted
replaced
5213:390f13fc0f4a | 5214:eecc24b92d97 |
---|---|
42 global __multiplot_xn__; | 42 global __multiplot_xn__; |
43 global __multiplot_yn__; | 43 global __multiplot_yn__; |
44 global __multiplot_xi__; | 44 global __multiplot_xi__; |
45 global __multiplot_yi__; | 45 global __multiplot_yi__; |
46 | 46 |
47 gset nologscale; | 47 __gset__ nologscale; |
48 gset nopolar; | 48 __gset__ nopolar; |
49 | 49 |
50 __plt__ ("plot", varargin{:}); | 50 __plt__ ("plot", varargin{:}); |
51 | 51 |
52 ## update the plot position | 52 ## update the plot position |
53 | 53 |
65 endif | 65 endif |
66 | 66 |
67 xo = (__multiplot_xi__ - 1.0) * __multiplot_xsize__; | 67 xo = (__multiplot_xi__ - 1.0) * __multiplot_xsize__; |
68 yo = (__multiplot_yn__ - __multiplot_yi__) * __multiplot_ysize__; | 68 yo = (__multiplot_yn__ - __multiplot_yi__) * __multiplot_ysize__; |
69 | 69 |
70 eval (sprintf ("gset origin %g, %g", xo, yo)); | 70 eval (sprintf ("__gset__ origin %g, %g", xo, yo)); |
71 | 71 |
72 endif | 72 endif |
73 | 73 |
74 endfunction | 74 endfunction |