void transpose_4321_loop_3241_(double *unsorted, double *sorted, int *p_dim1,
                               int *p_dim2, int *p_dim3, int *p_dim4,
                               double *p_factor) {
  unsigned int dim1 = *p_dim1;
  unsigned int dim2 = *p_dim2;
  unsigned int dim3 = *p_dim3;
  unsigned int dim4 = *p_dim4;
  unsigned int old_offset, new_offset;
  unsigned int old_t1, new_t1;
  unsigned int old_t2, new_t2;
  unsigned int old_t3, new_t3;
  unsigned int j1, j2, j3, j4;
  double factor = *p_factor;
  unsigned int dim12 = dim1 * dim2;
  unsigned int dim34 = dim3 * dim4;
  unsigned int dim123 = dim1 * dim2 * dim3;
  unsigned int dim234 = dim2 * dim3 * dim4;
#pragma ivdep
#pragma parallel
#pragma loop count min(10) max(80) avg(40)
#pragma unroll
  for (j3 = 0; j3 < dim3; j3++) {
    old_t1 = dim4 * j3;
    new_t1 = dim12 * j3;
#pragma loop count min(10) max(80) avg(40)
#pragma unroll
    for (j2 = 0; j2 < dim2; j2++) {
      old_t2 = old_t1 + j2 * dim34;
      new_t2 = new_t1 + j2 * dim1;
#pragma loop count min(10) max(80) avg(40)
#pragma unroll
#pragma vector always
      for (j4 = 0; j4 < dim4; j4++) {
        old_t3 = old_t2 + j4;
        new_t3 = new_t2 + dim123 * j4;
#pragma loop count min(10) max(80) avg(40)
#pragma unroll
#pragma vector always
        for (j1 = 0; j1 < dim1; j1++) {
          sorted[new_t3 + j1] = unsorted[old_t3 + dim234 * j1] * factor;
        }
      }
    }
  }
  return;
}


