Functions | |
if (nargin< 2) print_usage() | |
newplot () | |
unwind_protect_cleanup | axes (oldh) |
end_unwind_protect endif | if (nargout > 0) retval |
!set (h,"maxheadsize", 0.33) | |
!demo | !axis ("equal") |
!quiver (x, y, sin(theta)/10, cos(theta)/10) | |
plot (x, y,"r") | |
Variables | |
function | retval |
else | oldh = gca () |
unwind_protect | axes (h) |
tmp = __quiver__ (h, 0, varargin{:}) | |
endif endfunction!demo | !clf [x, y] = meshgrid(1:2:20) |
!h = quiver(x,y,sin(2*pi*x/10),sin(2*pi*y/10)) | |
!x = linspace(0,3,80) | |
y = sin(2*pi*x) | |
theta = 2*pi*x+pi/2 | |
!hold | on |
hold | off |
!demo !axis | ( | "equal" | ) |
!set | ( | h | , | |
"maxheadsize" | , | |||
0. | 33 | |||
) |
end_unwind_protect endif if | ( | nargout | , | |
0 | ||||
) |
if | ( | ) |
newplot | ( | ) |
plot | ( | x | , | |
y | , | |||
"r" | ||||
) |
endif endfunction !demo !clf[x, y] = meshgrid(1:2:20) |
!x = linspace(0,3,80) |
hold off |
! hold on |
function retval |
tmp = __quiver__ (h, 0, varargin{:}) |
y = sin(2*pi*x) |