#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
scalar_t__ round(double);
double rpn_permute(double n, double r) {
  int start = 1;
  int ri = (int)round(r);
  int ni = (int)round(n);
  int i = 0;
  for (; i < ri; i++) {
    start = start * ni;
    ni--;
  }
  return start;
}


x86 assembly (clang, -O0):
<rpn_permute>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
movsd  %xmm0,-0x8(%rbp)
movsd  %xmm1,-0x10(%rbp)
movl   $0x1,-0x14(%rbp)
movsd  -0x10(%rbp),%xmm0
call   1030 <round@plt>
mov    %eax,-0x18(%rbp)
movsd  -0x8(%rbp),%xmm0
call   1030 <round@plt>
mov    %eax,-0x1c(%rbp)
movl   $0x0,-0x20(%rbp)
mov    -0x20(%rbp),%eax
cmp    -0x18(%rbp),%eax
jge    1177 <rpn_permute+0x67>
mov    -0x14(%rbp),%eax
imul   -0x1c(%rbp),%eax
mov    %eax,-0x14(%rbp)
mov    -0x1c(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    114a <rpn_permute+0x3a>
cvtsi2sdl -0x14(%rbp),%xmm0
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<rpn_permute>:
push   %rbx
sub    $0x10,%rsp
movsd  %xmm0,0x8(%rsp)
movdqa %xmm1,%xmm0
call   1030 <round@plt>
mov    %rax,%rbx
movq   0x8(%rsp),%xmm0
call   1030 <round@plt>
test   %ebx,%ebx
jle    1147 <rpn_permute+0x37>
cmp    $0x8,%ebx
jae    1154 <rpn_permute+0x44>
mov    $0x1,%edx
xor    %ecx,%ecx
jmp    136f <rpn_permute+0x25f>
movsd  0xeb1(%rip),%xmm0
jmp    1392 <rpn_permute+0x282>
mov    %ebx,%ecx
and    $0xfffffff8,%ecx
movd   %eax,%xmm0
pshufd $0x0,%xmm0,%xmm6
paddd  0xea6(%rip),%xmm6
lea    -0x8(%rcx),%edi
mov    %edi,%esi
shr    $0x3,%esi
add    $0x1,%esi
mov    %esi,%edx
and    $0x3,%edx
cmp    $0x18,%edi
jae    1190 <rpn_permute+0x80>
movdqa 0xe99(%rip),%xmm1
movdqa %xmm1,%xmm4
jmp    12c1 <rpn_permute+0x1b1>
and    $0xfffffffc,%esi
movdqa 0xe85(%rip),%xmm1
movdqa 0xe9c(%rip),%xmm9
movdqa 0xea3(%rip),%xmm10
movdqa 0xeaa(%rip),%xmm11
movdqa 0xeb1(%rip),%xmm12
movdqa 0xeb8(%rip),%xmm13
movdqa 0xebf(%rip),%xmm14
movdqa 0xec6(%rip),%xmm15
movdqa %xmm1,%xmm4
xchg   %ax,%ax
movdqa %xmm6,%xmm0
paddd  0xe44(%rip),%xmm0
pshufd $0xf5,%xmm1,%xmm5
pshufd $0xf5,%xmm6,%xmm7
pmuludq %xmm5,%xmm7
pmuludq %xmm6,%xmm1
pshufd $0xf5,%xmm4,%xmm5
pshufd $0xf5,%xmm0,%xmm2
pmuludq %xmm5,%xmm2
pmuludq %xmm4,%xmm0
movdqa %xmm6,%xmm4
paddd  %xmm9,%xmm4
movdqa %xmm6,%xmm5
paddd  %xmm10,%xmm5
pmuludq %xmm4,%xmm1
pshufd $0xf5,%xmm4,%xmm4
pmuludq %xmm7,%xmm4
pmuludq %xmm5,%xmm0
pshufd $0xf5,%xmm5,%xmm5
pmuludq %xmm2,%xmm5
movdqa %xmm6,%xmm2
paddd  %xmm11,%xmm2
movdqa %xmm6,%xmm7
paddd  %xmm12,%xmm7
pshufd $0xf5,%xmm2,%xmm3
pmuludq %xmm4,%xmm3
pmuludq %xmm1,%xmm2
pshufd $0xf5,%xmm7,%xmm8
pmuludq %xmm5,%xmm8
pmuludq %xmm0,%xmm7
movdqa %xmm6,%xmm0
paddd  %xmm13,%xmm0
movdqa %xmm6,%xmm5
paddd  %xmm14,%xmm5
pmuludq %xmm0,%xmm2
pshufd $0xe8,%xmm2,%xmm1
pshufd $0xf5,%xmm0,%xmm0
pmuludq %xmm3,%xmm0
pshufd $0xe8,%xmm0,%xmm0
punpckldq %xmm0,%xmm1
pmuludq %xmm5,%xmm7
pshufd $0xe8,%xmm7,%xmm4
pshufd $0xf5,%xmm5,%xmm0
pmuludq %xmm8,%xmm0
pshufd $0xe8,%xmm0,%xmm0
punpckldq %xmm0,%xmm4
paddd  %xmm15,%xmm6
add    $0xfffffffc,%esi
jne    11e0 <rpn_permute+0xd0>
movdqa %xmm1,%xmm5
movdqa %xmm4,%xmm0
test   %edx,%edx
je     133d <rpn_permute+0x22d>
movdqa 0xd5b(%rip),%xmm2
movdqa 0xd63(%rip),%xmm3
nopl   (%rax)
movdqa %xmm6,%xmm0
paddd  %xmm2,%xmm0
movdqa %xmm6,%xmm5
pmuludq %xmm1,%xmm5
pshufd $0xe8,%xmm5,%xmm5
pshufd $0xf5,%xmm1,%xmm1
pshufd $0xf5,%xmm6,%xmm7
pmuludq %xmm1,%xmm7
pshufd $0xe8,%xmm7,%xmm1
punpckldq %xmm1,%xmm5
pshufd $0xf5,%xmm0,%xmm1
pmuludq %xmm4,%xmm0
pshufd $0xe8,%xmm0,%xmm0
pshufd $0xf5,%xmm4,%xmm4
pmuludq %xmm1,%xmm4
pshufd $0xe8,%xmm4,%xmm1
punpckldq %xmm1,%xmm0
paddd  %xmm3,%xmm6
movdqa %xmm5,%xmm1
movdqa %xmm0,%xmm4
add    $0xffffffff,%edx
jne    12e0 <rpn_permute+0x1d0>
pshufd $0xf5,%xmm5,%xmm1
pshufd $0xf5,%xmm0,%xmm2
pmuludq %xmm1,%xmm2
pmuludq %xmm5,%xmm0
pshufd $0xee,%xmm0,%xmm1
pmuludq %xmm0,%xmm1
pshufd $0xaa,%xmm2,%xmm0
pmuludq %xmm2,%xmm0
pmuludq %xmm1,%xmm0
movd   %xmm0,%edx
cmp    %ebx,%ecx
je     138b <rpn_permute+0x27b>
sub    %ecx,%eax
sub    %ecx,%ebx
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
imul   %eax,%edx
add    $0xffffffff,%eax
add    $0xffffffff,%ebx
jne    1380 <rpn_permute+0x270>
xorps  %xmm0,%xmm0
cvtsi2sd %edx,%xmm0
add    $0x10,%rsp
pop    %rbx
ret

LLVM IR (-O0):
define double @rpn_permute(double %0, double %1) {
%3 = alloca double
%4 = alloca double
%5 = alloca i32
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32
store double %0, double* %3
store double %1, double* %4
store i32 1, i32* %5
%9 = load double, double* %4
%10 = call i64 @round(double %9)
%11 = trunc i64 %10 to i32
store i32 %11, i32* %6
%12 = load double, double* %3
%13 = call i64 @round(double %12)
%14 = trunc i64 %13 to i32
store i32 %14, i32* %7
store i32 0, i32* %8
br label %15
15: ; preds = %25, %2
%16 = load i32, i32* %8
%17 = load i32, i32* %6
%18 = icmp slt i32 %16, %17
br i1 %18, label %19, label %28
19: ; preds = %15
%20 = load i32, i32* %5
%21 = load i32, i32* %7
%22 = mul nsw i32 %20, %21
store i32 %22, i32* %5
%23 = load i32, i32* %7
%24 = add nsw i32 %23, -1
store i32 %24, i32* %7
br label %25
25: ; preds = %19
%26 = load i32, i32* %8
%27 = add nsw i32 %26, 1
store i32 %27, i32* %8
br label %15
28: ; preds = %15
%29 = load i32, i32* %5
%30 = sitofp i32 %29 to double
ret double %30
}

LLVM IR (-O2):
define double @rpn_permute(double %0, double %1) {
%3 = tail call i64 @round(double %1)
%4 = trunc i64 %3 to i32
%5 = tail call i64 @round(double %0)
%6 = icmp sgt i32 %4, 0
br i1 %6, label %7, label %85
7: ; preds = %2
%8 = trunc i64 %5 to i32
%9 = icmp ult i32 %4, 8
br i1 %9, label %70, label %10
10: ; preds = %7
%11 = and i32 %4, -8
%12 = sub i32 %8, %11
%13 = insertelement <4 x i32> poison, i32 %8, i64 0
%14 = shufflevector <4 x i32> %13, <4 x i32> poison, <4 x i32> zeroinitializer
%15 = add <4 x i32> %14, <i32 0, i32 -1, i32 -2, i32 -3>
%16 = add i32 %11, -8
%17 = lshr exact i32 %16, 3
%18 = add nuw nsw i32 %17, 1
%19 = and i32 %18, 3
%20 = icmp ult i32 %16, 24
br i1 %20, label %46, label %21
21: ; preds = %10
%22 = and i32 %18, 1073741820
br label %23
23: ; preds = %23, %21
%24 = phi <4 x i32> [ %15, %21 ], [ %43, %23 ]
%25 = phi <4 x i32> [ <i32 1, i32 1, i32 1, i32 1>, %21 ], [ %41, %23 ]
%26 = phi <4 x i32> [ <i32 1, i32 1, i32 1, i32 1>, %21 ], [ %42, %23 ]
%27 = phi i32 [ 0, %21 ], [ %44, %23 ]
%28 = add <4 x i32> %24, <i32 -4, i32 -4, i32 -4, i32 -4>
%29 = mul <4 x i32> %24, %25
%30 = mul <4 x i32> %28, %26
%31 = add <4 x i32> %24, <i32 -8, i32 -8, i32 -8, i32 -8>
%32 = add <4 x i32> %24, <i32 -12, i32 -12, i32 -12, i32 -12>
%33 = mul <4 x i32> %31, %29
%34 = mul <4 x i32> %32, %30
%35 = add <4 x i32> %24, <i32 -16, i32 -16, i32 -16, i32 -16>
%36 = add <4 x i32> %24, <i32 -20, i32 -20, i32 -20, i32 -20>
%37 = mul <4 x i32> %35, %33
%38 = mul <4 x i32> %36, %34
%39 = add <4 x i32> %24, <i32 -24, i32 -24, i32 -24, i32 -24>
%40 = add <4 x i32> %24, <i32 -28, i32 -28, i32 -28, i32 -28>
%41 = mul <4 x i32> %39, %37
%42 = mul <4 x i32> %40, %38
%43 = add <4 x i32> %24, <i32 -32, i32 -32, i32 -32, i32 -32>
%44 = add i32 %27, 4
%45 = icmp eq i32 %44, %22
br i1 %45, label %46, label %23
46: ; preds = %23, %10
%47 = phi <4 x i32> [ undef, %10 ], [ %41, %23 ]
%48 = phi <4 x i32> [ undef, %10 ], [ %42, %23 ]
%49 = phi <4 x i32> [ %15, %10 ], [ %43, %23 ]
%50 = phi <4 x i32> [ <i32 1, i32 1, i32 1, i32 1>, %10 ], [ %41, %23 ]
%51 = phi <4 x i32> [ <i32 1, i32 1, i32 1, i32 1>, %10 ], [ %42, %23 ]
%52 = icmp eq i32 %19, 0
br i1 %52, label %64, label %53
53: ; preds = %46, %53
%54 = phi <4 x i32> [ %61, %53 ], [ %49, %46 ]
%55 = phi <4 x i32> [ %59, %53 ], [ %50, %46 ]
%56 = phi <4 x i32> [ %60, %53 ], [ %51, %46 ]
%57 = phi i32 [ %62, %53 ], [ 0, %46 ]
%58 = add <4 x i32> %54, <i32 -4, i32 -4, i32 -4, i32 -4>
%59 = mul <4 x i32> %54, %55
%60 = mul <4 x i32> %58, %56
%61 = add <4 x i32> %54, <i32 -8, i32 -8, i32 -8, i32 -8>
%62 = add i32 %57, 1
%63 = icmp eq i32 %62, %19
br i1 %63, label %64, label %53
64: ; preds = %53, %46
%65 = phi <4 x i32> [ %47, %46 ], [ %59, %53 ]
%66 = phi <4 x i32> [ %48, %46 ], [ %60, %53 ]
%67 = mul <4 x i32> %66, %65
%68 = call i32 @llvm.vector.reduce.mul.v4i32(<4 x i32> %67)
%69 = icmp eq i32 %11, %4
br i1 %69, label %82, label %70
70: ; preds = %7, %64
%71 = phi i32 [ 0, %7 ], [ %11, %64 ]
%72 = phi i32 [ %8, %7 ], [ %12, %64 ]
%73 = phi i32 [ 1, %7 ], [ %68, %64 ]
br label %74
74: ; preds = %70, %74
%75 = phi i32 [ %80, %74 ], [ %71, %70 ]
%76 = phi i32 [ %79, %74 ], [ %72, %70 ]
%77 = phi i32 [ %78, %74 ], [ %73, %70 ]
%78 = mul nsw i32 %76, %77
%79 = add nsw i32 %76, -1
%80 = add nuw nsw i32 %75, 1
%81 = icmp eq i32 %80, %4
br i1 %81, label %82, label %74
82: ; preds = %74, %64
%83 = phi i32 [ %68, %64 ], [ %78, %74 ]
%84 = sitofp i32 %83 to double
br label %85
85: ; preds = %82, %2
%86 = phi double [ 1.000000e+00, %2 ], [ %84, %82 ]
ret double %86
}