unsigned short calc_dow(unsigned short d, unsigned short m, unsigned short y) {
  static unsigned short arr[] = {0, 3, 2, 5, 0, 3, 5, 1, 4, 6, 2, 4};
  y -= m < 3;
  return (y + y / 4 - y / 100 + y / 400 + arr[m - 1] + d) % 7;
}


x86 assembly (clang, -O0):
<calc_dow>:
push   %rbp
mov    %rsp,%rbp
mov    %dx,%ax
mov    %si,%cx
mov    %di,%dx
mov    %dx,-0x2(%rbp)
mov    %cx,-0x4(%rbp)
mov    %ax,-0x6(%rbp)
movzwl -0x4(%rbp),%eax
cmp    $0x3,%eax
setl   %al
and    $0x1,%al
movzbl %al,%ecx
movzwl -0x6(%rbp),%eax
sub    %ecx,%eax
mov    %ax,-0x6(%rbp)
movzwl -0x6(%rbp),%eax
mov    %eax,-0x14(%rbp)
movzwl -0x6(%rbp),%eax
mov    $0x4,%ecx
cltd
idiv   %ecx
mov    %eax,%ecx
mov    -0x14(%rbp),%eax
add    %ecx,%eax
mov    %eax,-0x10(%rbp)
movzwl -0x6(%rbp),%eax
mov    $0x64,%ecx
cltd
idiv   %ecx
mov    %eax,%ecx
mov    -0x10(%rbp),%eax
sub    %ecx,%eax
mov    %eax,-0xc(%rbp)
movzwl -0x6(%rbp),%eax
mov    $0x190,%ecx
cltd
idiv   %ecx
mov    %eax,%ecx
mov    -0xc(%rbp),%eax
add    %ecx,%eax
movzwl -0x4(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rdx
lea    0x2ea7(%rip),%rcx
movzwl (%rcx,%rdx,2),%ecx
add    %ecx,%eax
movzwl -0x2(%rbp),%ecx
add    %ecx,%eax
mov    $0x7,%ecx
cltd
idiv   %ecx
mov    %dx,%ax
movzwl %ax,%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<calc_dow>:
mov    %esi,%r8d
cmp    $0x3,%si
sbb    $0x0,%dx
movzwl %dx,%ecx
mov    %ecx,%edx
add    %ecx,%edi
shr    $0x2,%ecx
imul   $0x147b,%ecx,%esi
shr    $0x11,%esi
shr    $0x4,%edx
imul   $0xa3e,%edx,%edx
shr    $0x10,%edx
lea    0xecf(%rip),%rax
movzwl -0x2(%rax,%r8,2),%eax
add    %ecx,%edi
sub    %esi,%edi
add    %edx,%edi
add    %eax,%edi
movslq %edi,%rcx
imul   $0xffffffff92492493,%rcx,%rax
shr    $0x20,%rax
add    %ecx,%eax
mov    %eax,%edx
shr    $0x1f,%edx
sar    $0x2,%eax
add    %edx,%eax
lea    0x0(,%rax,8),%edx
sub    %edx,%eax
add    %ecx,%eax
ret

LLVM IR (-O0):
@calc_dow.arr = internal global [12 x i16] [i16 0, i16 3, i16 2, i16 5, i16 0, i16 3, i16 5, i16 1, i16 4, i16 6, i16 2, i16 4]
define zeroext i16 @calc_dow(i16 zeroext %0, i16 zeroext %1, i16 zeroext %2) {
%4 = alloca i16
%5 = alloca i16
%6 = alloca i16
store i16 %0, i16* %4
store i16 %1, i16* %5
store i16 %2, i16* %6
%7 = load i16, i16* %5
%8 = zext i16 %7 to i32
%9 = icmp slt i32 %8, 3
%10 = zext i1 %9 to i32
%11 = load i16, i16* %6
%12 = zext i16 %11 to i32
%13 = sub nsw i32 %12, %10
%14 = trunc i32 %13 to i16
store i16 %14, i16* %6
%15 = load i16, i16* %6
%16 = zext i16 %15 to i32
%17 = load i16, i16* %6
%18 = zext i16 %17 to i32
%19 = sdiv i32 %18, 4
%20 = add nsw i32 %16, %19
%21 = load i16, i16* %6
%22 = zext i16 %21 to i32
%23 = sdiv i32 %22, 100
%24 = sub nsw i32 %20, %23
%25 = load i16, i16* %6
%26 = zext i16 %25 to i32
%27 = sdiv i32 %26, 400
%28 = add nsw i32 %24, %27
%29 = load i16, i16* %5
%30 = zext i16 %29 to i32
%31 = sub nsw i32 %30, 1
%32 = sext i32 %31 to i64
%33 = getelementptr inbounds [12 x i16], [12 x i16]* @calc_dow.arr, i64 0, i64 %32
%34 = load i16, i16* %33
%35 = zext i16 %34 to i32
%36 = add nsw i32 %28, %35
%37 = load i16, i16* %4
%38 = zext i16 %37 to i32
%39 = add nsw i32 %36, %38
%40 = srem i32 %39, 7
%41 = trunc i32 %40 to i16
ret i16 %41
}

LLVM IR (-O2):
@calc_dow.arr = internal unnamed_addr constant [12 x i16] [i16 0, i16 3, i16 2, i16 5, i16 0, i16 3, i16 5, i16 1, i16 4, i16 6, i16 2, i16 4]
define zeroext i16 @calc_dow(i16 zeroext %0, i16 zeroext %1, i16 zeroext %2) {
%4 = zext i16 %1 to i64
%5 = icmp ult i16 %1, 3
%6 = sext i1 %5 to i16
%7 = add i16 %6, %2
%8 = zext i16 %7 to i32
%9 = lshr i32 %8, 2
%10 = udiv i16 %7, 100
%11 = zext i16 %10 to i32
%12 = udiv i16 %7, 400
%13 = zext i16 %12 to i32
%14 = add nsw i64 %4, -1
%15 = getelementptr inbounds [12 x i16], [12 x i16]* @calc_dow.arr, i64 0, i64 %14
%16 = load i16, i16* %15
%17 = zext i16 %16 to i32
%18 = zext i16 %0 to i32
%19 = add nuw nsw i32 %8, %18
%20 = add nuw nsw i32 %19, %9
%21 = sub nsw i32 %20, %11
%22 = add nsw i32 %21, %13
%23 = add nsw i32 %22, %17
%24 = srem i32 %23, 7
%25 = trunc i32 %24 to i16
ret i16 %25
}