leaps            3238 src/simh/scp.c                         int leaps = days/4 - days/100 + days/400;
leaps            3240 src/simh/scp.c                         int selector = ((days + leaps + 7) % 7) + lyear * 7;