short dobra_semente(semente, buffer)
unsigned char *semente;
unsigned char *buffer;
{
  short sudirrito, soma;
  short dadireita, daesquerda, ultimo;
  ultimo = strlen((char *)semente) - 1;
  soma = somatoria(semente);
  daesquerda = (ultimo) % soma;
  dadireita = posterior(daesquerda, ultimo);
  for (sudirrito = 0; sudirrito <= ultimo; sudirrito++)
    if (sudirrito & 0x01) {
      buffer[sudirrito] = semente[dadireita];
      dadireita = posterior(dadireita, ultimo);
    } else {
      buffer[sudirrito] = semente[daesquerda];
      daesquerda = anterior(daesquerda, ultimo);
    }
  buffer[sudirrito] = '\0';
  return soma;
}


x86 assembly (clang, -O0):
<dobra_semente>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    -0x8(%rbp),%rdi
call   1030 <strlen@plt>
sub    $0x1,%rax
mov    %ax,-0x1a(%rbp)
mov    -0x8(%rbp),%rdi
mov    $0x0,%al
call   1060 <somatoria@plt>
mov    %ax,-0x14(%rbp)
movswl -0x1a(%rbp),%eax
movswl -0x14(%rbp),%ecx
cltd
idiv   %ecx
mov    %dx,%ax
mov    %ax,-0x18(%rbp)
movswl -0x18(%rbp),%edi
movswl -0x1a(%rbp),%esi
mov    $0x0,%al
call   1040 <posterior@plt>
mov    %ax,-0x16(%rbp)
movw   $0x0,-0x12(%rbp)
movswl -0x12(%rbp),%eax
movswl -0x1a(%rbp),%ecx
cmp    %ecx,%eax
jg     122c <dobra_semente+0xec>
movswl -0x12(%rbp),%eax
and    $0x1,%eax
cmp    $0x0,%eax
je     11eb <dobra_semente+0xab>
mov    -0x8(%rbp),%rax
movswq -0x16(%rbp),%rcx
mov    (%rax,%rcx,1),%dl
mov    -0x10(%rbp),%rax
movswq -0x12(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
movswl -0x16(%rbp),%edi
movswl -0x1a(%rbp),%esi
mov    $0x0,%al
call   1040 <posterior@plt>
mov    %ax,-0x16(%rbp)
jmp    1216 <dobra_semente+0xd6>
mov    -0x8(%rbp),%rax
movswq -0x18(%rbp),%rcx
mov    (%rax,%rcx,1),%dl
mov    -0x10(%rbp),%rax
movswq -0x12(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
movswl -0x18(%rbp),%edi
movswl -0x1a(%rbp),%esi
mov    $0x0,%al
call   1050 <anterior@plt>
mov    %ax,-0x18(%rbp)
jmp    121b <dobra_semente+0xdb>
mov    -0x12(%rbp),%ax
add    $0x1,%ax
mov    %ax,-0x12(%rbp)
jmp    119b <dobra_semente+0x5b>
mov    -0x10(%rbp),%rax
movswq -0x12(%rbp),%rcx
movb   $0x0,(%rax,%rcx,1)
movswl -0x14(%rbp),%eax
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<dobra_semente>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
push   %rax
mov    %rsi,%r14
mov    %rdi,%r12
call   1030 <strlen@plt>
mov    %rax,%rbx
mov    %r12,%rdi
xor    %eax,%eax
call   1060 <somatoria@plt>
shl    $0x10,%ebx
add    $0xffff0000,%ebx
mov    %ebx,%ebp
sar    $0x10,%ebp
mov    %eax,0x4(%rsp)
movswl %ax,%ecx
mov    %ebp,%eax
cltd
idiv   %ecx
mov    %edx,%r13d
mov    %edx,%edi
mov    %ebp,%esi
xor    %eax,%eax
call   1040 <posterior@plt>
test   %ebx,%ebx
js     11f4 <dobra_semente+0xb4>
mov    %eax,%r15d
xor    %ebx,%ebx
jmp    11c9 <dobra_semente+0x89>
cs nopw 0x0(%rax,%rax,1)
movswq %r13w,%rax
movzbl (%r12,%rax,1),%ecx
movslq %ebx,%rdx
mov    %cl,(%r14,%rdx,1)
movswl %ax,%edi
mov    %ebp,%esi
xor    %eax,%eax
call   1050 <anterior@plt>
mov    %eax,%r13d
add    $0x1,%ebx
movswl %bx,%ebx
cmp    %ebx,%ebp
jl     11ef <dobra_semente+0xaf>
test   $0x1,%bl
je     11a0 <dobra_semente+0x60>
movswq %r15w,%rax
movzbl (%r12,%rax,1),%ecx
movslq %ebx,%rdx
mov    %cl,(%r14,%rdx,1)
movswl %ax,%edi
mov    %ebp,%esi
xor    %eax,%eax
call   1040 <posterior@plt>
mov    %eax,%r15d
jmp    11bf <dobra_semente+0x7f>
movslq %ebx,%rax
jmp    11f6 <dobra_semente+0xb6>
xor    %eax,%eax
movb   $0x0,(%r14,%rax,1)
mov    0x4(%rsp),%eax
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define signext i16 @dobra_semente(i8* %0, i8* %1) {
%3 = alloca i8*
%4 = alloca i8*
%5 = alloca i16
%6 = alloca i16
%7 = alloca i16
%8 = alloca i16
%9 = alloca i16
store i8* %0, i8** %3
store i8* %1, i8** %4
%10 = load i8*, i8** %3
%11 = call i64 @strlen(i8* %10)
%12 = sub i64 %11, 1
%13 = trunc i64 %12 to i16
store i16 %13, i16* %9
%14 = load i8*, i8** %3
%15 = call i32 (i8*, ...) bitcast (i32 (...)* @somatoria to i32 (i8*, ...)*)(i8* %14)
%16 = trunc i32 %15 to i16
store i16 %16, i16* %6
%17 = load i16, i16* %9
%18 = sext i16 %17 to i32
%19 = load i16, i16* %6
%20 = sext i16 %19 to i32
%21 = srem i32 %18, %20
%22 = trunc i32 %21 to i16
store i16 %22, i16* %8
%23 = load i16, i16* %8
%24 = sext i16 %23 to i32
%25 = load i16, i16* %9
%26 = sext i16 %25 to i32
%27 = call i32 (i32, i32, ...) bitcast (i32 (...)* @posterior to i32 (i32, i32, ...)*)(i32 %24, i32 %26)
%28 = trunc i32 %27 to i16
store i16 %28, i16* %7
store i16 0, i16* %5
br label %29
29: ; preds = %73, %2
%30 = load i16, i16* %5
%31 = sext i16 %30 to i32
%32 = load i16, i16* %9
%33 = sext i16 %32 to i32
%34 = icmp sle i32 %31, %33
br i1 %34, label %35, label %76
35: ; preds = %29
%36 = load i16, i16* %5
%37 = sext i16 %36 to i32
%38 = and i32 %37, 1
%39 = icmp ne i32 %38, 0
br i1 %39, label %40, label %56
40: ; preds = %35
%41 = load i8*, i8** %3
%42 = load i16, i16* %7
%43 = sext i16 %42 to i64
%44 = getelementptr inbounds i8, i8* %41, i64 %43
%45 = load i8, i8* %44
%46 = load i8*, i8** %4
%47 = load i16, i16* %5
%48 = sext i16 %47 to i64
%49 = getelementptr inbounds i8, i8* %46, i64 %48
store i8 %45, i8* %49
%50 = load i16, i16* %7
%51 = sext i16 %50 to i32
%52 = load i16, i16* %9
%53 = sext i16 %52 to i32
%54 = call i32 (i32, i32, ...) bitcast (i32 (...)* @posterior to i32 (i32, i32, ...)*)(i32 %51, i32 %53)
%55 = trunc i32 %54 to i16
store i16 %55, i16* %7
br label %72
56: ; preds = %35
%57 = load i8*, i8** %3
%58 = load i16, i16* %8
%59 = sext i16 %58 to i64
%60 = getelementptr inbounds i8, i8* %57, i64 %59
%61 = load i8, i8* %60
%62 = load i8*, i8** %4
%63 = load i16, i16* %5
%64 = sext i16 %63 to i64
%65 = getelementptr inbounds i8, i8* %62, i64 %64
store i8 %61, i8* %65
%66 = load i16, i16* %8
%67 = sext i16 %66 to i32
%68 = load i16, i16* %9
%69 = sext i16 %68 to i32
%70 = call i32 (i32, i32, ...) bitcast (i32 (...)* @anterior to i32 (i32, i32, ...)*)(i32 %67, i32 %69)
%71 = trunc i32 %70 to i16
store i16 %71, i16* %8
br label %72
72: ; preds = %56, %40
br label %73
73: ; preds = %72
%74 = load i16, i16* %5
%75 = add i16 %74, 1
store i16 %75, i16* %5
br label %29
76: ; preds = %29
%77 = load i8*, i8** %4
%78 = load i16, i16* %5
%79 = sext i16 %78 to i64
%80 = getelementptr inbounds i8, i8* %77, i64 %79
store i8 0, i8* %80
%81 = load i16, i16* %6
ret i16 %81
}

LLVM IR (-O2):
define signext i16 @dobra_semente(i8* %0, i8* nocapture writeonly %1) {
%3 = tail call i64 @strlen(i8* dereferenceable(1) %0)
%4 = trunc i64 %3 to i32
%5 = tail call i32 (i8*, ...) bitcast (i32 (...)* @somatoria to i32 (i8*, ...)*)(i8* %0)
%6 = shl i32 %4, 16
%7 = add i32 %6, -65536
%8 = ashr exact i32 %7, 16
%9 = shl i32 %5, 16
%10 = ashr exact i32 %9, 16
%11 = srem i32 %8, %10
%12 = tail call i32 (i32, i32, ...) bitcast (i32 (...)* @posterior to i32 (i32, i32, ...)*)(i32 %11, i32 %8)
%13 = icmp slt i32 %7, 0
br i1 %13, label %50, label %14
14: ; preds = %2
%15 = trunc i32 %12 to i16
%16 = trunc i32 %11 to i16
br label %17
17: ; preds = %14, %42
%18 = phi i32 [ %46, %42 ], [ 0, %14 ]
%19 = phi i16 [ %44, %42 ], [ %16, %14 ]
%20 = phi i16 [ %43, %42 ], [ %15, %14 ]
%21 = trunc i32 %18 to i16
%22 = and i32 %18, 1
%23 = icmp eq i32 %22, 0
br i1 %23, label %33, label %24
24: ; preds = %17
%25 = sext i16 %20 to i64
%26 = getelementptr inbounds i8, i8* %0, i64 %25
%27 = load i8, i8* %26
%28 = sext i32 %18 to i64
%29 = getelementptr inbounds i8, i8* %1, i64 %28
store i8 %27, i8* %29
%30 = sext i16 %20 to i32
%31 = tail call i32 (i32, i32, ...) bitcast (i32 (...)* @posterior to i32 (i32, i32, ...)*)(i32 %30, i32 %8)
%32 = trunc i32 %31 to i16
br label %42
33: ; preds = %17
%34 = sext i16 %19 to i64
%35 = getelementptr inbounds i8, i8* %0, i64 %34
%36 = load i8, i8* %35
%37 = sext i32 %18 to i64
%38 = getelementptr inbounds i8, i8* %1, i64 %37
store i8 %36, i8* %38
%39 = sext i16 %19 to i32
%40 = tail call i32 (i32, i32, ...) bitcast (i32 (...)* @anterior to i32 (i32, i32, ...)*)(i32 %39, i32 %8)
%41 = trunc i32 %40 to i16
br label %42
42: ; preds = %24, %33
%43 = phi i16 [ %32, %24 ], [ %20, %33 ]
%44 = phi i16 [ %19, %24 ], [ %41, %33 ]
%45 = add i16 %21, 1
%46 = sext i16 %45 to i32
%47 = icmp slt i32 %8, %46
br i1 %47, label %48, label %17
48: ; preds = %42
%49 = sext i16 %45 to i64
br label %50
50: ; preds = %48, %2
%51 = phi i64 [ 0, %2 ], [ %49, %48 ]
%52 = trunc i32 %5 to i16
%53 = getelementptr inbounds i8, i8* %1, i64 %51
store i8 0, i8* %53
ret i16 %52
}