int get_index(int num, int dec, int order) {
  int i, j, n;
  int index;
  int div;
  for (i = dec; i > order; i--) {
    n = 1;
    for (j = 0; j < dec - 1; j++)
      n *= 10;
    div = num / n;
    num -= div * n;
    dec--;
  }
  n = 1;
  for (i = 0; i < order - 1; i++)
    n *= 10;
  index = num / n;
  return index;
}


x86 assembly (clang, -O0):
<get_index>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x4(%rbp)
mov    %esi,-0x8(%rbp)
mov    %edx,-0xc(%rbp)
mov    -0x8(%rbp),%eax
mov    %eax,-0x10(%rbp)
mov    -0x10(%rbp),%eax
cmp    -0xc(%rbp),%eax
jle    1183 <get_index+0x83>
movl   $0x1,-0x18(%rbp)
movl   $0x0,-0x14(%rbp)
mov    -0x14(%rbp),%eax
mov    -0x8(%rbp),%ecx
sub    $0x1,%ecx
cmp    %ecx,%eax
jge    1153 <get_index+0x53>
imul   $0xa,-0x18(%rbp),%eax
mov    %eax,-0x18(%rbp)
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    112d <get_index+0x2d>
mov    -0x4(%rbp),%eax
cltd
idivl  -0x18(%rbp)
mov    %eax,-0x20(%rbp)
mov    -0x20(%rbp),%ecx
imul   -0x18(%rbp),%ecx
mov    -0x4(%rbp),%eax
sub    %ecx,%eax
mov    %eax,-0x4(%rbp)
mov    -0x8(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x8(%rbp)
mov    -0x10(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x10(%rbp)
jmp    1113 <get_index+0x13>
movl   $0x1,-0x18(%rbp)
movl   $0x0,-0x10(%rbp)
mov    -0x10(%rbp),%eax
mov    -0xc(%rbp),%ecx
sub    $0x1,%ecx
cmp    %ecx,%eax
jge    11b7 <get_index+0xb7>
imul   $0xa,-0x18(%rbp),%eax
mov    %eax,-0x18(%rbp)
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x10(%rbp)
jmp    1191 <get_index+0x91>
mov    -0x4(%rbp),%eax
cltd
idivl  -0x18(%rbp)
mov    %eax,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<get_index>:
push   %rbp
push   %rbx
mov    %edx,%r8d
mov    %edi,%edx
cmp    %r8d,%esi
jle    12a1 <get_index+0x1a1>
lea    -0x9(%rsi),%r11d
xor    %ecx,%ecx
movdqa 0xee2(%rip),%xmm0
movdqa 0xefa(%rip),%xmm1
movdqa 0xee2(%rip),%xmm2
mov    %esi,%r9d
jmp    1155 <get_index+0x55>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
mov    %edx,%eax
cltd
idiv   %ebx
add    $0x1,%ecx
add    $0xffffffff,%r11d
cmp    %r8d,%r9d
jle    12a1 <get_index+0x1a1>
mov    %r9d,%eax
lea    -0x1(%rax),%r9d
mov    $0x1,%ebx
cmp    $0x2,%eax
jl     1140 <get_index+0x40>
mov    %ecx,%edi
not    %edi
lea    (%rdi,%rsi,1),%r10d
cmp    $0x8,%r10d
jae    1180 <get_index+0x80>
xor    %edi,%edi
mov    $0x1,%ebx
jmp    127f <get_index+0x17f>
mov    %r11d,%ebx
shr    $0x3,%ebx
add    %esi,%edi
add    $0xfffffff8,%edi
mov    %edi,%ebp
shr    $0x3,%ebp
add    $0x1,%ebp
movdqa %xmm0,%xmm4
movdqa %xmm0,%xmm3
cmp    $0x38,%edi
jb     11eb <get_index+0xeb>
lea    0x1(%rbx),%edi
and    $0xfffffff8,%edi
movdqa %xmm0,%xmm4
movdqa %xmm0,%xmm3
xchg   %ax,%ax
pshufd $0xf5,%xmm4,%xmm5
pmuludq %xmm2,%xmm4
pshufd $0xe8,%xmm4,%xmm4
pmuludq %xmm2,%xmm5
pshufd $0xe8,%xmm5,%xmm5
punpckldq %xmm5,%xmm4
pshufd $0xf5,%xmm3,%xmm5
pmuludq %xmm2,%xmm3
pshufd $0xe8,%xmm3,%xmm3
pmuludq %xmm2,%xmm5
pshufd $0xe8,%xmm5,%xmm5
punpckldq %xmm5,%xmm3
add    $0xfffffff8,%edi
jne    11b0 <get_index+0xb0>
mov    %r10d,%edi
and    $0xfffffff8,%edi
test   $0x7,%bpl
je     124a <get_index+0x14a>
add    $0x1,%bl
movzbl %bl,%ebx
and    $0x7,%ebx
neg    %ebx
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
pshufd $0xf5,%xmm4,%xmm5
pmuludq %xmm1,%xmm4
pshufd $0xe8,%xmm4,%xmm4
pmuludq %xmm1,%xmm5
pshufd $0xe8,%xmm5,%xmm5
punpckldq %xmm5,%xmm4
pshufd $0xf5,%xmm3,%xmm5
pmuludq %xmm1,%xmm3
pshufd $0xe8,%xmm3,%xmm3
pmuludq %xmm1,%xmm5
pshufd $0xe8,%xmm5,%xmm5
punpckldq %xmm5,%xmm3
inc    %ebx
jne    1210 <get_index+0x110>
pshufd $0xf5,%xmm4,%xmm5
pshufd $0xf5,%xmm3,%xmm6
pmuludq %xmm5,%xmm6
pmuludq %xmm4,%xmm3
pshufd $0xee,%xmm3,%xmm4
pmuludq %xmm3,%xmm4
pshufd $0xaa,%xmm6,%xmm3
pmuludq %xmm6,%xmm3
pmuludq %xmm4,%xmm3
movd   %xmm3,%ebx
cmp    %edi,%r10d
je     1140 <get_index+0x40>
add    $0x1,%edi
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
add    %ebx,%ebx
lea    (%rbx,%rbx,4),%ebx
add    $0x1,%edi
cmp    %edi,%eax
jne    1290 <get_index+0x190>
jmp    1140 <get_index+0x40>
mov    $0x1,%esi
cmp    $0x2,%r8d
jl     13da <get_index+0x2da>
lea    -0x1(%r8),%ecx
cmp    $0x8,%ecx
jae    12c5 <get_index+0x1c5>
xor    %eax,%eax
mov    $0x1,%esi
jmp    13cb <get_index+0x2cb>
mov    %ecx,%eax
and    $0xfffffff8,%eax
lea    -0x8(%rax),%ebp
mov    %ebp,%edi
shr    $0x3,%edi
add    $0x1,%edi
mov    %edi,%esi
and    $0x7,%esi
cmp    $0x38,%ebp
jae    12ed <get_index+0x1ed>
movdqa 0xd19(%rip),%xmm0
movdqa %xmm0,%xmm1
jmp    134b <get_index+0x24b>
and    $0xfffffff8,%edi
movdqa 0xd08(%rip),%xmm0
movdqa 0xd10(%rip),%xmm2
movdqa %xmm0,%xmm1
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
pshufd $0xf5,%xmm0,%xmm3
pmuludq %xmm2,%xmm0
pshufd $0xe8,%xmm0,%xmm0
pmuludq %xmm2,%xmm3
pshufd $0xe8,%xmm3,%xmm3
punpckldq %xmm3,%xmm0
pshufd $0xf5,%xmm1,%xmm3
pmuludq %xmm2,%xmm1
pshufd $0xe8,%xmm1,%xmm1
pmuludq %xmm2,%xmm3
pshufd $0xe8,%xmm3,%xmm3
punpckldq %xmm3,%xmm1
add    $0xfffffff8,%edi
jne    1310 <get_index+0x210>
test   %esi,%esi
je     139b <get_index+0x29b>
movdqa 0xcc9(%rip),%xmm2
nopw   0x0(%rax,%rax,1)
pshufd $0xf5,%xmm0,%xmm3
pmuludq %xmm2,%xmm0
pshufd $0xe8,%xmm0,%xmm0
pmuludq %xmm2,%xmm3
pshufd $0xe8,%xmm3,%xmm3
punpckldq %xmm3,%xmm0
pshufd $0xf5,%xmm1,%xmm3
pmuludq %xmm2,%xmm1
pshufd $0xe8,%xmm1,%xmm1
pmuludq %xmm2,%xmm3
pshufd $0xe8,%xmm3,%xmm3
punpckldq %xmm3,%xmm1
add    $0xffffffff,%esi
jne    1360 <get_index+0x260>
pshufd $0xf5,%xmm0,%xmm2
pshufd $0xf5,%xmm1,%xmm3
pmuludq %xmm2,%xmm3
pmuludq %xmm0,%xmm1
pshufd $0xee,%xmm1,%xmm0
pmuludq %xmm1,%xmm0
pshufd $0xaa,%xmm3,%xmm1
pmuludq %xmm3,%xmm1
pmuludq %xmm0,%xmm1
movd   %xmm1,%esi
cmp    %eax,%ecx
je     13da <get_index+0x2da>
not    %eax
add    %r8d,%eax
add    %esi,%esi
lea    (%rsi,%rsi,4),%esi
add    $0xffffffff,%eax
jne    13d0 <get_index+0x2d0>
mov    %edx,%eax
cltd
idiv   %esi
pop    %rbx
pop    %rbp
ret

LLVM IR (-O0):
define i32 @get_index(i32 %0, i32 %1, i32 %2) {
%4 = alloca i32
%5 = alloca i32
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32
%9 = alloca i32
%10 = alloca i32
%11 = alloca i32
store i32 %0, i32* %4
store i32 %1, i32* %5
store i32 %2, i32* %6
%12 = load i32, i32* %5
store i32 %12, i32* %7
br label %13
13: ; preds = %40, %3
%14 = load i32, i32* %7
%15 = load i32, i32* %6
%16 = icmp sgt i32 %14, %15
br i1 %16, label %17, label %43
17: ; preds = %13
store i32 1, i32* %9
store i32 0, i32* %8
br label %18
18: ; preds = %26, %17
%19 = load i32, i32* %8
%20 = load i32, i32* %5
%21 = sub nsw i32 %20, 1
%22 = icmp slt i32 %19, %21
br i1 %22, label %23, label %29
23: ; preds = %18
%24 = load i32, i32* %9
%25 = mul nsw i32 %24, 10
store i32 %25, i32* %9
br label %26
26: ; preds = %23
%27 = load i32, i32* %8
%28 = add nsw i32 %27, 1
store i32 %28, i32* %8
br label %18
29: ; preds = %18
%30 = load i32, i32* %4
%31 = load i32, i32* %9
%32 = sdiv i32 %30, %31
store i32 %32, i32* %11
%33 = load i32, i32* %11
%34 = load i32, i32* %9
%35 = mul nsw i32 %33, %34
%36 = load i32, i32* %4
%37 = sub nsw i32 %36, %35
store i32 %37, i32* %4
%38 = load i32, i32* %5
%39 = add nsw i32 %38, -1
store i32 %39, i32* %5
br label %40
40: ; preds = %29
%41 = load i32, i32* %7
%42 = add nsw i32 %41, -1
store i32 %42, i32* %7
br label %13
43: ; preds = %13
store i32 1, i32* %9
store i32 0, i32* %7
br label %44
44: ; preds = %52, %43
%45 = load i32, i32* %7
%46 = load i32, i32* %6
%47 = sub nsw i32 %46, 1
%48 = icmp slt i32 %45, %47
br i1 %48, label %49, label %55
49: ; preds = %44
%50 = load i32, i32* %9
%51 = mul nsw i32 %50, 10
store i32 %51, i32* %9
br label %52
52: ; preds = %49
%53 = load i32, i32* %7
%54 = add nsw i32 %53, 1
store i32 %54, i32* %7
br label %44
55: ; preds = %44
%56 = load i32, i32* %4
%57 = load i32, i32* %9
%58 = sdiv i32 %56, %57
store i32 %58, i32* %10
%59 = load i32, i32* %10
ret i32 %59
}

LLVM IR (-O2):
define i32 @get_index(i32 %0, i32 %1, i32 %2) {
%4 = icmp sgt i32 %1, %2
br i1 %4, label %5, label %59
5: ; preds = %3, %111
%6 = phi i32 [ %115, %111 ], [ 0, %3 ]
%7 = phi i32 [ %17, %111 ], [ %1, %3 ]
%8 = phi i32 [ %113, %111 ], [ %0, %3 ]
%9 = phi i32 [ %18, %111 ], [ %1, %3 ]
%10 = xor i32 %6, -1
%11 = add i32 %10, %1
%12 = add i32 %11, -8
%13 = lshr i32 %12, 3
%14 = add nuw nsw i32 %13, 1
%15 = xor i32 %6, -1
%16 = add i32 %15, %1
%17 = add i32 %7, -1
%18 = add nsw i32 %9, -1
%19 = icmp sgt i32 %9, 1
br i1 %19, label %20, label %111
20: ; preds = %5
%21 = icmp ult i32 %16, 8
br i1 %21, label %56, label %22
22: ; preds = %20
%23 = and i32 %16, -8
%24 = and i32 %14, 7
%25 = icmp ult i32 %12, 56
br i1 %25, label %36, label %26
26: ; preds = %22
%27 = and i32 %14, 1073741816
br label %28
28: ; preds = %28, %26
%29 = phi <4 x i32> [ <i32 1, i32 1, i32 1, i32 1>, %26 ], [ %32, %28 ]
%30 = phi <4 x i32> [ <i32 1, i32 1, i32 1, i32 1>, %26 ], [ %33, %28 ]
%31 = phi i32 [ 0, %26 ], [ %34, %28 ]
%32 = mul <4 x i32> %29, <i32 100000000, i32 100000000, i32 100000000, i32 100000000>
%33 = mul <4 x i32> %30, <i32 100000000, i32 100000000, i32 100000000, i32 100000000>
%34 = add nuw i32 %31, 8
%35 = icmp eq i32 %34, %27
br i1 %35, label %36, label %28
36: ; preds = %28, %22
%37 = phi <4 x i32> [ undef, %22 ], [ %32, %28 ]
%38 = phi <4 x i32> [ undef, %22 ], [ %33, %28 ]
%39 = phi <4 x i32> [ <i32 1, i32 1, i32 1, i32 1>, %22 ], [ %32, %28 ]
%40 = phi <4 x i32> [ <i32 1, i32 1, i32 1, i32 1>, %22 ], [ %33, %28 ]
%41 = icmp eq i32 %24, 0
br i1 %41, label %50, label %42
42: ; preds = %36, %42
%43 = phi <4 x i32> [ %46, %42 ], [ %39, %36 ]
%44 = phi <4 x i32> [ %47, %42 ], [ %40, %36 ]
%45 = phi i32 [ %48, %42 ], [ 0, %36 ]
%46 = mul <4 x i32> %43, <i32 10, i32 10, i32 10, i32 10>
%47 = mul <4 x i32> %44, <i32 10, i32 10, i32 10, i32 10>
%48 = add i32 %45, 1
%49 = icmp eq i32 %48, %24
br i1 %49, label %50, label %42
50: ; preds = %42, %36
%51 = phi <4 x i32> [ %37, %36 ], [ %46, %42 ]
%52 = phi <4 x i32> [ %38, %36 ], [ %47, %42 ]
%53 = mul <4 x i32> %52, %51
%54 = call i32 @llvm.vector.reduce.mul.v4i32(<4 x i32> %53)
%55 = icmp eq i32 %16, %23
br i1 %55, label %111, label %56
56: ; preds = %20, %50
%57 = phi i32 [ 1, %20 ], [ %54, %50 ]
%58 = phi i32 [ 0, %20 ], [ %23, %50 ]
br label %105
59: ; preds = %111, %3
%60 = phi i32 [ %0, %3 ], [ %113, %111 ]
%61 = add i32 %2, -1
%62 = icmp sgt i32 %2, 1
br i1 %62, label %63, label %122
63: ; preds = %59
%64 = icmp ult i32 %61, 8
br i1 %64, label %102, label %65
65: ; preds = %63
%66 = and i32 %61, -8
%67 = add i32 %66, -8
%68 = lshr exact i32 %67, 3
%69 = add nuw nsw i32 %68, 1
%70 = and i32 %69, 7
%71 = icmp ult i32 %67, 56
br i1 %71, label %82, label %72
72: ; preds = %65
%73 = and i32 %69, 1073741816
br label %74
74: ; preds = %74, %72
%75 = phi <4 x i32> [ <i32 1, i32 1, i32 1, i32 1>, %72 ], [ %78, %74 ]
%76 = phi <4 x i32> [ <i32 1, i32 1, i32 1, i32 1>, %72 ], [ %79, %74 ]
%77 = phi i32 [ 0, %72 ], [ %80, %74 ]
%78 = mul <4 x i32> %75, <i32 100000000, i32 100000000, i32 100000000, i32 100000000>
%79 = mul <4 x i32> %76, <i32 100000000, i32 100000000, i32 100000000, i32 100000000>
%80 = add nuw i32 %77, 8
%81 = icmp eq i32 %80, %73
br i1 %81, label %82, label %74
82: ; preds = %74, %65
%83 = phi <4 x i32> [ undef, %65 ], [ %78, %74 ]
%84 = phi <4 x i32> [ undef, %65 ], [ %79, %74 ]
%85 = phi <4 x i32> [ <i32 1, i32 1, i32 1, i32 1>, %65 ], [ %78, %74 ]
%86 = phi <4 x i32> [ <i32 1, i32 1, i32 1, i32 1>, %65 ], [ %79, %74 ]
%87 = icmp eq i32 %70, 0
br i1 %87, label %96, label %88
88: ; preds = %82, %88
%89 = phi <4 x i32> [ %92, %88 ], [ %85, %82 ]
%90 = phi <4 x i32> [ %93, %88 ], [ %86, %82 ]
%91 = phi i32 [ %94, %88 ], [ 0, %82 ]
%92 = mul <4 x i32> %89, <i32 10, i32 10, i32 10, i32 10>
%93 = mul <4 x i32> %90, <i32 10, i32 10, i32 10, i32 10>
%94 = add i32 %91, 1
%95 = icmp eq i32 %94, %70
br i1 %95, label %96, label %88
96: ; preds = %88, %82
%97 = phi <4 x i32> [ %83, %82 ], [ %92, %88 ]
%98 = phi <4 x i32> [ %84, %82 ], [ %93, %88 ]
%99 = mul <4 x i32> %98, %97
%100 = call i32 @llvm.vector.reduce.mul.v4i32(<4 x i32> %99)
%101 = icmp eq i32 %61, %66
br i1 %101, label %122, label %102
102: ; preds = %63, %96
%103 = phi i32 [ 1, %63 ], [ %100, %96 ]
%104 = phi i32 [ 0, %63 ], [ %66, %96 ]
br label %116
105: ; preds = %56, %105
%106 = phi i32 [ %108, %105 ], [ %57, %56 ]
%107 = phi i32 [ %109, %105 ], [ %58, %56 ]
%108 = mul nsw i32 %106, 10
%109 = add nuw nsw i32 %107, 1
%110 = icmp eq i32 %109, %17
br i1 %110, label %111, label %105
111: ; preds = %105, %50, %5
%112 = phi i32 [ 1, %5 ], [ %54, %50 ], [ %108, %105 ]
%113 = srem i32 %8, %112
%114 = icmp sgt i32 %18, %2
%115 = add i32 %6, 1
br i1 %114, label %5, label %59
116: ; preds = %102, %116
%117 = phi i32 [ %119, %116 ], [ %103, %102 ]
%118 = phi i32 [ %120, %116 ], [ %104, %102 ]
%119 = mul nsw i32 %117, 10
%120 = add nuw nsw i32 %118, 1
%121 = icmp eq i32 %120, %61
br i1 %121, label %122, label %116
122: ; preds = %116, %96, %59
%123 = phi i32 [ 1, %59 ], [ %100, %96 ], [ %119, %116 ]
%124 = sdiv i32 %60, %123
ret i32 %124
}