#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 */
int /*<<< orphan*/ printf(char *, ...);
int /*<<< orphan*/ scanf(char *, int *);
int ej7() {
  int num, i;
  long double r = 1;
  printf("Ingresar número: \n");
  scanf("%d", &num);
  if (num < 0) {
    printf("Math ERROR\n");
  } else if (num == 0) {
    printf("0!=1\n");
  } else {
    for (i = 1; i <= num; i++) {
      r = r * i;
    }
    printf("%d!=%.0Lf\n", num, r);
  }
  return 0;
}


x86 assembly (clang, -O0):
<ej7>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
fld1
fstpt  -0x20(%rbp)
lea    0xecc(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
lea    0xed2(%rip),%rdi
lea    -0x4(%rbp),%rsi
call   1040 <scanf@plt>
cmpl   $0x0,-0x4(%rbp)
jge    1168 <ej7+0x48>
lea    0xebb(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
jmp    11d5 <ej7+0xb5>
cmpl   $0x0,-0x4(%rbp)
jne    1185 <ej7+0x65>
lea    0xeaa(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
jmp    11d0 <ej7+0xb0>
movl   $0x1,-0x8(%rbp)
mov    -0x8(%rbp),%eax
cmp    -0x4(%rbp),%eax
jg     11b7 <ej7+0x97>
fldt   -0x20(%rbp)
mov    -0x8(%rbp),%eax
mov    %eax,-0x24(%rbp)
fildl  -0x24(%rbp)
fmulp  %st,%st(1)
fstpt  -0x20(%rbp)
mov    -0x8(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x8(%rbp)
jmp    118c <ej7+0x6c>
mov    -0x4(%rbp),%esi
fldt   -0x20(%rbp)
mov    %rsp,%rax
fstpt  (%rax)
lea    0xe60(%rip),%rdi
xor    %eax,%eax
call   1030 <printf@plt>
jmp    11d5 <ej7+0xb5>
xor    %eax,%eax
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<ej7>:
sub    $0x38,%rsp
lea    0xed3(%rip),%rdi
call   1030 <puts@plt>
lea    0xeb9(%rip),%rdi
lea    0x34(%rsp),%rsi
call   1050 <scanf@plt>
mov    0x34(%rsp),%esi
test   %esi,%esi
js     122b <ej7+0xfb>
je     1234 <ej7+0x104>
lea    -0x1(%rsi),%edx
mov    %esi,%eax
and    $0x7,%eax
mov    $0x1,%ecx
fld1
fldz
cmp    $0x7,%edx
jb     11f0 <ej7+0xc0>
fstp   %st(0)
fstp   %st(0)
mov    %esi,%edx
and    $0xfffffff8,%edx
mov    $0x1,%ecx
fld1
nopl   0x0(%rax)
mov    %ecx,0x14(%rsp)
fimull 0x14(%rsp)
lea    0x1(%rcx),%edi
mov    %edi,0x30(%rsp)
fimull 0x30(%rsp)
lea    0x2(%rcx),%edi
mov    %edi,0x18(%rsp)
fimull 0x18(%rsp)
lea    0x3(%rcx),%edi
mov    %edi,0x1c(%rsp)
fimull 0x1c(%rsp)
lea    0x4(%rcx),%edi
mov    %edi,0x20(%rsp)
fimull 0x20(%rsp)
lea    0x5(%rcx),%edi
mov    %edi,0x24(%rsp)
fimull 0x24(%rsp)
lea    0x6(%rcx),%edi
mov    %edi,0x28(%rsp)
fimull 0x28(%rsp)
lea    0x7(%rcx),%edi
mov    %edi,0x2c(%rsp)
fimull 0x2c(%rsp)
add    $0x8,%ecx
cmp    %edx,%edi
jne    1190 <ej7+0x60>
fld    %st(0)
fxch   %st(1)
test   %eax,%eax
je     1216 <ej7+0xe6>
fstp   %st(0)
fldz
fxch   %st(1)
nopw   0x0(%rax,%rax,1)
fstp   %st(1)
mov    %ecx,0x10(%rsp)
fimull 0x10(%rsp)
add    $0x1,%ecx
add    $0xffffffff,%eax
fldz
fxch   %st(1)
jne    1200 <ej7+0xd0>
fstp   %st(1)
fstpt  (%rsp)
lea    0xde1(%rip),%rdi
xor    %eax,%eax
call   1040 <printf@plt>
jmp    1240 <ej7+0x110>
lea    0xdf4(%rip),%rdi
jmp    123b <ej7+0x10b>
lea    0xde6(%rip),%rdi
call   1030 <puts@plt>
xor    %eax,%eax
add    $0x38,%rsp
ret

LLVM IR (-O0):
@.str = [20 x i8] c"Ingresar n\C3\BAmero: \0A\00"
@.str.1 = [3 x i8] c"%d\00"
@.str.2 = [12 x i8] c"Math ERROR\0A\00"
@.str.3 = [6 x i8] c"0!=1\0A\00"
@.str.4 = [11 x i8] c"%d!=%.0Lf\0A\00"
define i32 @ej7() {
%1 = alloca i32
%2 = alloca i32
%3 = alloca x86_fp80
store x86_fp80 0xK3FFF8000000000000000, x86_fp80* %3
%4 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([20 x i8], [20 x i8]* @.str, i64 0, i64 0))
%5 = call i32 @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0), i32* %1)
%6 = load i32, i32* %1
%7 = icmp slt i32 %6, 0
br i1 %7, label %8, label %10
8: ; preds = %0
%9 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([12 x i8], [12 x i8]* @.str.2, i64 0, i64 0))
br label %33
10: ; preds = %0
%11 = load i32, i32* %1
%12 = icmp eq i32 %11, 0
br i1 %12, label %13, label %15
13: ; preds = %10
%14 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([6 x i8], [6 x i8]* @.str.3, i64 0, i64 0))
br label %32
15: ; preds = %10
store i32 1, i32* %2
br label %16
16: ; preds = %25, %15
%17 = load i32, i32* %2
%18 = load i32, i32* %1
%19 = icmp sle i32 %17, %18
br i1 %19, label %20, label %28
20: ; preds = %16
%21 = load x86_fp80, x86_fp80* %3
%22 = load i32, i32* %2
%23 = sitofp i32 %22 to x86_fp80
%24 = fmul x86_fp80 %21, %23
store x86_fp80 %24, x86_fp80* %3
br label %25
25: ; preds = %20
%26 = load i32, i32* %2
%27 = add nsw i32 %26, 1
store i32 %27, i32* %2
br label %16
28: ; preds = %16
%29 = load i32, i32* %1
%30 = load x86_fp80, x86_fp80* %3
%31 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([11 x i8], [11 x i8]* @.str.4, i64 0, i64 0), i32 %29, x86_fp80 %30)
br label %32
32: ; preds = %28, %13
br label %33
33: ; preds = %32, %8
ret i32 0
}

