quiver3.m File Reference

Functions
	if (nargin< 2) print_usage()
	newplot ()
unwind_protect_cleanup	axes (oldh)
end_unwind_protect endif	if (nargout > 0) retval
endif endfunction!demo!clf	!colormap (jet(64))%![x
	!quiver3 (x, y, z, sin(theta), cos(theta), ones(size(z)))
	!mesh (x, y, z)
	!surf (x, y, z)
	!set (h,"maxheadsize", 0.33)
Variables
function	retval
else	oldh = gca ()
unwind_protect	axes (h)
	tmp = __quiver__ (h, 1, varargin{:})
endif endfunction!demo!clf	y = meshgrid (-1:0.1:1)
	!z = sin(2*pi*sqrt(x.^2+y.^2))
	!theta = 2*pi*sqrt(x.^2+y.^2)+pi/2
!hold	on
!hold	off
!demo	!clf [x, y, z] = peaks (25)
	!h = surfnorm (x, y, z / 10) quiver3 (x, y, z, u, v, w)

---

Function Documentation

endif endfunction !demo ! clf !colormap

(

jet(64)

)

!mesh	(	x	,
		y	,
		z
	)

!quiver3	(	x	,
		y	,
		z	,
		sin(theta)	,
		cos(theta)	,
		ones(size(z))
	)

!set	(	h	,
		"maxheadsize"	,
		0.	33
	)

!surf	(	x	,
		y	,
		z
	)

unwind_protect_cleanup axes

(

oldh

)

end_unwind_protect endif if	(	nargout	,
		0
	)

if

(

)

newplot

(

)

---

Variable Documentation

!demo !clf[x, y, z] = peaks (25)

!h = surfnorm (x, y, z / 10) quiver3 (x, y, z, u, v, w)

!theta = 2*pi*sqrt(x.^2+y.^2)+pi/2

!z = sin(2*pi*sqrt(x.^2+y.^2))

unwind_protect axes(h)

! hold off

else oldh = gca ()

! hold on

function retval

Initial value:

 quiver3 (varargin)

  [h, varargin, nargin] = __plt_get_axis_arg__ ("quiver3", varargin{:})

tmp = __quiver__ (h, 1, varargin{:})

endif endfunction !demo ! clf y = meshgrid (-1:0.1:1)