long long int phi(long long int n) {
  long long int res = n, i, j, k;
  for (i = 2; i * i <= n; i++) {
    if (n % i == 0) {
      while (n % i == 0)
        n = n / i;
      res = res - res / i;
    }
  }
  if (n != 1) {
    res = res - res / n;
  }
  return res;
}


x86 assembly (clang, -O0):
<phi>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,-0x10(%rbp)
movq   $0x2,-0x18(%rbp)
mov    -0x18(%rbp),%rax
imul   -0x18(%rbp),%rax
cmp    -0x8(%rbp),%rax
jg     11a1 <phi+0xa1>
mov    -0x8(%rbp),%rax
cqto
idivq  -0x18(%rbp)
cmp    $0x0,%rdx
jne    118b <phi+0x8b>
jmp    1144 <phi+0x44>
mov    -0x8(%rbp),%rax
cqto
idivq  -0x18(%rbp)
cmp    $0x0,%rdx
jne    116b <phi+0x6b>
mov    -0x8(%rbp),%rax
cqto
idivq  -0x18(%rbp)
mov    %rax,-0x8(%rbp)
jmp    1144 <phi+0x44>
mov    -0x10(%rbp),%rax
mov    %rax,-0x30(%rbp)
mov    -0x10(%rbp),%rax
cqto
idivq  -0x18(%rbp)
mov    %rax,%rcx
mov    -0x30(%rbp),%rax
sub    %rcx,%rax
mov    %rax,-0x10(%rbp)
jmp    1190 <phi+0x90>
mov    -0x18(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
jmp    1118 <phi+0x18>
cmpq   $0x1,-0x8(%rbp)
je     11cc <phi+0xcc>
mov    -0x10(%rbp),%rax
mov    %rax,-0x38(%rbp)
mov    -0x10(%rbp),%rax
cqto
idivq  -0x8(%rbp)
mov    %rax,%rcx
mov    -0x38(%rbp),%rax
sub    %rcx,%rax
mov    %rax,-0x10(%rbp)
mov    -0x10(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<phi>:
cmp    $0x4,%rdi
jge    1130 <phi+0x30>
mov    %rdi,%rcx
cmp    $0x1,%rdi
je     1203 <phi+0x103>
mov    %rcx,%rax
or     %rdi,%rax
shr    $0x20,%rax
je     11fa <phi+0xfa>
mov    %rcx,%rax
cqto
idiv   %rdi
jmp    1200 <phi+0x100>
mov    $0x2,%esi
mov    %rdi,%rcx
jmp    115b <phi+0x5b>
nopw   0x0(%rax,%rax,1)
mov    %rcx,%rax
cqto
idiv   %rsi
sub    %rax,%rcx
add    $0x1,%rsi
mov    %rsi,%rax
imul   %rsi,%rax
cmp    %rdi,%rax
jg     1109 <phi+0x9>
mov    %rdi,%rax
or     %rsi,%rax
shr    $0x20,%rax
je     1180 <phi+0x80>
mov    %rdi,%rax
cqto
idiv   %rsi
test   %rdx,%rdx
jne    114b <phi+0x4b>
jmp    119d <phi+0x9d>
cs nopw 0x0(%rax,%rax,1)
mov    %edi,%eax
xor    %edx,%edx
div    %esi
test   %rdx,%rdx
jne    114b <phi+0x4b>
jmp    119d <phi+0x9d>
nopl   (%rax)
mov    %rdi,%rax
cqto
idiv   %rsi
test   %rdx,%rdx
jne    11df <phi+0xdf>
mov    %rdi,%rax
or     %rsi,%rax
shr    $0x20,%rax
je     11c0 <phi+0xc0>
mov    %rdi,%rax
cqto
idiv   %rsi
mov    %rax,%rdi
jmp    11c8 <phi+0xc8>
cs nopw 0x0(%rax,%rax,1)
mov    %edi,%eax
xor    %edx,%edx
div    %esi
mov    %eax,%edi
mov    %rdi,%rax
or     %rsi,%rax
shr    $0x20,%rax
jne    1190 <phi+0x90>
mov    %edi,%eax
xor    %edx,%edx
div    %esi
test   %rdx,%rdx
je     119d <phi+0x9d>
mov    %rcx,%rax
or     %rsi,%rax
shr    $0x20,%rax
jne    1140 <phi+0x40>
mov    %ecx,%eax
xor    %edx,%edx
div    %esi
jmp    1148 <phi+0x48>
mov    %ecx,%eax
xor    %edx,%edx
div    %edi
sub    %rax,%rcx
mov    %rcx,%rax
ret

LLVM IR (-O0):
define i64 @phi(i64 %0) {
%2 = alloca i64
%3 = alloca i64
%4 = alloca i64
%5 = alloca i64
%6 = alloca i64
store i64 %0, i64* %2
%7 = load i64, i64* %2
store i64 %7, i64* %3
store i64 2, i64* %4
br label %8
8: ; preds = %36, %1
%9 = load i64, i64* %4
%10 = load i64, i64* %4
%11 = mul nsw i64 %9, %10
%12 = load i64, i64* %2
%13 = icmp sle i64 %11, %12
br i1 %13, label %14, label %39
14: ; preds = %8
%15 = load i64, i64* %2
%16 = load i64, i64* %4
%17 = srem i64 %15, %16
%18 = icmp eq i64 %17, 0
br i1 %18, label %19, label %35
19: ; preds = %14
br label %20
20: ; preds = %25, %19
%21 = load i64, i64* %2
%22 = load i64, i64* %4
%23 = srem i64 %21, %22
%24 = icmp eq i64 %23, 0
br i1 %24, label %25, label %29
25: ; preds = %20
%26 = load i64, i64* %2
%27 = load i64, i64* %4
%28 = sdiv i64 %26, %27
store i64 %28, i64* %2
br label %20
29: ; preds = %20
%30 = load i64, i64* %3
%31 = load i64, i64* %3
%32 = load i64, i64* %4
%33 = sdiv i64 %31, %32
%34 = sub nsw i64 %30, %33
store i64 %34, i64* %3
br label %35
35: ; preds = %29, %14
br label %36
36: ; preds = %35
%37 = load i64, i64* %4
%38 = add nsw i64 %37, 1
store i64 %38, i64* %4
br label %8
39: ; preds = %8
%40 = load i64, i64* %2
%41 = icmp ne i64 %40, 1
br i1 %41, label %42, label %48
42: ; preds = %39
%43 = load i64, i64* %3
%44 = load i64, i64* %3
%45 = load i64, i64* %2
%46 = sdiv i64 %44, %45
%47 = sub nsw i64 %43, %46
store i64 %47, i64* %3
br label %48
48: ; preds = %42, %39
%49 = load i64, i64* %3
ret i64 %49
}

LLVM IR (-O2):
define i64 @phi(i64 %0) {
%2 = icmp slt i64 %0, 4
br i1 %2, label %23, label %3
3: ; preds = %1, %17
%4 = phi i64 [ %19, %17 ], [ %0, %1 ]
%5 = phi i64 [ %18, %17 ], [ %0, %1 ]
%6 = phi i64 [ %20, %17 ], [ 2, %1 ]
%7 = srem i64 %4, %6
%8 = icmp eq i64 %7, 0
br i1 %8, label %9, label %17
9: ; preds = %3, %9
%10 = phi i64 [ %11, %9 ], [ %4, %3 ]
%11 = sdiv i64 %10, %6
%12 = srem i64 %11, %6
%13 = icmp eq i64 %12, 0
br i1 %13, label %9, label %14
14: ; preds = %9
%15 = sdiv i64 %5, %6
%16 = sub nsw i64 %5, %15
br label %17
17: ; preds = %3, %14
%18 = phi i64 [ %16, %14 ], [ %5, %3 ]
%19 = phi i64 [ %11, %14 ], [ %4, %3 ]
%20 = add nuw nsw i64 %6, 1
%21 = mul nsw i64 %20, %20
%22 = icmp sgt i64 %21, %19
br i1 %22, label %23, label %3
23: ; preds = %17, %1
%24 = phi i64 [ %0, %1 ], [ %18, %17 ]
%25 = phi i64 [ %0, %1 ], [ %19, %17 ]
%26 = icmp eq i64 %25, 1
br i1 %26, label %30, label %27
27: ; preds = %23
%28 = sdiv i64 %24, %25
%29 = sub nsw i64 %24, %28
br label %30
30: ; preds = %27, %23
%31 = phi i64 [ %29, %27 ], [ %24, %23 ]
ret i64 %31
}