void m1tr(double *a, int n, int nn1, int nn2, int off, int max, int rep,
          int rstr) {
  int i, j, k, ind1, ind2;
  double tmp1, tmp2;
  nn1 *= 2;
  nn2 *= 2;
  off *= 2;
  max *= 2;
  rstr *= 2;
  for (i = 0; i <= n - 2; i++) {
    ind1 = (i * (nn1 + nn2) + off) % max;
    ind2 = ind1;
    for (j = i + 1; j <= n - 1; j++) {
      ind1 = ind1 + nn2;
      if (ind1 >= max)
        ind1 -= max;
      ind2 = ind2 + nn1;
      if (ind2 >= max)
        ind2 -= max;
      for (k = 0; k < rep * rstr; k += rstr) {
        tmp1 = a[ind1 + k];
        tmp2 = a[ind1 + k + 1];
        a[ind1 + k] = a[ind2 + k];
        a[ind1 + k + 1] = a[ind2 + k + 1];
        a[ind2 + k] = tmp1;
        a[ind2 + k + 1] = tmp2;
      }
    }
  }
}


x86 assembly (clang, -O0):
<m1tr>:
push   %rbp
mov    %rsp,%rbp
mov    0x18(%rbp),%eax
mov    0x10(%rbp),%eax
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
mov    %ecx,-0x14(%rbp)
mov    %r8d,-0x18(%rbp)
mov    %r9d,-0x1c(%rbp)
mov    -0x10(%rbp),%eax
shl    $0x1,%eax
mov    %eax,-0x10(%rbp)
mov    -0x14(%rbp),%eax
shl    $0x1,%eax
mov    %eax,-0x14(%rbp)
mov    -0x18(%rbp),%eax
shl    $0x1,%eax
mov    %eax,-0x18(%rbp)
mov    -0x1c(%rbp),%eax
shl    $0x1,%eax
mov    %eax,-0x1c(%rbp)
mov    0x18(%rbp),%eax
shl    $0x1,%eax
mov    %eax,0x18(%rbp)
movl   $0x0,-0x20(%rbp)
mov    -0x20(%rbp),%eax
mov    -0xc(%rbp),%ecx
sub    $0x2,%ecx
cmp    %ecx,%eax
jg     12d7 <m1tr+0x1d7>
mov    -0x20(%rbp),%eax
mov    -0x10(%rbp),%ecx
add    -0x14(%rbp),%ecx
imul   %ecx,%eax
add    -0x18(%rbp),%eax
cltd
idivl  -0x1c(%rbp)
mov    %edx,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
mov    %eax,-0x30(%rbp)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
mov    -0x24(%rbp),%eax
mov    -0xc(%rbp),%ecx
sub    $0x1,%ecx
cmp    %ecx,%eax
jg     12c4 <m1tr+0x1c4>
mov    -0x2c(%rbp),%eax
add    -0x14(%rbp),%eax
mov    %eax,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jl     11ba <m1tr+0xba>
mov    -0x1c(%rbp),%ecx
mov    -0x2c(%rbp),%eax
sub    %ecx,%eax
mov    %eax,-0x2c(%rbp)
mov    -0x30(%rbp),%eax
add    -0x10(%rbp),%eax
mov    %eax,-0x30(%rbp)
mov    -0x30(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jl     11da <m1tr+0xda>
mov    -0x1c(%rbp),%ecx
mov    -0x30(%rbp),%eax
sub    %ecx,%eax
mov    %eax,-0x30(%rbp)
movl   $0x0,-0x28(%rbp)
mov    -0x28(%rbp),%eax
mov    0x10(%rbp),%ecx
imul   0x18(%rbp),%ecx
cmp    %ecx,%eax
jge    12b1 <m1tr+0x1b1>
mov    -0x8(%rbp),%rax
mov    -0x2c(%rbp),%ecx
add    -0x28(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x38(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x2c(%rbp),%ecx
add    -0x28(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x40(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x30(%rbp),%ecx
add    -0x28(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x2c(%rbp),%ecx
add    -0x28(%rbp),%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x8(%rbp),%rax
mov    -0x30(%rbp),%ecx
add    -0x28(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x2c(%rbp),%ecx
add    -0x28(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x38(%rbp),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x30(%rbp),%ecx
add    -0x28(%rbp),%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x40(%rbp),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x30(%rbp),%ecx
add    -0x28(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    0x18(%rbp),%eax
add    -0x28(%rbp),%eax
mov    %eax,-0x28(%rbp)
jmp    11e1 <m1tr+0xe1>
jmp    12b6 <m1tr+0x1b6>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1189 <m1tr+0x89>
jmp    12c9 <m1tr+0x1c9>
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    1153 <m1tr+0x53>
pop    %rbp
ret

x86 assembly (clang, -O2):
<m1tr>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
mov    %r8d,-0x28(%rsp)
mov    %rsi,-0x20(%rsp)
cmp    $0x2,%esi
jge    1124 <m1tr+0x24>
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
mov    0x40(%rsp),%ebp
add    %edx,%edx
add    %ecx,%ecx
mov    -0x28(%rsp),%eax
add    %eax,%eax
mov    %eax,-0x28(%rsp)
add    %r9d,%r9d
add    %ebp,%ebp
mov    %rcx,-0x8(%rsp)
mov    %rdx,-0x10(%rsp)
lea    (%rcx,%rdx,1),%eax
mov    %eax,-0x14(%rsp)
movslq %ebp,%rbx
imul   0x38(%rsp),%ebp
mov    %ebp,%esi
movslq %ebp,%r11
mov    -0x20(%rsp),%rax
add    $0xffffffff,%eax
mov    %eax,-0x18(%rsp)
xor    %r12d,%r12d
xor    %ecx,%ecx
jmp    117a <m1tr+0x7a>
nopl   0x0(%rax)
mov    -0x24(%rsp),%ecx
cmp    -0x18(%rsp),%ecx
je     1119 <m1tr+0x19>
mov    %ecx,%eax
imul   -0x14(%rsp),%eax
add    -0x28(%rsp),%eax
cltd
idiv   %r9d
add    $0x1,%ecx
mov    %ecx,-0x24(%rsp)
cmp    -0x20(%rsp),%ecx
jge    1170 <m1tr+0x70>
mov    %edx,%r14d
mov    %edx,%r15d
mov    -0x24(%rsp),%r13d
jmp    11bb <m1tr+0xbb>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
add    $0x1,%r13d
cmp    -0x20(%rsp),%r13d
je     1170 <m1tr+0x70>
add    -0x8(%rsp),%r15d
cmp    %r9d,%r15d
mov    %r9d,%eax
cmovl  %r12d,%eax
sub    %eax,%r15d
add    -0x10(%rsp),%r14d
cmp    %r9d,%r14d
mov    %r9d,%eax
cmovl  %r12d,%eax
sub    %eax,%r14d
test   %esi,%esi
jle    11b0 <m1tr+0xb0>
mov    %r14d,%edx
mov    %r15d,%eax
xor    %r8d,%r8d
nopl   0x0(%rax)
cltq
movsd  (%rdi,%rax,8),%xmm0
lea    0x1(%rax),%r10d
movslq %r10d,%rcx
movsd  (%rdi,%rcx,8),%xmm1
movslq %edx,%rdx
movsd  (%rdi,%rdx,8),%xmm2
movsd  %xmm2,(%rdi,%rax,8)
lea    0x1(%rdx),%ebp
movslq %ebp,%rbp
movsd  (%rdi,%rbp,8),%xmm2
movsd  %xmm2,(%rdi,%rcx,8)
movsd  %xmm0,(%rdi,%rdx,8)
movsd  %xmm1,(%rdi,%rbp,8)
add    %rbx,%r8
add    %ebx,%eax
add    %ebx,%edx
cmp    %r11,%r8
jl     11f0 <m1tr+0xf0>
jmp    11b0 <m1tr+0xb0>

LLVM IR (-O0):
define void @m1tr(double* %0, i32 %1, i32 %2, i32 %3, i32 %4, i32 %5, i32 %6, i32 %7) {
%9 = alloca double*
%10 = alloca i32
%11 = alloca i32
%12 = alloca i32
%13 = alloca i32
%14 = alloca i32
%15 = alloca i32
%16 = alloca i32
%17 = alloca i32
%18 = alloca i32
%19 = alloca i32
%20 = alloca i32
%21 = alloca i32
%22 = alloca double
%23 = alloca double
store double* %0, double** %9
store i32 %1, i32* %10
store i32 %2, i32* %11
store i32 %3, i32* %12
store i32 %4, i32* %13
store i32 %5, i32* %14
store i32 %6, i32* %15
store i32 %7, i32* %16
%24 = load i32, i32* %11
%25 = mul nsw i32 %24, 2
store i32 %25, i32* %11
%26 = load i32, i32* %12
%27 = mul nsw i32 %26, 2
store i32 %27, i32* %12
%28 = load i32, i32* %13
%29 = mul nsw i32 %28, 2
store i32 %29, i32* %13
%30 = load i32, i32* %14
%31 = mul nsw i32 %30, 2
store i32 %31, i32* %14
%32 = load i32, i32* %16
%33 = mul nsw i32 %32, 2
store i32 %33, i32* %16
store i32 0, i32* %17
br label %34
34: ; preds = %154, %8
%35 = load i32, i32* %17
%36 = load i32, i32* %10
%37 = sub nsw i32 %36, 2
%38 = icmp sle i32 %35, %37
br i1 %38, label %39, label %157
39: ; preds = %34
%40 = load i32, i32* %17
%41 = load i32, i32* %11
%42 = load i32, i32* %12
%43 = add nsw i32 %41, %42
%44 = mul nsw i32 %40, %43
%45 = load i32, i32* %13
%46 = add nsw i32 %44, %45
%47 = load i32, i32* %14
%48 = srem i32 %46, %47
store i32 %48, i32* %20
%49 = load i32, i32* %20
store i32 %49, i32* %21
%50 = load i32, i32* %17
%51 = add nsw i32 %50, 1
store i32 %51, i32* %18
br label %52
52: ; preds = %150, %39
%53 = load i32, i32* %18
%54 = load i32, i32* %10
%55 = sub nsw i32 %54, 1
%56 = icmp sle i32 %53, %55
br i1 %56, label %57, label %153
57: ; preds = %52
%58 = load i32, i32* %20
%59 = load i32, i32* %12
%60 = add nsw i32 %58, %59
store i32 %60, i32* %20
%61 = load i32, i32* %20
%62 = load i32, i32* %14
%63 = icmp sge i32 %61, %62
br i1 %63, label %64, label %68
64: ; preds = %57
%65 = load i32, i32* %14
%66 = load i32, i32* %20
%67 = sub nsw i32 %66, %65
store i32 %67, i32* %20
br label %68
68: ; preds = %64, %57
%69 = load i32, i32* %21
%70 = load i32, i32* %11
%71 = add nsw i32 %69, %70
store i32 %71, i32* %21
%72 = load i32, i32* %21
%73 = load i32, i32* %14
%74 = icmp sge i32 %72, %73
br i1 %74, label %75, label %79
75: ; preds = %68
%76 = load i32, i32* %14
%77 = load i32, i32* %21
%78 = sub nsw i32 %77, %76
store i32 %78, i32* %21
br label %79
79: ; preds = %75, %68
store i32 0, i32* %19
br label %80
80: ; preds = %145, %79
%81 = load i32, i32* %19
%82 = load i32, i32* %15
%83 = load i32, i32* %16
%84 = mul nsw i32 %82, %83
%85 = icmp slt i32 %81, %84
br i1 %85, label %86, label %149
86: ; preds = %80
%87 = load double*, double** %9
%88 = load i32, i32* %20
%89 = load i32, i32* %19
%90 = add nsw i32 %88, %89
%91 = sext i32 %90 to i64
%92 = getelementptr inbounds double, double* %87, i64 %91
%93 = load double, double* %92
store double %93, double* %22
%94 = load double*, double** %9
%95 = load i32, i32* %20
%96 = load i32, i32* %19
%97 = add nsw i32 %95, %96
%98 = add nsw i32 %97, 1
%99 = sext i32 %98 to i64
%100 = getelementptr inbounds double, double* %94, i64 %99
%101 = load double, double* %100
store double %101, double* %23
%102 = load double*, double** %9
%103 = load i32, i32* %21
%104 = load i32, i32* %19
%105 = add nsw i32 %103, %104
%106 = sext i32 %105 to i64
%107 = getelementptr inbounds double, double* %102, i64 %106
%108 = load double, double* %107
%109 = load double*, double** %9
%110 = load i32, i32* %20
%111 = load i32, i32* %19
%112 = add nsw i32 %110, %111
%113 = sext i32 %112 to i64
%114 = getelementptr inbounds double, double* %109, i64 %113
store double %108, double* %114
%115 = load double*, double** %9
%116 = load i32, i32* %21
%117 = load i32, i32* %19
%118 = add nsw i32 %116, %117
%119 = add nsw i32 %118, 1
%120 = sext i32 %119 to i64
%121 = getelementptr inbounds double, double* %115, i64 %120
%122 = load double, double* %121
%123 = load double*, double** %9
%124 = load i32, i32* %20
%125 = load i32, i32* %19
%126 = add nsw i32 %124, %125
%127 = add nsw i32 %126, 1
%128 = sext i32 %127 to i64
%129 = getelementptr inbounds double, double* %123, i64 %128
store double %122, double* %129
%130 = load double, double* %22
%131 = load double*, double** %9
%132 = load i32, i32* %21
%133 = load i32, i32* %19
%134 = add nsw i32 %132, %133
%135 = sext i32 %134 to i64
%136 = getelementptr inbounds double, double* %131, i64 %135
store double %130, double* %136
%137 = load double, double* %23
%138 = load double*, double** %9
%139 = load i32, i32* %21
%140 = load i32, i32* %19
%141 = add nsw i32 %139, %140
%142 = add nsw i32 %141, 1
%143 = sext i32 %142 to i64
%144 = getelementptr inbounds double, double* %138, i64 %143
store double %137, double* %144
br label %145
145: ; preds = %86
%146 = load i32, i32* %16
%147 = load i32, i32* %19
%148 = add nsw i32 %147, %146
store i32 %148, i32* %19
br label %80
149: ; preds = %80
br label %150
150: ; preds = %149
%151 = load i32, i32* %18
%152 = add nsw i32 %151, 1
store i32 %152, i32* %18
br label %52
153: ; preds = %52
br label %154
154: ; preds = %153
%155 = load i32, i32* %17
%156 = add nsw i32 %155, 1
store i32 %156, i32* %17
br label %34
157: ; preds = %34
ret void
}

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