calculateDay = (year, month, day) -> y = (year - 2000) % 28 m = [6,2,2,5,0,3,5,1,4,6,2,4][month] m-- if month < 2 and y % 4 is 0 y += (y / 4) |

calculateDay = (year, month, day) -> y = (year - 2000) % 28 m = [6,2,2,5,0,3,5,1,4,6,2,4][month] m-- if month < 2 and y % 4 is 0 y += (y / 4) | 0 ['Sun','Mon','Tue','Wed','Thu','Fri','Sat'][(y + m + day) % 7]