void psede_copy(double *dest, const double *source, int n, int stride,
                int howmany, int dist) {
  int i, j;
  for (i = 0; i < howmany; ++i) {
    for (j = 0; j < n; ++j) {
      dest[j * stride + i * dist] = source[j * stride + i * dist];
    }
  }
}


x86 assembly (clang, -O0):
<psede_copy>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    %ecx,-0x18(%rbp)
mov    %r8d,-0x1c(%rbp)
mov    %r9d,-0x20(%rbp)
movl   $0x0,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    1199 <psede_copy+0x99>
movl   $0x0,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    1186 <psede_copy+0x86>
mov    -0x10(%rbp),%rax
mov    -0x28(%rbp),%ecx
imul   -0x18(%rbp),%ecx
mov    -0x24(%rbp),%edx
imul   -0x20(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%ecx
imul   -0x18(%rbp),%ecx
mov    -0x24(%rbp),%edx
imul   -0x20(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    1134 <psede_copy+0x34>
jmp    118b <psede_copy+0x8b>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1121 <psede_copy+0x21>
pop    %rbp
ret

x86 assembly (clang, -O2):
<psede_copy>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x18,%rsp
mov    %edx,-0x7c(%rsp)
mov    %rsi,-0x60(%rsp)
mov    %rdi,-0x68(%rsp)
test   %r8d,%r8d
jle    1418 <psede_copy+0x318>
mov    %r8d,%eax
movslq %ecx,%rbp
movslq %r9d,%rdx
mov    %r8d,%eax
mov    %rax,0x10(%rsp)
mov    -0x7c(%rsp),%eax
mov    %eax,%esi
mov    %esi,%edi
and    $0xfffffffc,%edi
mov    %rdi,-0x28(%rsp)
add    $0xfffffffffffffffc,%rdi
mov    %rdi,-0x30(%rsp)
shr    $0x2,%rdi
add    $0x1,%rdi
cmp    $0x4,%eax
setae  %al
cmp    $0x1,%ebp
sete   %bl
and    %al,%bl
mov    %bl,-0x7d(%rsp)
mov    %rsi,%rbx
mov    %rdi,%rsi
mov    %rdi,-0x38(%rsp)
and    $0xfffffffffffffffe,%rdi
mov    %rdi,-0x40(%rsp)
mov    %ebx,%r12d
and    $0x3,%r12d
mov    %rbp,%rcx
shl    $0x5,%rcx
mov    -0x68(%rsp),%r10
lea    (%r10,%rcx,1),%rax
add    $0x10,%rax
mov    %rax,-0x48(%rsp)
mov    %rdx,-0x20(%rsp)
lea    0x0(,%rdx,8),%rax
mov    %rax,0x8(%rsp)
mov    %rbp,%rdx
shl    $0x6,%rdx
mov    %rdx,-0x50(%rsp)
mov    %r12,(%rsp)
neg    %r12
mov    %r12,-0x10(%rsp)
mov    -0x60(%rsp),%r12
mov    %rcx,-0x8(%rsp)
add    %r12,%rcx
add    $0x10,%rcx
mov    %rcx,-0x58(%rsp)
mov    %rbp,-0x70(%rsp)
lea    0x0(,%rbp,8),%rcx
mov    %rcx,-0x18(%rsp)
xor    %edi,%edi
xor    %esi,%esi
mov    %rbx,%rax
mov    %rbx,-0x78(%rsp)
jmp    121d <psede_copy+0x11d>
nopl   (%rax)
add    $0x1,%rsi
mov    0x8(%rsp),%rax
add    %rax,%rdi
add    %rax,%r10
add    %rax,%r12
cmp    0x10(%rsp),%rsi
je     1418 <psede_copy+0x318>
cmpl   $0x0,-0x7c(%rsp)
jle    1200 <psede_copy+0x100>
cmpb   $0x0,-0x7d(%rsp)
je     1269 <psede_copy+0x169>
mov    %rsi,%r8
imul   -0x20(%rsp),%r8
mov    -0x78(%rsp),%rax
lea    (%r8,%rax,1),%rcx
mov    -0x68(%rsp),%rdx
lea    (%rdx,%r8,8),%rbp
mov    -0x60(%rsp),%rax
lea    (%rax,%rcx,8),%rbx
cmp    %rbx,%rbp
jae    1370 <psede_copy+0x270>
lea    (%rdx,%rcx,8),%rcx
lea    (%rax,%r8,8),%rbp
cmp    %rcx,%rbp
jae    1370 <psede_copy+0x270>
xor    %edx,%edx
mov    %rdx,%rcx
not    %rcx
add    -0x78(%rsp),%rcx
cmpq   $0x0,(%rsp)
je     12be <psede_copy+0x1be>
mov    %rsi,%r8
mov    -0x18(%rsp),%rsi
mov    %rsi,%rbp
imul   %rdx,%rbp
xor    %ebx,%ebx
mov    -0x10(%rsp),%rax
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movsd  (%r12,%rbp,1),%xmm0
movsd  %xmm0,(%r10,%rbp,1)
add    $0xffffffffffffffff,%rbx
add    %rsi,%rbp
cmp    %rbx,%rax
jne    12a0 <psede_copy+0x1a0>
sub    %rbx,%rdx
mov    %r8,%rsi
cmp    $0x3,%rcx
mov    -0x8(%rsp),%rax
jb     1200 <psede_copy+0x100>
mov    -0x78(%rsp),%rcx
sub    %rdx,%rcx
lea    0x3(%rdx),%rbp
mov    -0x70(%rsp),%r13
imul   %r13,%rbp
mov    -0x68(%rsp),%r11
lea    (%r11,%rbp,8),%r15
mov    -0x60(%rsp),%r8
lea    (%r8,%rbp,8),%rbx
lea    0x2(%rdx),%r9
imul   %r13,%r9
lea    (%r11,%r9,8),%rbp
lea    (%r8,%r9,8),%r9
imul   %rdx,%r13
lea    (%r8,%r13,8),%r14
lea    (%r11,%r13,8),%r13
add    $0x1,%rdx
imul   -0x70(%rsp),%rdx
lea    (%r11,%rdx,8),%r11
lea    (%r8,%rdx,8),%rdx
mov    %rdi,%r8
cs nopw 0x0(%rax,%rax,1)
nop
movsd  (%r14,%r8,1),%xmm0
movsd  %xmm0,0x0(%r13,%r8,1)
movsd  (%rdx,%r8,1),%xmm0
movsd  %xmm0,(%r11,%r8,1)
movsd  (%r9,%r8,1),%xmm0
movsd  %xmm0,0x0(%rbp,%r8,1)
movsd  (%rbx,%r8,1),%xmm0
movsd  %xmm0,(%r15,%r8,1)
add    %rax,%r8
add    $0xfffffffffffffffc,%rcx
jne    1330 <psede_copy+0x230>
jmp    1200 <psede_copy+0x100>
mov    %rsi,%r15
cmpq   $0x0,-0x30(%rsp)
je     13d3 <psede_copy+0x2d3>
mov    -0x40(%rsp),%rbp
mov    %rdi,%r14
mov    %rdi,%rbx
xor    %ecx,%ecx
mov    -0x48(%rsp),%rsi
mov    -0x50(%rsp),%r11
mov    -0x58(%rsp),%rdi
nopw   0x0(%rax,%rax,1)
movups (%rax,%rbx,1),%xmm0
movups 0x10(%rax,%rbx,1),%xmm1
movups %xmm0,(%rdx,%rbx,1)
movups %xmm1,0x10(%rdx,%rbx,1)
movups -0x10(%rdi,%rbx,1),%xmm0
movups (%rdi,%rbx,1),%xmm1
movups %xmm0,-0x10(%rsi,%rbx,1)
movups %xmm1,(%rsi,%rbx,1)
add    $0x8,%rcx
add    %r11,%rbx
add    $0xfffffffffffffffe,%rbp
jne    13a0 <psede_copy+0x2a0>
jmp    13d8 <psede_copy+0x2d8>
mov    %rdi,%r14
xor    %ecx,%ecx
testb  $0x1,-0x38(%rsp)
mov    %r15,%rsi
je     13fd <psede_copy+0x2fd>
imul   -0x70(%rsp),%rcx
add    %r8,%rcx
movups (%rax,%rcx,8),%xmm0
movups 0x10(%rax,%rcx,8),%xmm1
movups %xmm0,(%rdx,%rcx,8)
movups %xmm1,0x10(%rdx,%rcx,8)
mov    -0x28(%rsp),%rcx
mov    %rcx,%rdx
cmp    -0x78(%rsp),%rcx
mov    %r14,%rdi
je     1200 <psede_copy+0x100>
jmp    126b <psede_copy+0x16b>
add    $0x18,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

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