void hflip_smatrix(short **S, long nrl, long nrh, long ncl, long nch,
                   short **D) {
  int i, j, n = ncl + nch;
  for (i = nrl; i <= nrh; i++) {
    for (j = ncl; j <= nch; j++) {
      D[i][n - j] = S[i][j];
    }
  }
}


x86 assembly (clang, -O0):
<hflip_smatrix>:
push   %rbp
mov    %rsp,%rbp
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    -0x20(%rbp),%rax
add    -0x28(%rbp),%rax
mov    %eax,-0x3c(%rbp)
mov    -0x10(%rbp),%rax
mov    %eax,-0x34(%rbp)
movslq -0x34(%rbp),%rax
cmp    -0x18(%rbp),%rax
jg     119f <hflip_smatrix+0x9f>
mov    -0x20(%rbp),%rax
mov    %eax,-0x38(%rbp)
movslq -0x38(%rbp),%rax
cmp    -0x28(%rbp),%rax
jg     118c <hflip_smatrix+0x8c>
mov    -0x8(%rbp),%rax
movslq -0x34(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x38(%rbp),%rcx
mov    (%rax,%rcx,2),%dx
mov    -0x30(%rbp),%rax
movslq -0x34(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    -0x3c(%rbp),%ecx
sub    -0x38(%rbp),%ecx
movslq %ecx,%rcx
mov    %dx,(%rax,%rcx,2)
mov    -0x38(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x38(%rbp)
jmp    1143 <hflip_smatrix+0x43>
jmp    1191 <hflip_smatrix+0x91>
mov    -0x34(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
jmp    112e <hflip_smatrix+0x2e>
pop    %rbp
ret

x86 assembly (clang, -O2):
<hflip_smatrix>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
movslq %esi,%rax
cmp    %rdx,%rax
jle    111d <hflip_smatrix+0x1d>
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
lea    (%r8,%rcx,1),%esi
movslq %ecx,%r11
movslq %esi,%r10
lea    0x1(%r10),%rsi
lea    0x1(%r8),%rcx
lea    0x1(%r11),%r14
cmp    %r14,%rcx
cmovg  %rcx,%r14
mov    %rsi,%r12
sub    %r14,%r12
sub    %r11,%rsi
mov    %rsi,-0x8(%rsp)
mov    %r14,%r13
sub    %r11,%r13
lea    -0x10(%r13),%rcx
mov    %rcx,-0x18(%rsp)
mov    %rcx,%rsi
shr    $0x4,%rsi
add    $0x1,%rsi
mov    %r13,%rcx
and    $0xfffffffffffffff0,%rcx
mov    %rcx,-0x28(%rsp)
add    %r11,%rcx
mov    %rcx,-0x30(%rsp)
mov    %rsi,%rcx
mov    %rsi,-0x20(%rsp)
and    $0xfffffffffffffffe,%rsi
mov    %rsi,-0x40(%rsp)
mov    %r10,%rcx
sub    %r11,%rcx
add    $0xfffffffffffffff9,%rcx
mov    %rcx,-0x48(%rsp)
lea    0x18(%r11),%rcx
mov    %rcx,-0x50(%rsp)
mov    %r13,-0x10(%rsp)
mov    %r12,-0x38(%rsp)
jmp    11bd <hflip_smatrix+0xbd>
nopl   0x0(%rax,%rax,1)
add    $0x1,%rax
cmp    %rdx,%rax
jg     1112 <hflip_smatrix+0x12>
cmp    %r8,%r11
jg     11b0 <hflip_smatrix+0xb0>
mov    (%rdi,%rax,8),%r15
mov    (%r9,%rax,8),%rbp
mov    %r11,%rcx
cmp    $0x10,%r13
jb     1340 <hflip_smatrix+0x240>
lea    0x0(,%r12,2),%rcx
add    %rbp,%rcx
lea    (%r15,%r14,2),%rsi
cmp    %rsi,%rcx
jae    120b <hflip_smatrix+0x10b>
mov    -0x8(%rsp),%rcx
lea    0x0(,%rcx,2),%rsi
add    %rbp,%rsi
lea    (%r15,%r11,2),%rbx
mov    %r11,%rcx
cmp    %rsi,%rbx
jb     1340 <hflip_smatrix+0x240>
mov    %r14,%rsi
mov    %r10,%rcx
cmpq   $0x10,-0x18(%rsp)
jae    1221 <hflip_smatrix+0x121>
xor    %r13d,%r13d
jmp    12cc <hflip_smatrix+0x1cc>
mov    -0x48(%rsp),%rbx
lea    0x0(,%rbx,2),%r10
add    %rbp,%r10
mov    -0x50(%rsp),%rbx
lea    (%r15,%rbx,2),%r12
mov    -0x40(%rsp),%r14
xor    %r13d,%r13d
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
movdqu -0x30(%r12,%r13,2),%xmm0
movdqu -0x20(%r12,%r13,2),%xmm1
pshufd $0x4e,%xmm0,%xmm0
pshuflw $0x1b,%xmm0,%xmm0
pshufhw $0x1b,%xmm0,%xmm0
movdqu %xmm0,(%r10)
pshufd $0x4e,%xmm1,%xmm0
pshuflw $0x1b,%xmm0,%xmm0
pshufhw $0x1b,%xmm0,%xmm0
movdqu %xmm0,-0x10(%r10)
movdqu -0x10(%r12,%r13,2),%xmm0
movdqu (%r12,%r13,2),%xmm1
pshufd $0x4e,%xmm0,%xmm0
pshuflw $0x1b,%xmm0,%xmm0
pshufhw $0x1b,%xmm0,%xmm0
movdqu %xmm0,-0x20(%r10)
pshufd $0x4e,%xmm1,%xmm0
pshuflw $0x1b,%xmm0,%xmm0
pshufhw $0x1b,%xmm0,%xmm0
movdqu %xmm0,-0x30(%r10)
add    $0x20,%r13
add    $0xffffffffffffffc0,%r10
add    $0xfffffffffffffffe,%r14
jne    1250 <hflip_smatrix+0x150>
testb  $0x1,-0x20(%rsp)
mov    %rcx,%r10
mov    %rsi,%r14
mov    -0x38(%rsp),%r12
je     131e <hflip_smatrix+0x21e>
add    %r11,%r13
movdqu (%r15,%r13,2),%xmm0
movdqu 0x10(%r15,%r13,2),%xmm1
mov    %r10,%rcx
sub    %r13,%rcx
pshufd $0x4e,%xmm0,%xmm0
pshuflw $0x1b,%xmm0,%xmm0
pshufhw $0x1b,%xmm0,%xmm0
movdqu %xmm0,-0xe(%rbp,%rcx,2)
pshufd $0x4e,%xmm1,%xmm0
pshuflw $0x1b,%xmm0,%xmm0
pshufhw $0x1b,%xmm0,%xmm0
movdqu %xmm0,-0x1e(%rbp,%rcx,2)
mov    -0x30(%rsp),%rcx
mov    -0x10(%rsp),%r13
cmp    -0x28(%rsp),%r13
je     11b0 <hflip_smatrix+0xb0>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
lea    0x0(%rbp,%r10,2),%rbp
sub    %rcx,%rbp
sub    %rcx,%rbp
nopl   0x0(%rax,%rax,1)
movzwl (%r15,%rcx,2),%esi
mov    %si,0x0(%rbp)
add    $0x1,%rcx
add    $0xfffffffffffffffe,%rbp
cmp    %r8,%rcx
jle    1350 <hflip_smatrix+0x250>
jmp    11b0 <hflip_smatrix+0xb0>

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

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