surfl.m File Reference

Functions
	newplot ()
	if (ischar(varargin{end})) lstr
	if (strncmp(tolower(lstr),"light", 5)) warning("light method not supported (yet)
	elseif (strncmp(tolower(lstr),"cdata", 5)) use_cdata
else	error ("surfl: unknown lighting method")
endif	varargin (end)
endif	if (length(varargin{end})==4 &&isnumeric(varargin{end})) r
	if (isnumeric(varargin{end})) len
	if (len==3) lv
	elseif (len==2)[lv(1)
	lv (2)
	lv (3)]
	if (!ishold()) set(h
	if (!have_lv) Phi
	sin (Phi)
	cos (Phi)
Variables
function	retval
	oldh = gca ()
unwind_protect	axes (h)
	use_cdata = true
else	r = [0.55, 0.6, 0.4, 10]
endif	have_lv = false
	lastarg = varargin{end}
endif endif	tmp = surface (varargin{:})
	view
	xgrid
	on
	ygrid
	zgrid
	clim
endif	a = axis
	vv = view sph2cart ((az - 90) * pi/180.0, el * pi/180.0, 1.0) norm (vv)
	R = [cos(Phi), -sin(Phi), 0

---

Function Documentation

cos

(

Phi

)

elseif

(

len

= = 2

)

elseif

(

strncmp(tolower(lstr),"cdata", 5)

)

else error

(

"surfl: unknown lighting method"

)

if

(

!

have_lv

)

if

(

!

ishold()

)

if

(

len

= =3

)

if

(

isnumeric(varargin{end})

)

endif if

(

length(varargin{end})

= =4 &&isnumeric(varargin{end})

)

if

(

strncmp(tolower(lstr),"light", 5)

)

if

(

ischar(varargin{end})

)

lv

(

3

)

lv

(

2

)

newplot

(

)

sin

(

Phi

)

endif varargin

(

end

)

---

Variable Documentation

endif a = axis

unwind_protect axes(h)

clim

have_lv = false

lastarg = varargin{end}

oldh = gca ()

on

R = [cos(Phi), -sin(Phi), 0

else r = [0.55, 0.6, 0.4, 10]

function retval

Initial value:

 surfl (varargin)

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

endif endif tmp = surface (varargin{:})

use_cdata = true

view

vv = view sph2cart ((az - 90) * pi/180.0, el * pi/180.0, 1.0) norm (vv)

xgrid

ygrid

zgrid