long int _mpi_divide_dim(long int d_dim[], long int dim, int num_procs) {
  long int rem, sum, old_sum, i, local_dim;
  if ((num_procs <= 0) || (dim <= 0))
    return -1;
  local_dim = dim / num_procs;
  rem = dim % num_procs;
  if (rem > 0)
    local_dim++;
  sum = 0;
  for (i = 0; i < num_procs; i++) {
    if (sum >= dim)
      d_dim[i] = 0;
    else {
      old_sum = sum;
      sum += local_dim;
      if (sum > dim) {
        sum = dim;
        d_dim[i] = dim - old_sum;
      } else
        d_dim[i] = local_dim;
    }
  }
  return local_dim;
}


x86 assembly (clang, -O0):
<_mpi_divide_dim>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %edx,-0x1c(%rbp)
cmpl   $0x0,-0x1c(%rbp)
jle    1124 <_mpi_divide_dim+0x24>
cmpq   $0x0,-0x18(%rbp)
jg     1131 <_mpi_divide_dim+0x31>
movq   $0xffffffffffffffff,-0x8(%rbp)
ff
jmp    1224 <_mpi_divide_dim+0x124>
mov    -0x18(%rbp),%rax
movslq -0x1c(%rbp),%rcx
cqto
idiv   %rcx
mov    %rax,-0x48(%rbp)
mov    -0x18(%rbp),%rax
movslq -0x1c(%rbp),%rcx
cqto
idiv   %rcx
mov    %rdx,-0x28(%rbp)
cmpq   $0x0,-0x28(%rbp)
jle    116a <_mpi_divide_dim+0x6a>
mov    -0x48(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x48(%rbp)
movq   $0x0,-0x30(%rbp)
movq   $0x0,-0x40(%rbp)
mov    -0x40(%rbp),%rax
movslq -0x1c(%rbp),%rcx
cmp    %rcx,%rax
jge    121c <_mpi_divide_dim+0x11c>
mov    -0x30(%rbp),%rax
cmp    -0x18(%rbp),%rax
jl     11ae <_mpi_divide_dim+0xae>
mov    -0x10(%rbp),%rax
mov    -0x40(%rbp),%rcx
movq   $0x0,(%rax,%rcx,8)
jmp    1206 <_mpi_divide_dim+0x106>
mov    -0x30(%rbp),%rax
mov    %rax,-0x38(%rbp)
mov    -0x48(%rbp),%rax
add    -0x30(%rbp),%rax
mov    %rax,-0x30(%rbp)
mov    -0x30(%rbp),%rax
cmp    -0x18(%rbp),%rax
jle    11f1 <_mpi_divide_dim+0xf1>
mov    -0x18(%rbp),%rax
mov    %rax,-0x30(%rbp)
mov    -0x18(%rbp),%rdx
sub    -0x38(%rbp),%rdx
mov    -0x10(%rbp),%rax
mov    -0x40(%rbp),%rcx
mov    %rdx,(%rax,%rcx,8)
jmp    1201 <_mpi_divide_dim+0x101>
mov    -0x48(%rbp),%rdx
mov    -0x10(%rbp),%rax
mov    -0x40(%rbp),%rcx
mov    %rdx,(%rax,%rcx,8)
jmp    1206 <_mpi_divide_dim+0x106>
jmp    120b <_mpi_divide_dim+0x10b>
mov    -0x40(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x40(%rbp)
jmp    117a <_mpi_divide_dim+0x7a>
mov    -0x48(%rbp),%rax
mov    %rax,-0x8(%rbp)
mov    -0x8(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<_mpi_divide_dim>:
mov    $0xffffffffffffffff,%rax
test   %rsi,%rsi
jle    1165 <_mpi_divide_dim+0x65>
mov    %edx,%ecx
test   %edx,%edx
jle    1165 <_mpi_divide_dim+0x65>
mov    %ecx,%r8d
mov    %rsi,%rax
shr    $0x20,%rax
je     1128 <_mpi_divide_dim+0x28>
mov    %rsi,%rax
xor    %edx,%edx
div    %r8
jmp    112f <_mpi_divide_dim+0x2f>
mov    %esi,%eax
xor    %edx,%edx
div    %r8d
cmp    $0x1,%rdx
sbb    $0xffffffffffffffff,%rax
cmp    $0x1,%ecx
jne    1166 <_mpi_divide_dim+0x66>
xor    %ecx,%ecx
xor    %r11d,%r11d
test   $0x1,%r8b
je     1165 <_mpi_divide_dim+0x65>
mov    %rsi,%r8
sub    %r11,%r8
lea    (%r11,%rax,1),%rdx
cmp    %rsi,%rdx
cmovle %rax,%r8
xor    %edx,%edx
cmp    %r11,%rsi
cmovg  %r8,%rdx
mov    %rdx,(%rdi,%rcx,8)
ret
mov    %r8d,%r9d
and    $0xfffffffe,%r9d
xor    %ecx,%ecx
xor    %r11d,%r11d
jmp    1191 <_mpi_divide_dim+0x91>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
xor    %r10d,%r10d
mov    %r10,0x8(%rdi,%rcx,8)
add    $0x2,%rcx
cmp    %rcx,%r9
je     1141 <_mpi_divide_dim+0x41>
cmp    %rsi,%r11
jge    11b0 <_mpi_divide_dim+0xb0>
mov    %rsi,%rdx
sub    %r11,%rdx
add    %rax,%r11
cmp    %rsi,%r11
cmovle %rax,%rdx
cmovg  %rsi,%r11
jmp    11b2 <_mpi_divide_dim+0xb2>
nopl   0x0(%rax)
xor    %edx,%edx
mov    %rdx,(%rdi,%rcx,8)
cmp    %rsi,%r11
jge    1180 <_mpi_divide_dim+0x80>
lea    (%r11,%rax,1),%rdx
cmp    %rsi,%rdx
jg     11d0 <_mpi_divide_dim+0xd0>
mov    %rax,%r10
jmp    11d9 <_mpi_divide_dim+0xd9>
nopl   0x0(%rax)
mov    %rsi,%r10
sub    %r11,%r10
mov    %rsi,%rdx
mov    %rdx,%r11
jmp    1183 <_mpi_divide_dim+0x83>

LLVM IR (-O0):
define i64 @_mpi_divide_dim(i64* %0, i64 %1, i32 %2) {
%4 = alloca i64
%5 = alloca i64*
%6 = alloca i64
%7 = alloca i32
%8 = alloca i64
%9 = alloca i64
%10 = alloca i64
%11 = alloca i64
%12 = alloca i64
store i64* %0, i64** %5
store i64 %1, i64* %6
store i32 %2, i32* %7
%13 = load i32, i32* %7
%14 = icmp sle i32 %13, 0
br i1 %14, label %18, label %15
15: ; preds = %3
%16 = load i64, i64* %6
%17 = icmp sle i64 %16, 0
br i1 %17, label %18, label %19
18: ; preds = %15, %3
store i64 -1, i64* %4
br label %75
19: ; preds = %15
%20 = load i64, i64* %6
%21 = load i32, i32* %7
%22 = sext i32 %21 to i64
%23 = sdiv i64 %20, %22
store i64 %23, i64* %12
%24 = load i64, i64* %6
%25 = load i32, i32* %7
%26 = sext i32 %25 to i64
%27 = srem i64 %24, %26
store i64 %27, i64* %8
%28 = load i64, i64* %8
%29 = icmp sgt i64 %28, 0
br i1 %29, label %30, label %33
30: ; preds = %19
%31 = load i64, i64* %12
%32 = add nsw i64 %31, 1
store i64 %32, i64* %12
br label %33
33: ; preds = %30, %19
store i64 0, i64* %9
store i64 0, i64* %11
br label %34
34: ; preds = %70, %33
%35 = load i64, i64* %11
%36 = load i32, i32* %7
%37 = sext i32 %36 to i64
%38 = icmp slt i64 %35, %37
br i1 %38, label %39, label %73
39: ; preds = %34
%40 = load i64, i64* %9
%41 = load i64, i64* %6
%42 = icmp sge i64 %40, %41
br i1 %42, label %43, label %47
43: ; preds = %39
%44 = load i64*, i64** %5
%45 = load i64, i64* %11
%46 = getelementptr inbounds i64, i64* %44, i64 %45
store i64 0, i64* %46
br label %69
47: ; preds = %39
%48 = load i64, i64* %9
store i64 %48, i64* %10
%49 = load i64, i64* %12
%50 = load i64, i64* %9
%51 = add nsw i64 %50, %49
store i64 %51, i64* %9
%52 = load i64, i64* %9
%53 = load i64, i64* %6
%54 = icmp sgt i64 %52, %53
br i1 %54, label %55, label %63
55: ; preds = %47
%56 = load i64, i64* %6
store i64 %56, i64* %9
%57 = load i64, i64* %6
%58 = load i64, i64* %10
%59 = sub nsw i64 %57, %58
%60 = load i64*, i64** %5
%61 = load i64, i64* %11
%62 = getelementptr inbounds i64, i64* %60, i64 %61
store i64 %59, i64* %62
br label %68
63: ; preds = %47
%64 = load i64, i64* %12
%65 = load i64*, i64** %5
%66 = load i64, i64* %11
%67 = getelementptr inbounds i64, i64* %65, i64 %66
store i64 %64, i64* %67
br label %68
68: ; preds = %63, %55
br label %69
69: ; preds = %68, %43
br label %70
70: ; preds = %69
%71 = load i64, i64* %11
%72 = add nsw i64 %71, 1
store i64 %72, i64* %11
br label %34
73: ; preds = %34
%74 = load i64, i64* %12
store i64 %74, i64* %4
br label %75
75: ; preds = %73, %18
%76 = load i64, i64* %4
ret i64 %76
}

LLVM IR (-O2):
define i64 @_mpi_divide_dim(i64* nocapture writeonly %0, i64 %1, i32 %2) {
%4 = icmp slt i32 %2, 1
%5 = icmp slt i64 %1, 1
%6 = or i1 %5, %4
br i1 %6, label %60, label %7
7: ; preds = %3
%8 = zext i32 %2 to i64
%9 = udiv i64 %1, %8
%10 = urem i64 %1, %8
%11 = icmp ne i64 %10, 0
%12 = zext i1 %11 to i64
%13 = add nuw nsw i64 %9, %12
%14 = and i64 %8, 1
%15 = icmp eq i32 %2, 1
br i1 %15, label %48, label %16
16: ; preds = %7
%17 = and i64 %8, 4294967294
br label %18
18: ; preds = %41, %16
%19 = phi i64 [ 0, %16 ], [ %45, %41 ]
%20 = phi i64 [ 0, %16 ], [ %43, %41 ]
%21 = phi i64 [ 0, %16 ], [ %46, %41 ]
%22 = icmp slt i64 %20, %1
br i1 %22, label %23, label %29
23: ; preds = %18
%24 = add nsw i64 %20, %13
%25 = icmp sgt i64 %24, %1
%26 = sub nsw i64 %1, %20
%27 = select i1 %25, i64 %26, i64 %13
%28 = select i1 %25, i64 %1, i64 %24
br label %29
29: ; preds = %23, %18
%30 = phi i64 [ 0, %18 ], [ %27, %23 ]
%31 = phi i64 [ %20, %18 ], [ %28, %23 ]
%32 = getelementptr inbounds i64, i64* %0, i64 %19
store i64 %30, i64* %32
%33 = or i64 %19, 1
%34 = icmp slt i64 %31, %1
br i1 %34, label %35, label %41
35: ; preds = %29
%36 = add nsw i64 %31, %13
%37 = icmp sgt i64 %36, %1
%38 = sub nsw i64 %1, %31
%39 = select i1 %37, i64 %38, i64 %13
%40 = select i1 %37, i64 %1, i64 %36
br label %41
41: ; preds = %35, %29
%42 = phi i64 [ 0, %29 ], [ %39, %35 ]
%43 = phi i64 [ %31, %29 ], [ %40, %35 ]
%44 = getelementptr inbounds i64, i64* %0, i64 %33
store i64 %42, i64* %44
%45 = add nuw nsw i64 %19, 2
%46 = add i64 %21, 2
%47 = icmp eq i64 %46, %17
br i1 %47, label %48, label %18
48: ; preds = %41, %7
%49 = phi i64 [ 0, %7 ], [ %45, %41 ]
%50 = phi i64 [ 0, %7 ], [ %43, %41 ]
%51 = icmp eq i64 %14, 0
br i1 %51, label %60, label %52
52: ; preds = %48
%53 = icmp slt i64 %50, %1
%54 = add nsw i64 %50, %13
%55 = icmp sgt i64 %54, %1
%56 = sub nsw i64 %1, %50
%57 = select i1 %55, i64 %56, i64 %13
%58 = select i1 %53, i64 %57, i64 0
%59 = getelementptr inbounds i64, i64* %0, i64 %49
store i64 %58, i64* %59
br label %60
60: ; preds = %52, %48, %3
%61 = phi i64 [ -1, %3 ], [ %13, %48 ], [ %13, %52 ]
ret i64 %61
}