x86 assembly (clang, -O0):
<transpose_4321_loop_3241_>:
push   %rbp
mov    %rsp,%rbp
push   %rax
mov    0x10(%rbp),%rax
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8,-0x28(%rbp)
mov    %r9,-0x30(%rbp)
mov    -0x18(%rbp),%rax
mov    (%rax),%eax
mov    %eax,-0x34(%rbp)
mov    -0x20(%rbp),%rax
mov    (%rax),%eax
mov    %eax,-0x38(%rbp)
mov    -0x28(%rbp),%rax
mov    (%rax),%eax
mov    %eax,-0x3c(%rbp)
mov    -0x30(%rbp),%rax
mov    (%rax),%eax
mov    %eax,-0x40(%rbp)
mov    0x10(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,-0x78(%rbp)
mov    -0x34(%rbp),%eax
imul   -0x38(%rbp),%eax
mov    %eax,-0x7c(%rbp)
mov    -0x3c(%rbp),%eax
imul   -0x40(%rbp),%eax
mov    %eax,-0x80(%rbp)
mov    -0x34(%rbp),%eax
imul   -0x38(%rbp),%eax
imul   -0x3c(%rbp),%eax
mov    %eax,-0x84(%rbp)
mov    -0x38(%rbp),%eax
imul   -0x3c(%rbp),%eax
imul   -0x40(%rbp),%eax
mov    %eax,-0x88(%rbp)
movl   $0x0,-0x6c(%rbp)
mov    -0x6c(%rbp),%eax
cmp    -0x3c(%rbp),%eax
jae    1298 <transpose_4321_loop_3241_+0x198>
mov    -0x40(%rbp),%eax
imul   -0x6c(%rbp),%eax
mov    %eax,-0x4c(%rbp)
mov    -0x7c(%rbp),%eax
imul   -0x6c(%rbp),%eax
mov    %eax,-0x50(%rbp)
movl   $0x0,-0x68(%rbp)
mov    -0x68(%rbp),%eax
cmp    -0x38(%rbp),%eax
jae    1285 <transpose_4321_loop_3241_+0x185>
mov    -0x4c(%rbp),%eax
mov    -0x68(%rbp),%ecx
imul   -0x80(%rbp),%ecx
add    %ecx,%eax
mov    %eax,-0x54(%rbp)
mov    -0x50(%rbp),%eax
mov    -0x68(%rbp),%ecx
imul   -0x34(%rbp),%ecx
add    %ecx,%eax
mov    %eax,-0x58(%rbp)
movl   $0x0,-0x70(%rbp)
mov    -0x70(%rbp),%eax
cmp    -0x40(%rbp),%eax
jae    1272 <transpose_4321_loop_3241_+0x172>
mov    -0x54(%rbp),%eax
add    -0x70(%rbp),%eax
mov    %eax,-0x5c(%rbp)
mov    -0x58(%rbp),%eax
mov    -0x84(%rbp),%ecx
imul   -0x70(%rbp),%ecx
add    %ecx,%eax
mov    %eax,-0x60(%rbp)
movl   $0x0,-0x64(%rbp)
mov    -0x64(%rbp),%eax
cmp    -0x34(%rbp),%eax
jae    125f <transpose_4321_loop_3241_+0x15f>
mov    -0x8(%rbp),%rax
mov    -0x5c(%rbp),%ecx
mov    -0x88(%rbp),%edx
imul   -0x64(%rbp),%edx
add    %edx,%ecx
mov    %ecx,%ecx
movsd  (%rax,%rcx,8),%xmm0
mulsd  -0x78(%rbp),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x60(%rbp),%ecx
add    -0x64(%rbp),%ecx
mov    %ecx,%ecx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x64(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x64(%rbp)
jmp    1215 <transpose_4321_loop_3241_+0x115>
jmp    1264 <transpose_4321_loop_3241_+0x164>
mov    -0x70(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x70(%rbp)
jmp    11e7 <transpose_4321_loop_3241_+0xe7>
jmp    1277 <transpose_4321_loop_3241_+0x177>
mov    -0x68(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x68(%rbp)
jmp    11b6 <transpose_4321_loop_3241_+0xb6>
jmp    128a <transpose_4321_loop_3241_+0x18a>
mov    -0x6c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x6c(%rbp)
jmp    118f <transpose_4321_loop_3241_+0x8f>
add    $0x8,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<transpose_4321_loop_3241_>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
mov    (%r8),%eax
mov    %eax,-0x44(%rsp)
test   %eax,%eax
je     1333 <transpose_4321_loop_3241_+0x233>
mov    0x38(%rsp),%rax
mov    (%rdx),%ebp
mov    (%rcx),%ecx
mov    (%r9),%r8d
movsd  (%rax),%xmm0
mov    %ecx,%eax
imul   %ebp,%eax
mov    %eax,-0x8(%rsp)
mov    %r8d,%edx
mov    -0x44(%rsp),%r10d
imul   %r10d,%edx
mov    %edx,-0x10(%rsp)
imul   %ecx,%edx
mov    %rdx,-0x20(%rsp)
lea    (%rdx,%rdx,1),%ebx
mov    %ecx,%edx
imul   %ebp,%edx
mov    %edx,-0x14(%rsp)
mov    %ecx,-0x3c(%rsp)
imul   %ecx,%r10d
imul   %ebp,%r10d
mov    %ebp,%edx
and    $0xfffffffe,%edx
movl   $0x1,-0x48(%rsp)
xor    %eax,%eax
mov    %rax,-0x28(%rsp)
movl   $0x0,-0x40(%rsp)
mov    %r8d,-0x2c(%rsp)
mov    %r10d,-0xc(%rsp)
jmp    11cb <transpose_4321_loop_3241_+0xcb>
nopw   0x0(%rax,%rax,1)
mov    -0x40(%rsp),%ecx
add    $0x1,%ecx
mov    -0x20(%rsp),%rax
add    %r8d,%eax
mov    %rax,-0x20(%rsp)
mov    -0x48(%rsp),%eax
add    -0x14(%rsp),%eax
mov    %eax,-0x48(%rsp)
mov    -0x28(%rsp),%rax
add    %r8d,%eax
mov    %rax,-0x28(%rsp)
mov    %ecx,-0x40(%rsp)
cmp    -0x44(%rsp),%ecx
je     1333 <transpose_4321_loop_3241_+0x233>
cmpl   $0x0,-0x3c(%rsp)
je     1190 <transpose_4321_loop_3241_+0x90>
movl   $0x0,-0x4c(%rsp)
mov    -0x28(%rsp),%rax
mov    %eax,-0x30(%rsp)
mov    -0x48(%rsp),%eax
mov    %eax,-0x34(%rsp)
mov    -0x20(%rsp),%rax
mov    %eax,-0x38(%rsp)
jmp    1225 <transpose_4321_loop_3241_+0x125>
cs nopw 0x0(%rax,%rax,1)
mov    -0x4c(%rsp),%ecx
add    $0x1,%ecx
mov    -0x10(%rsp),%eax
add    %eax,-0x38(%rsp)
add    %ebp,-0x34(%rsp)
add    %eax,-0x30(%rsp)
mov    %ecx,-0x4c(%rsp)
cmp    -0x3c(%rsp),%ecx
je     1190 <transpose_4321_loop_3241_+0x90>
test   %r8d,%r8d
je     1200 <transpose_4321_loop_3241_+0x100>
mov    -0x4c(%rsp),%eax
imul   %ebp,%eax
mov    %eax,-0x4(%rsp)
xor    %r12d,%r12d
mov    -0x30(%rsp),%r15d
mov    -0x34(%rsp),%r9d
mov    -0x38(%rsp),%r14d
jmp    12bd <transpose_4321_loop_3241_+0x1bd>
nopl   0x0(%rax)
xor    %r13d,%r13d
mov    %r12d,%eax
mov    %rbp,%r8
mov    -0x44(%rsp),%ebp
imul   %ebp,%eax
mov    -0x40(%rsp),%r11d
add    %r11d,%eax
imul   -0x8(%rsp),%eax
mov    -0x3c(%rsp),%ecx
imul   %r13d,%ecx
add    -0x4c(%rsp),%ecx
imul   %ebp,%ecx
mov    %r8,%rbp
add    %r11d,%ecx
mov    -0x2c(%rsp),%r8d
imul   %r8d,%ecx
add    %r12d,%ecx
movsd  (%rdi,%rcx,8),%xmm1
mulsd  %xmm0,%xmm1
add    -0x4(%rsp),%r13d
add    %eax,%r13d
movsd  %xmm1,(%rsi,%r13,8)
add    $0x1,%r12d
add    $0x1,%r14d
add    %r10d,%r9d
add    $0x1,%r15d
cmp    %r8d,%r12d
je     1200 <transpose_4321_loop_3241_+0x100>
test   %rbp,%rbp
je     12a5 <transpose_4321_loop_3241_+0x1a5>
cmp    $0x1,%ebp
je     1250 <transpose_4321_loop_3241_+0x150>
mov    %r15d,%r10d
mov    %r9d,%eax
mov    %r14d,%r8d
xor    %r13d,%r13d
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
mov    %r10d,%r11d
movsd  (%rdi,%r11,8),%xmm1
mulsd  %xmm0,%xmm1
lea    -0x1(%rax),%ecx
movsd  %xmm1,(%rsi,%rcx,8)
mov    %r8d,%ecx
movsd  (%rdi,%rcx,8),%xmm1
mulsd  %xmm0,%xmm1
mov    %eax,%ecx
movsd  %xmm1,(%rsi,%rcx,8)
add    $0x2,%r13
add    %ebx,%r8d
add    $0x2,%eax
add    %ebx,%r10d
cmp    %r13d,%edx
jne    12e0 <transpose_4321_loop_3241_+0x1e0>
test   $0x1,%bpl
mov    -0x2c(%rsp),%r8d
mov    -0xc(%rsp),%r10d
jne    1253 <transpose_4321_loop_3241_+0x153>
jmp    12a5 <transpose_4321_loop_3241_+0x1a5>
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
define void @transpose_4321_loop_3241_(double* nocapture %0, double* nocapture writeonly %1, i32* nocapture %2, i32* nocapture %3, i32* nocapture %4, i32* nocapture %5, double* nocapture %6) {
%8 = load i32, i32* %2
%9 = load i32, i32* %3
%10 = load i32, i32* %4
%11 = load i32, i32* %5
%12 = load double, double* %6
%13 = mul i32 %9, %8
%14 = icmp eq i32 %10, 0
br i1 %14, label %98, label %15
15: ; preds = %7
%16 = icmp eq i32 %9, 0
%17 = icmp eq i32 %11, 0
%18 = icmp eq i32 %8, 0
%19 = and i32 %8, 1
%20 = icmp eq i32 %8, 1
%21 = and i32 %8, -2
%22 = icmp eq i32 %19, 0
br label %23
23: ; preds = %15, %95
%24 = phi i32 [ 0, %15 ], [ %96, %95 ]
br i1 %16, label %95, label %25
25: ; preds = %23, %92
%26 = phi i32 [ %93, %92 ], [ 0, %23 ]
%27 = mul i32 %26, %8
br i1 %17, label %92, label %28
28: ; preds = %25, %89
%29 = phi i32 [ %90, %89 ], [ 0, %25 ]
br i1 %18, label %89, label %30
30: ; preds = %28
%31 = mul i32 %29, %10
%32 = add i32 %31, %24
%33 = mul i32 %13, %32
br i1 %20, label %72, label %34
34: ; preds = %30, %34
%35 = phi i64 [ %68, %34 ], [ 0, %30 ]
%36 = phi i32 [ %69, %34 ], [ 0, %30 ]
%37 = trunc i64 %35 to i32
%38 = mul i32 %9, %37
%39 = add i32 %38, %26
%40 = mul i32 %39, %10
%41 = add i32 %40, %24
%42 = mul i32 %41, %11
%43 = add i32 %42, %29
%44 = zext i32 %43 to i64
%45 = getelementptr inbounds double, double* %0, i64 %44
%46 = load double, double* %45
%47 = fmul double %12, %46
%48 = add i32 %27, %37
%49 = add i32 %48, %33
%50 = zext i32 %49 to i64
%51 = getelementptr inbounds double, double* %1, i64 %50
store double %47, double* %51
%52 = trunc i64 %35 to i32
%53 = or i32 %52, 1
%54 = mul i32 %9, %53
%55 = add i32 %54, %26
%56 = mul i32 %55, %10
%57 = add i32 %56, %24
%58 = mul i32 %57, %11
%59 = add i32 %58, %29
%60 = zext i32 %59 to i64
%61 = getelementptr inbounds double, double* %0, i64 %60
%62 = load double, double* %61
%63 = fmul double %12, %62
%64 = add i32 %27, %53
%65 = add i32 %64, %33
%66 = zext i32 %65 to i64
%67 = getelementptr inbounds double, double* %1, i64 %66
store double %63, double* %67
%68 = add nuw nsw i64 %35, 2
%69 = add i32 %36, 2
%70 = icmp eq i32 %69, %21
br i1 %70, label %71, label %34
71: ; preds = %34
br i1 %22, label %89, label %72
72: ; preds = %30, %71
%73 = phi i64 [ %68, %71 ], [ 0, %30 ]
%74 = trunc i64 %73 to i32
%75 = mul i32 %9, %74
%76 = add i32 %75, %26
%77 = mul i32 %76, %10
%78 = add i32 %77, %24
%79 = mul i32 %78, %11
%80 = add i32 %79, %29
%81 = zext i32 %80 to i64
%82 = getelementptr inbounds double, double* %0, i64 %81
%83 = load double, double* %82
%84 = fmul double %12, %83
%85 = add i32 %27, %74
%86 = add i32 %85, %33
%87 = zext i32 %86 to i64
%88 = getelementptr inbounds double, double* %1, i64 %87
store double %84, double* %88
br label %89
89: ; preds = %72, %71, %28
%90 = add nuw i32 %29, 1
%91 = icmp eq i32 %90, %11
br i1 %91, label %92, label %28
92: ; preds = %89, %25
%93 = add nuw i32 %26, 1
%94 = icmp eq i32 %93, %9
br i1 %94, label %95, label %25
95: ; preds = %92, %23
%96 = add nuw i32 %24, 1
%97 = icmp eq i32 %96, %10
br i1 %97, label %98, label %23
98: ; preds = %95, %7
ret void
}