long getTotient(long number) {
  long result = number;
  if (number % 2 == 0) {
    result -= result / 2;
    do
      number /= 2;
    while (number % 2 == 0);
  }
  long prime;
  for (prime = 3; prime * prime <= number; prime += 2) {
    if (number % prime == 0) {
      result -= result / prime;
      do
        number /= prime;
      while (number % prime == 0);
    }
  }
  if (number > 1)
    result -= result / number;
  return result;
}


x86 assembly (clang, -O0):
<getTotient>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,-0x10(%rbp)
mov    -0x8(%rbp),%rax
mov    $0x2,%ecx
cqto
idiv   %rcx
cmp    $0x0,%rdx
jne    1173 <getTotient+0x73>
mov    -0x10(%rbp),%rax
mov    $0x2,%ecx
cqto
idiv   %rcx
mov    %rax,%rcx
mov    -0x10(%rbp),%rax
sub    %rcx,%rax
mov    %rax,-0x10(%rbp)
mov    -0x8(%rbp),%rax
mov    $0x2,%ecx
cqto
idiv   %rcx
mov    %rax,-0x8(%rbp)
mov    -0x8(%rbp),%rax
mov    $0x2,%ecx
cqto
idiv   %rcx
cmp    $0x0,%rdx
je     1144 <getTotient+0x44>
jmp    1173 <getTotient+0x73>
movq   $0x3,-0x18(%rbp)
mov    -0x18(%rbp),%rax
imul   -0x18(%rbp),%rax
cmp    -0x8(%rbp),%rax
jg     11fa <getTotient+0xfa>
mov    -0x8(%rbp),%rax
cqto
idivq  -0x18(%rbp)
cmp    $0x0,%rdx
jne    11e4 <getTotient+0xe4>
mov    -0x10(%rbp),%rax
cqto
idivq  -0x18(%rbp)
mov    %rax,%rcx
mov    -0x10(%rbp),%rax
sub    %rcx,%rax
mov    %rax,-0x10(%rbp)
mov    -0x18(%rbp),%rcx
mov    -0x8(%rbp),%rax
cqto
idiv   %rcx
mov    %rax,-0x8(%rbp)
mov    -0x8(%rbp),%rax
cqto
idivq  -0x18(%rbp)
cmp    $0x0,%rdx
je     11ba <getTotient+0xba>
jmp    11e4 <getTotient+0xe4>
jmp    11e9 <getTotient+0xe9>
mov    -0x18(%rbp),%rax
add    $0x2,%rax
mov    %rax,-0x18(%rbp)
jmp    117b <getTotient+0x7b>
cmpq   $0x1,-0x8(%rbp)
jle    121d <getTotient+0x11d>
mov    -0x10(%rbp),%rax
cqto
idivq  -0x8(%rbp)
mov    %rax,%rcx
mov    -0x10(%rbp),%rax
sub    %rcx,%rax
mov    %rax,-0x10(%rbp)
mov    -0x10(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<getTotient>:
mov    %rdi,%r8
test   $0x1,%r8b
jne    113d <getTotient+0x3d>
mov    %r8,%rax
shr    $0x3f,%rax
add    %r8,%rax
sar    %rax
neg    %rax
mov    %r8,%rcx
nopl   0x0(%rax)
mov    %rcx,%rdx
shr    $0x3f,%rdx
add    %rdx,%rcx
sar    %rcx
test   $0x1,%cl
je     1120 <getTotient+0x20>
add    %rax,%r8
cmp    $0x9,%rcx
jl     1146 <getTotient+0x46>
jmp    116d <getTotient+0x6d>
mov    %r8,%rcx
cmp    $0x9,%rcx
jge    116d <getTotient+0x6d>
cmp    $0x2,%rcx
jl     123e <getTotient+0x13e>
mov    %r8,%rax
or     %rcx,%rax
shr    $0x20,%rax
je     1234 <getTotient+0x134>
mov    %r8,%rax
cqto
idiv   %rcx
jmp    123b <getTotient+0x13b>
mov    $0x3,%edi
jmp    1193 <getTotient+0x93>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
sub    %rsi,%r8
add    $0x2,%rdi
mov    %rdi,%rax
imul   %rdi,%rax
cmp    %rcx,%rax
jg     1146 <getTotient+0x46>
mov    %rcx,%rax
or     %rdi,%rax
shr    $0x20,%rax
je     11b0 <getTotient+0xb0>
mov    %rcx,%rax
cqto
idiv   %rdi
test   %rdx,%rdx
jne    1183 <getTotient+0x83>
jmp    11bb <getTotient+0xbb>
xchg   %ax,%ax
mov    %ecx,%eax
xor    %edx,%edx
div    %edi
test   %rdx,%rdx
jne    1183 <getTotient+0x83>
mov    %r8,%rax
or     %rdi,%rax
shr    $0x20,%rax
je     11d4 <getTotient+0xd4>
mov    %r8,%rax
cqto
idiv   %rdi
mov    %rax,%rsi
jmp    11ed <getTotient+0xed>
mov    %r8d,%eax
xor    %edx,%edx
div    %edi
mov    %eax,%esi
jmp    11ed <getTotient+0xed>
nop
mov    %rcx,%rax
cqto
idiv   %rdi
test   %rdx,%rdx
jne    1180 <getTotient+0x80>
mov    %rcx,%rax
or     %rdi,%rax
shr    $0x20,%rax
je     1210 <getTotient+0x110>
mov    %rcx,%rax
cqto
idiv   %rdi
mov    %rax,%rcx
jmp    1218 <getTotient+0x118>
cs nopw 0x0(%rax,%rax,1)
mov    %ecx,%eax
xor    %edx,%edx
div    %edi
mov    %eax,%ecx
mov    %rcx,%rax
or     %rdi,%rax
shr    $0x20,%rax
jne    11e0 <getTotient+0xe0>
mov    %ecx,%eax
xor    %edx,%edx
div    %edi
test   %rdx,%rdx
je     11ed <getTotient+0xed>
jmp    1180 <getTotient+0x80>
mov    %r8d,%eax
xor    %edx,%edx
div    %ecx
sub    %rax,%r8
mov    %r8,%rax
ret

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

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