weekday.m File Reference

Functions
endif	if (nargin< 2) form
endif	if (iscell(d)||isnumeric(d)) endsize
	elseif (ischar(d)) endsize
endif	if (ischar(d)||iscell(d)) d
	d (!d)
	if (nargout > 1) if(strcmpi(form
endif endfunction	!assert (weekday(728647), 2)%!assert(weekday([728647 728648])
endif endfunction	!assert (weekday([728647;728648]),[2;3])%!assert(weekday('19-Dec-1994')
endif endfunction	!assert (weekday('20-Dec-1994'), 3)%!assert(weekday('21-Dec-1994')
endif endfunction	!assert (weekday('22-Dec-1994'), 5)%!assert(weekday('23-Dec-1994')
endif endfunction	!assert (weekday('24-Dec-1994'), 7)%!assert(weekday('25-Dec-1994')
endif endfunction	!assert (weekday('6-Jan-2008'), 1)%!assert(weekday('1-Feb-2008')
endif endfunction	!assert (weekday('2-Feb-2008'), 7)%!assert(weekday('3-Feb-2008')
endif endfunction	!assert (weekday('4-Feb-2008'), 2)%!assert(weekday('5-Feb-2008')
endif endfunction	!assert (weekday('6-Feb-2008'), 4)%!assert(weekday('7-Feb-2008')
endif endfunction	!assert (weekday(728647.1), 2)%!demo%![n
Variables
	function [d, s]
endif	d = floor (reshape (mod(d - 733048, 7), endsize))
long	names
endif	s = strvcat (names(d))

---

Function Documentation

endif endfunction !assert	(	weekday(728647.1)	,
		2
	)

endif endfunction !assert	(	weekday('6-Feb-2008')	,
		4
	)

endif endfunction !assert	(	weekday('4-Feb-2008')	,
		2
	)

endif endfunction !assert	(	weekday('2-Feb-2008')	,
		7
	)

endif endfunction !assert	(	weekday('6-Jan-2008')	,
		1
	)

endif endfunction !assert	(	weekday('24-Dec-1994')	,
		7
	)

endif endfunction !assert	(	weekday('22-Dec-1994')	,
		5
	)

endif endfunction !assert	(	weekday('20-Dec-1994')	,
		3
	)

endif endfunction !assert

(

weekday([728647;728648])

)

endif endfunction !assert	(	weekday(728647)	,
		2
	)

d

(

!

d

)

elseif

(

ischar(d)

)

if	(	nargout	,
		1
	)

endif if

(

ischar(d)||iscell(d)

)

endif if

(

iscell(d)||isnumeric(d)

)

endif if

(

)

---

Variable Documentation

endif d = floor (reshape (mod(d - 733048, 7), endsize))

function[d, s]

Initial value:

 weekday (d, form)

  if (nargin < 1 || nargin > 2)
    print_usage ()

else names

Initial value:

 {"Sunday" "Monday" "Tuesday" "Wednesday" "Thursday"
               "Friday" "Saturday"}

endif s = strvcat (names(d))