LLVM IR (-O2):
@.str.1 = [3 x i8] c"%d\00"
@.str.4 = [11 x i8] c"%d!=%.0Lf\0A\00"
@str = [19 x i8] c"Ingresar n\C3\BAmero: \00"
@str.5 = [5 x i8] c"0!=1\00"
@str.6 = [11 x i8] c"Math ERROR\00"
define i32 @ej7() {
%1 = alloca i32
%2 = bitcast i32* %1 to i8*
%3 = tail call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([19 x i8], [19 x i8]* @str, i64 0, i64 0))
%4 = call i32 @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0), i32* %1)
%5 = load i32, i32* %1
%6 = icmp slt i32 %5, 0
br i1 %6, label %7, label %9
7: ; preds = %0
%8 = call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([11 x i8], [11 x i8]* @str.6, i64 0, i64 0))
br label %66
9: ; preds = %0
%10 = icmp eq i32 %5, 0
br i1 %10, label %17, label %11
11: ; preds = %9
%12 = add i32 %5, -1
%13 = and i32 %5, 7
%14 = icmp ult i32 %12, 7
br i1 %14, label %49, label %15
15: ; preds = %11
%16 = and i32 %5, -8
br label %19
17: ; preds = %9
%18 = call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([5 x i8], [5 x i8]* @str.5, i64 0, i64 0))
br label %66
19: ; preds = %19, %15
%20 = phi x86_fp80 [ 0xK3FFF8000000000000000, %15 ], [ %45, %19 ]
%21 = phi i32 [ 1, %15 ], [ %46, %19 ]
%22 = phi i32 [ 0, %15 ], [ %47, %19 ]
%23 = sitofp i32 %21 to x86_fp80
%24 = fmul x86_fp80 %20, %23
%25 = add nuw nsw i32 %21, 1
%26 = sitofp i32 %25 to x86_fp80
%27 = fmul x86_fp80 %24, %26
%28 = add nuw nsw i32 %21, 2
%29 = sitofp i32 %28 to x86_fp80
%30 = fmul x86_fp80 %27, %29
%31 = add nuw nsw i32 %21, 3
%32 = sitofp i32 %31 to x86_fp80
%33 = fmul x86_fp80 %30, %32
%34 = add nuw nsw i32 %21, 4
%35 = sitofp i32 %34 to x86_fp80
%36 = fmul x86_fp80 %33, %35
%37 = add nuw nsw i32 %21, 5
%38 = sitofp i32 %37 to x86_fp80
%39 = fmul x86_fp80 %36, %38
%40 = add nuw nsw i32 %21, 6
%41 = sitofp i32 %40 to x86_fp80
%42 = fmul x86_fp80 %39, %41
%43 = add nuw i32 %21, 7
%44 = sitofp i32 %43 to x86_fp80
%45 = fmul x86_fp80 %42, %44
%46 = add nuw i32 %21, 8
%47 = add i32 %22, 8
%48 = icmp eq i32 %47, %16
br i1 %48, label %49, label %19
49: ; preds = %19, %11
%50 = phi x86_fp80 [ undef, %11 ], [ %45, %19 ]
%51 = phi x86_fp80 [ 0xK3FFF8000000000000000, %11 ], [ %45, %19 ]
%52 = phi i32 [ 1, %11 ], [ %46, %19 ]
%53 = icmp eq i32 %13, 0
br i1 %53, label %63, label %54
54: ; preds = %49, %54
%55 = phi x86_fp80 [ %59, %54 ], [ %51, %49 ]
%56 = phi i32 [ %60, %54 ], [ %52, %49 ]
%57 = phi i32 [ %61, %54 ], [ 0, %49 ]
%58 = sitofp i32 %56 to x86_fp80
%59 = fmul x86_fp80 %55, %58
%60 = add nuw i32 %56, 1
%61 = add i32 %57, 1
%62 = icmp eq i32 %61, %13
br i1 %62, label %63, label %54
63: ; preds = %54, %49
%64 = phi x86_fp80 [ %50, %49 ], [ %59, %54 ]
%65 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([11 x i8], [11 x i8]* @.str.4, i64 0, i64 0), i32 %5, x86_fp80 %64)
br label %66
66: ; preds = %17, %63, %7
ret i32 0
}