If you're a cheap b*d like myself, use this script to print a list of old calendars which can be used again [rvb] reference: http://webexhibits.org/calendars/year-definitions.html ---- array set R {0 {28} 1 {6 17 28} 2 {11 17 28} 3 {11 22 28}} set this_year 2006 set last_year 2040 for {set year [expr {$this_year - 28}]} {$year < $last_year} {incr year} { foreach r $R([expr {$year % 4}]) { lappend Y([expr {$year + $r}]) $year } } for {set year $this_year} {$year <= $last_year} {incr year} { puts "$year : $Y($year)" } ---- [Category Date and Time]