void Periodic_XZ(double *phi, int nX, int nY, int nZ, int Y_to, int Y_from) {
  int iX;
  int iZ;
  for (iX = 0; iX < nX; iX++)
    for (iZ = 0; iZ < nZ; iZ++)
      *(phi + iZ * nX * nY + Y_to * nX + iX) =
          *(phi + iZ * nX * nY + Y_from * nX + iX);
}


x86 assembly (clang, -O0):
<Periodic_XZ>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
mov    %ecx,-0x14(%rbp)
mov    %r8d,-0x18(%rbp)
mov    %r9d,-0x1c(%rbp)
movl   $0x0,-0x20(%rbp)
mov    -0x20(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    11c6 <Periodic_XZ+0xc6>
movl   $0x0,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    11b3 <Periodic_XZ+0xb3>
mov    -0x8(%rbp),%rax
mov    -0x24(%rbp),%ecx
imul   -0xc(%rbp),%ecx
imul   -0x10(%rbp),%ecx
movslq %ecx,%rcx
shl    $0x3,%rcx
add    %rcx,%rax
mov    -0x1c(%rbp),%ecx
imul   -0xc(%rbp),%ecx
movslq %ecx,%rcx
shl    $0x3,%rcx
add    %rcx,%rax
movslq -0x20(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x24(%rbp),%ecx
imul   -0xc(%rbp),%ecx
imul   -0x10(%rbp),%ecx
movslq %ecx,%rcx
shl    $0x3,%rcx
add    %rcx,%rax
mov    -0x18(%rbp),%ecx
imul   -0xc(%rbp),%ecx
movslq %ecx,%rcx
shl    $0x3,%rcx
add    %rcx,%rax
movslq -0x20(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1133 <Periodic_XZ+0x33>
jmp    11b8 <Periodic_XZ+0xb8>
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    1120 <Periodic_XZ+0x20>
pop    %rbp
ret

x86 assembly (clang, -O2):
<Periodic_XZ>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
mov    %ecx,-0x1c(%rsp)
test   %esi,%esi
jle    1256 <Periodic_XZ+0x156>
imul   %esi,%r9d
movslq %r9d,%r9
imul   %esi,%r8d
movslq %r8d,%r14
mov    %esi,%eax
mov    %rax,-0x8(%rsp)
mov    -0x1c(%rsp),%r10d
lea    -0x1(%r10),%rax
mov    %rax,-0x10(%rsp)
mov    %r10d,%eax
and    $0x3,%eax
mov    %rax,-0x18(%rsp)
and    $0xfffffffc,%r10d
imul   %esi,%edx
lea    (%rdx,%rdx,1),%r15d
lea    0x0(,%rdx,4),%r12d
lea    (%rdx,%rdx,2),%r13d
xor    %esi,%esi
jmp    116f <Periodic_XZ+0x6f>
nop
add    $0x1,%rsi
cmp    -0x8(%rsp),%rsi
je     1256 <Periodic_XZ+0x156>
cmpl   $0x0,-0x1c(%rsp)
jle    1160 <Periodic_XZ+0x60>
cmpq   $0x3,-0x10(%rsp)
jae    1190 <Periodic_XZ+0x90>
xor    %ebp,%ebp
jmp    121b <Periodic_XZ+0x11b>
cs nopw 0x0(%rax,%rax,1)
nop
xor    %ebx,%ebx
xor    %ebp,%ebp
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
movslq %ebx,%rbx
lea    (%rdi,%rbx,8),%r11
lea    (%r11,%r9,8),%r8
movsd  (%r8,%rsi,8),%xmm0
lea    (%r11,%r14,8),%rcx
movsd  %xmm0,(%rcx,%rsi,8)
lea    (%rdx,%rbx,1),%ecx
movslq %ecx,%rcx
lea    (%rdi,%rcx,8),%rcx
lea    (%rcx,%r9,8),%rax
movsd  (%rax,%rsi,8),%xmm0
lea    (%rcx,%r14,8),%rax
movsd  %xmm0,(%rax,%rsi,8)
lea    (%r15,%rbx,1),%eax
cltq
lea    (%rdi,%rax,8),%rax
lea    (%rax,%r9,8),%rcx
movsd  (%rcx,%rsi,8),%xmm0
lea    (%rax,%r14,8),%rax
movsd  %xmm0,(%rax,%rsi,8)
lea    0x0(%r13,%rbx,1),%eax
cltq
lea    (%rdi,%rax,8),%rax
lea    (%rax,%r9,8),%rcx
movsd  (%rcx,%rsi,8),%xmm0
lea    (%rax,%r14,8),%rax
movsd  %xmm0,(%rax,%rsi,8)
add    $0x4,%rbp
add    %r12d,%ebx
cmp    %rbp,%r10
jne    11a0 <Periodic_XZ+0xa0>
cmpq   $0x0,-0x18(%rsp)
je     1160 <Periodic_XZ+0x60>
imul   %edx,%ebp
mov    -0x18(%rsp),%rbx
nop
movslq %ebp,%rbp
lea    (%rdi,%rbp,8),%rax
lea    (%rax,%r9,8),%rcx
movsd  (%rcx,%rsi,8),%xmm0
lea    (%rax,%r14,8),%rax
movsd  %xmm0,(%rax,%rsi,8)
add    %edx,%ebp
add    $0xffffffffffffffff,%rbx
jne    1230 <Periodic_XZ+0x130>
jmp    1160 <Periodic_XZ+0x60>
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

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