.title	tabday
;
; tables required by day.lib.
; in here if used by more than 1 routine.
;

	.psect	user$d,d

r5laps:: 2,0,ndays
r5idmy:: 4,0,day,month,year
r5dmyi:: 4,day,month,year,0

day::	.word
month::	.word
year::	.word
ndays::	.word

tbnday::31.,28.,31.,30.,31.,30.,31.,31.,30.,31.,30.,31.

months::.asciz	/Jan-Feb-Mar-Apr-May-Jun-Jul-Aug-Sep-Oct-Nov-Dec-/
bad::	.asciz	/  -Bad-  /
	.even
	.end