#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__ fisica_regla8(char *, int const);
int /*<<< orphan*/ memset(char *, int /*<<< orphan*/, size_t);
int /*<<< orphan*/ printf(char *, char *);
scalar_t__ strcmp(char *, char *);
char *strdupa(char *);
int strlen(char *);
int /*<<< orphan*/ strncat(char *, char *, int);
char *strsep(char **, char *);
int fisica_regla6(char *nombre, const int debug) {
  char **ap = NULL;
  char *word[10];
  int excluded = 0;
  int counter = 0;
  int i = 0;
  size_t len = 0;
  char *copy = NULL;
  int applied = 0;
  len = strlen(nombre);
  copy = strdupa(nombre);
  memset(nombre, 0, len + 1);
  for (ap = word; ap < &word[9] && (*ap = strsep(&copy, " \t\n")) != NULL;) {
    if (**ap != '\0')
      ap++;
    counter++;
  }
  *ap = NULL;
  if (counter > 1) {
    for (i = 0; i < counter; i++) {
      excluded = 0;
      if (strcmp(word[i], "MARIA") == 0 || strcmp(word[i], "MA.") == 0 ||
          strcmp(word[i], "JOSE") == 0 || fisica_regla8(word[i], debug)) {
        excluded = 1;
        applied = 1;
        if (debug)
          printf("Eliminando la palabra \"%s\".\n", word[i]);
      }
      if (!excluded) {
        if (strlen(nombre))
          strncat(nombre, " ", 1);
        strncat(nombre, word[i], strlen(word[i]));
      }
    }
  } else {
    strncat(nombre, word[0], strlen(word[0]));
  }
  if (!strlen(nombre)) {
    strncat(nombre, word[counter - 1], strlen(word[counter - 1]));
  }
  return applied;
}


x86 assembly (clang, -O0):
<fisica_regla6>:
push   %rbp
mov    %rsp,%rbp
sub    $0xd0,%rsp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
movq   $0x0,-0x18(%rbp)
movl   $0x0,-0x74(%rbp)
movl   $0x0,-0x78(%rbp)
movl   $0x0,-0x7c(%rbp)
movq   $0x0,-0x88(%rbp)
movq   $0x0,-0x90(%rbp)
movl   $0x0,-0x94(%rbp)
mov    -0x8(%rbp),%rdi
call   1030 <strlen@plt>
cltq
mov    %rax,-0x88(%rbp)
mov    -0x8(%rbp),%rdi
call   10a0 <strdupa@plt>
mov    %rax,-0x90(%rbp)
mov    -0x8(%rbp),%rdi
mov    -0x88(%rbp),%rdx
add    $0x1,%rdx
xor    %esi,%esi
call   1050 <memset@plt>
lea    -0x70(%rbp),%rax
mov    %rax,-0x18(%rbp)
mov    -0x18(%rbp),%rcx
lea    -0x70(%rbp),%rdx
add    $0x48,%rdx
xor    %eax,%eax
cmp    %rdx,%rcx
mov    %al,-0x95(%rbp)
jae    1253 <fisica_regla6+0xd3>
lea    -0x90(%rbp),%rdi
lea    0xdc6(%rip),%rsi
call   1090 <strsep@plt>
mov    -0x18(%rbp),%rcx
mov    %rax,(%rcx)
cmp    $0x0,%rax
setne  %al
mov    %al,-0x95(%rbp)
mov    -0x95(%rbp),%al
test   $0x1,%al
jne    1266 <fisica_regla6+0xe6>
jmp    1293 <fisica_regla6+0x113>
mov    -0x18(%rbp),%rax
mov    (%rax),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
je     1285 <fisica_regla6+0x105>
mov    -0x18(%rbp),%rax
add    $0x8,%rax
mov    %rax,-0x18(%rbp)
mov    -0x78(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x78(%rbp)
jmp    120f <fisica_regla6+0x8f>
mov    -0x18(%rbp),%rax
movq   $0x0,(%rax)
cmpl   $0x1,-0x78(%rbp)
jle    13f6 <fisica_regla6+0x276>
movl   $0x0,-0x7c(%rbp)
mov    -0x7c(%rbp),%eax
cmp    -0x78(%rbp),%eax
jge    13f1 <fisica_regla6+0x271>
movl   $0x0,-0x74(%rbp)
movslq -0x7c(%rbp),%rax
mov    -0x70(%rbp,%rax,8),%rdi
lea    0xd32(%rip),%rsi
call   1080 <strcmp@plt>
cmp    $0x0,%rax
je     133a <fisica_regla6+0x1ba>
movslq -0x7c(%rbp),%rax
mov    -0x70(%rbp,%rax,8),%rdi
lea    0xd19(%rip),%rsi
call   1080 <strcmp@plt>
cmp    $0x0,%rax
je     133a <fisica_regla6+0x1ba>
movslq -0x7c(%rbp),%rax
mov    -0x70(%rbp,%rax,8),%rdi
lea    0xcfe(%rip),%rsi
call   1080 <strcmp@plt>
cmp    $0x0,%rax
je     133a <fisica_regla6+0x1ba>
movslq -0x7c(%rbp),%rax
mov    -0x70(%rbp,%rax,8),%rdi
mov    -0xc(%rbp),%esi
call   1070 <fisica_regla8@plt>
cmp    $0x0,%rax
je     136f <fisica_regla6+0x1ef>
movl   $0x1,-0x74(%rbp)
movl   $0x1,-0x94(%rbp)
cmpl   $0x0,-0xc(%rbp)
je     136a <fisica_regla6+0x1ea>
movslq -0x7c(%rbp),%rax
mov    -0x70(%rbp,%rax,8),%rsi
lea    0xcae(%rip),%rdi
call   1040 <printf@plt>
jmp    136f <fisica_regla6+0x1ef>
cmpl   $0x0,-0x74(%rbp)
jne    13de <fisica_regla6+0x25e>
mov    -0x8(%rbp),%rdi
call   1030 <strlen@plt>
cmp    $0x0,%eax
je     13a0 <fisica_regla6+0x220>
mov    -0x8(%rbp),%rdi
lea    0xc9a(%rip),%rsi
mov    $0x1,%edx
call   1060 <strncat@plt>
mov    -0x8(%rbp),%rax
mov    %rax,-0xa8(%rbp)
movslq -0x7c(%rbp),%rax
mov    -0x70(%rbp,%rax,8),%rax
mov    %rax,-0xa0(%rbp)
movslq -0x7c(%rbp),%rax
mov    -0x70(%rbp,%rax,8),%rdi
call   1030 <strlen@plt>
mov    -0xa8(%rbp),%rdi
mov    -0xa0(%rbp),%rsi
mov    %eax,%edx
call   1060 <strncat@plt>
jmp    13e3 <fisica_regla6+0x263>
mov    -0x7c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x7c(%rbp)
jmp    12af <fisica_regla6+0x12f>
jmp    142a <fisica_regla6+0x2aa>
mov    -0x8(%rbp),%rax
mov    %rax,-0xb8(%rbp)
mov    -0x70(%rbp),%rax
mov    %rax,-0xb0(%rbp)
mov    -0x70(%rbp),%rdi
call   1030 <strlen@plt>
mov    -0xb8(%rbp),%rdi
mov    -0xb0(%rbp),%rsi
mov    %eax,%edx
call   1060 <strncat@plt>
mov    -0x8(%rbp),%rdi
call   1030 <strlen@plt>
cmp    $0x0,%eax
jne    1482 <fisica_regla6+0x302>
mov    -0x8(%rbp),%rax
mov    %rax,-0xc8(%rbp)
mov    -0x78(%rbp),%eax
sub    $0x1,%eax
cltq
mov    -0x70(%rbp,%rax,8),%rax
mov    %rax,-0xc0(%rbp)
mov    -0x78(%rbp),%eax
sub    $0x1,%eax
cltq
mov    -0x70(%rbp,%rax,8),%rdi
call   1030 <strlen@plt>
mov    -0xc8(%rbp),%rdi
mov    -0xc0(%rbp),%rsi
mov    %eax,%edx
call   1060 <strncat@plt>
mov    -0x94(%rbp),%eax
add    $0xd0,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<fisica_regla6>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x68,%rsp
mov    %esi,%r12d
mov    %rdi,%rbp
call   1030 <strlen@plt>
movslq %eax,%rbx
mov    %rbp,%rdi
call   10a0 <strdupa@plt>
mov    %rax,0x8(%rsp)
add    $0x1,%rbx
xor    %r13d,%r13d
mov    %rbp,(%rsp)
mov    %rbp,%rdi
xor    %esi,%esi
mov    %rbx,%rdx
call   1050 <memset@plt>
lea    0x10(%rsp),%rbx
lea    0x58(%rsp),%r15
lea    0xe2e(%rip),%r14
lea    0x8(%rsp),%rbp
nopw   0x0(%rax,%rax,1)
mov    %rbp,%rdi
mov    %r14,%rsi
call   1090 <strsep@plt>
mov    %rax,(%rbx)
test   %rax,%rax
je     1208 <fisica_regla6+0x88>
xor    %ecx,%ecx
cmpb   $0x0,(%rax)
setne  %cl
lea    (%rbx,%rcx,8),%rbx
add    $0x1,%r13d
cmp    %r15,%rbx
jb     11e0 <fisica_regla6+0x60>
movq   $0x0,(%rbx)
cmp    $0x2,%r13d
jb     1309 <fisica_regla6+0x189>
mov    %r13d,%r14d
xor    %r15d,%r15d
xor    %ebx,%ebx
mov    (%rsp),%rbp
jmp    125d <fisica_regla6+0xdd>
mov    0x10(%rsp,%r15,8),%rbp
mov    %rbp,%rdi
call   1030 <strlen@plt>
mov    (%rsp),%rdi
mov    %rbp,%rsi
mov    (%rsp),%rbp
mov    %eax,%edx
call   1060 <strncat@plt>
cs nopw 0x0(%rax,%rax,1)
add    $0x1,%r15
cmp    %r15,%r14
je     1329 <fisica_regla6+0x1a9>
mov    0x10(%rsp,%r15,8),%rdi
lea    0xd9b(%rip),%rsi
call   1080 <strcmp@plt>
test   %rax,%rax
je     12c0 <fisica_regla6+0x140>
mov    0x10(%rsp,%r15,8),%rdi
lea    0xd8b(%rip),%rsi
call   1080 <strcmp@plt>
test   %rax,%rax
je     12c0 <fisica_regla6+0x140>
mov    0x10(%rsp,%r15,8),%rdi
lea    0xd79(%rip),%rsi
call   1080 <strcmp@plt>
test   %rax,%rax
je     12c0 <fisica_regla6+0x140>
mov    0x10(%rsp,%r15,8),%rdi
mov    %r12d,%esi
call   1070 <fisica_regla8@plt>
test   %rax,%rax
je     12e0 <fisica_regla6+0x160>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
mov    $0x1,%ebx
test   %r12d,%r12d
je     1250 <fisica_regla6+0xd0>
mov    0x10(%rsp,%r15,8),%rsi
lea    0xd3d(%rip),%rdi
call   1040 <printf@plt>
jmp    1250 <fisica_regla6+0xd0>
mov    %rbp,%rdi
call   1030 <strlen@plt>
test   %eax,%eax
je     1227 <fisica_regla6+0xa7>
mov    %rbp,%rdi
lea    0xd36(%rip),%rsi
mov    $0x1,%edx
call   1060 <strncat@plt>
jmp    1227 <fisica_regla6+0xa7>
mov    0x10(%rsp),%rbx
mov    %rbx,%rdi
call   1030 <strlen@plt>
mov    (%rsp),%rbp
mov    %rbp,%rdi
mov    %rbx,%rsi
mov    %eax,%edx
call   1060 <strncat@plt>
xor    %ebx,%ebx
mov    %rbp,%rdi
call   1030 <strlen@plt>
test   %eax,%eax
jne    1355 <fisica_regla6+0x1d5>
movslq %r13d,%rax
mov    %rbp,%r14
mov    0x8(%rsp,%rax,8),%rbp
mov    %rbp,%rdi
call   1030 <strlen@plt>
mov    %r14,%rdi
mov    %rbp,%rsi
mov    %eax,%edx
call   1060 <strncat@plt>
mov    %ebx,%eax
add    $0x68,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [4 x i8] c" \09\0A\00"
@.str.1 = [6 x i8] c"MARIA\00"
@.str.2 = [4 x i8] c"MA.\00"
@.str.3 = [5 x i8] c"JOSE\00"
@.str.4 = [29 x i8] c"Eliminando la palabra \22%s\22.\0A\00"
@.str.5 = [2 x i8] c" \00"
define i32 @fisica_regla6(i8* %0, i32 %1) {
%3 = alloca i8*
%4 = alloca i32
%5 = alloca i8**
%6 = alloca [10 x i8*]
%7 = alloca i32
%8 = alloca i32
%9 = alloca i32
%10 = alloca i64
%11 = alloca i8*
%12 = alloca i32
store i8* %0, i8** %3
store i32 %1, i32* %4
store i8** null, i8*** %5
store i32 0, i32* %7
store i32 0, i32* %8
store i32 0, i32* %9
store i64 0, i64* %10
store i8* null, i8** %11
store i32 0, i32* %12
%13 = load i8*, i8** %3
%14 = call i32 @strlen(i8* %13)
%15 = sext i32 %14 to i64
store i64 %15, i64* %10
%16 = load i8*, i8** %3
%17 = call i8* @strdupa(i8* %16)
store i8* %17, i8** %11
%18 = load i8*, i8** %3
%19 = load i64, i64* %10
%20 = add i64 %19, 1
%21 = call i32 @memset(i8* %18, i32 0, i64 %20)
%22 = getelementptr inbounds [10 x i8*], [10 x i8*]* %6, i64 0, i64 0
store i8** %22, i8*** %5
br label %23
23: ; preds = %42, %2
%24 = load i8**, i8*** %5
%25 = getelementptr inbounds [10 x i8*], [10 x i8*]* %6, i64 0, i64 9
%26 = icmp ult i8** %24, %25
br i1 %26, label %27, label %31
27: ; preds = %23
%28 = call i8* @strsep(i8** %11, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str, i64 0, i64 0))
%29 = load i8**, i8*** %5
store i8* %28, i8** %29
%30 = icmp ne i8* %28, null
br label %31
31: ; preds = %27, %23
%32 = phi i1 [ false, %23 ], [ %30, %27 ]
br i1 %32, label %33, label %45
33: ; preds = %31
%34 = load i8**, i8*** %5
%35 = load i8*, i8** %34
%36 = load i8, i8* %35
%37 = sext i8 %36 to i32
%38 = icmp ne i32 %37, 0
br i1 %38, label %39, label %42
39: ; preds = %33
%40 = load i8**, i8*** %5
%41 = getelementptr inbounds i8*, i8** %40, i32 1
store i8** %41, i8*** %5
br label %42
42: ; preds = %39, %33
%43 = load i32, i32* %8
%44 = add nsw i32 %43, 1
store i32 %44, i32* %8
br label %23
45: ; preds = %31
%46 = load i8**, i8*** %5
store i8* null, i8** %46
%47 = load i32, i32* %8
%48 = icmp sgt i32 %47, 1
br i1 %48, label %49, label %120
49: ; preds = %45
store i32 0, i32* %9
br label %50
50: ; preds = %116, %49
%51 = load i32, i32* %9
%52 = load i32, i32* %8
%53 = icmp slt i32 %51, %52
br i1 %53, label %54, label %119
54: ; preds = %50
store i32 0, i32* %7
%55 = load i32, i32* %9
%56 = sext i32 %55 to i64
%57 = getelementptr inbounds [10 x i8*], [10 x i8*]* %6, i64 0, i64 %56
%58 = load i8*, i8** %57
%59 = call i64 @strcmp(i8* %58, i8* getelementptr inbounds ([6 x i8], [6 x i8]* @.str.1, i64 0, i64 0))
%60 = icmp eq i64 %59, 0
br i1 %60, label %83, label %61
61: ; preds = %54
%62 = load i32, i32* %9
%63 = sext i32 %62 to i64
%64 = getelementptr inbounds [10 x i8*], [10 x i8*]* %6, i64 0, i64 %63
%65 = load i8*, i8** %64
%66 = call i64 @strcmp(i8* %65, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.2, i64 0, i64 0))
%67 = icmp eq i64 %66, 0
br i1 %67, label %83, label %68
68: ; preds = %61
%69 = load i32, i32* %9
%70 = sext i32 %69 to i64
%71 = getelementptr inbounds [10 x i8*], [10 x i8*]* %6, i64 0, i64 %70
%72 = load i8*, i8** %71
%73 = call i64 @strcmp(i8* %72, i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.3, i64 0, i64 0))
%74 = icmp eq i64 %73, 0
br i1 %74, label %83, label %75
75: ; preds = %68
%76 = load i32, i32* %9
%77 = sext i32 %76 to i64
%78 = getelementptr inbounds [10 x i8*], [10 x i8*]* %6, i64 0, i64 %77
%79 = load i8*, i8** %78
%80 = load i32, i32* %4
%81 = call i64 @fisica_regla8(i8* %79, i32 %80)
%82 = icmp ne i64 %81, 0
br i1 %82, label %83, label %93
83: ; preds = %75, %68, %61, %54
store i32 1, i32* %7
store i32 1, i32* %12
%84 = load i32, i32* %4
%85 = icmp ne i32 %84, 0
br i1 %85, label %86, label %92
86: ; preds = %83
%87 = load i32, i32* %9
%88 = sext i32 %87 to i64
%89 = getelementptr inbounds [10 x i8*], [10 x i8*]* %6, i64 0, i64 %88
%90 = load i8*, i8** %89
%91 = call i32 @printf(i8* getelementptr inbounds ([29 x i8], [29 x i8]* @.str.4, i64 0, i64 0), i8* %90)
br label %92
92: ; preds = %86, %83
br label %93
93: ; preds = %92, %75
%94 = load i32, i32* %7
%95 = icmp ne i32 %94, 0
br i1 %95, label %115, label %96
96: ; preds = %93
%97 = load i8*, i8** %3
%98 = call i32 @strlen(i8* %97)
%99 = icmp ne i32 %98, 0
br i1 %99, label %100, label %103
100: ; preds = %96
%101 = load i8*, i8** %3
%102 = call i32 @strncat(i8* %101, i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.5, i64 0, i64 0), i32 1)
br label %103
103: ; preds = %100, %96
%104 = load i8*, i8** %3
%105 = load i32, i32* %9
%106 = sext i32 %105 to i64
%107 = getelementptr inbounds [10 x i8*], [10 x i8*]* %6, i64 0, i64 %106
%108 = load i8*, i8** %107
%109 = load i32, i32* %9
%110 = sext i32 %109 to i64
%111 = getelementptr inbounds [10 x i8*], [10 x i8*]* %6, i64 0, i64 %110
%112 = load i8*, i8** %111
%113 = call i32 @strlen(i8* %112)
%114 = call i32 @strncat(i8* %104, i8* %108, i32 %113)
br label %115
115: ; preds = %103, %93
br label %116
116: ; preds = %115
%117 = load i32, i32* %9
%118 = add nsw i32 %117, 1
store i32 %118, i32* %9
br label %50
119: ; preds = %50
br label %128
120: ; preds = %45
%121 = load i8*, i8** %3
%122 = getelementptr inbounds [10 x i8*], [10 x i8*]* %6, i64 0, i64 0
%123 = load i8*, i8** %122
%124 = getelementptr inbounds [10 x i8*], [10 x i8*]* %6, i64 0, i64 0
%125 = load i8*, i8** %124
%126 = call i32 @strlen(i8* %125)
%127 = call i32 @strncat(i8* %121, i8* %123, i32 %126)
br label %128
128: ; preds = %120, %119
%129 = load i8*, i8** %3
%130 = call i32 @strlen(i8* %129)
%131 = icmp ne i32 %130, 0
br i1 %131, label %146, label %132
132: ; preds = %128
%133 = load i8*, i8** %3
%134 = load i32, i32* %8
%135 = sub nsw i32 %134, 1
%136 = sext i32 %135 to i64
%137 = getelementptr inbounds [10 x i8*], [10 x i8*]* %6, i64 0, i64 %136
%138 = load i8*, i8** %137
%139 = load i32, i32* %8
%140 = sub nsw i32 %139, 1
%141 = sext i32 %140 to i64
%142 = getelementptr inbounds [10 x i8*], [10 x i8*]* %6, i64 0, i64 %141
%143 = load i8*, i8** %142
%144 = call i32 @strlen(i8* %143)
%145 = call i32 @strncat(i8* %133, i8* %138, i32 %144)
br label %146
146: ; preds = %132, %128
%147 = load i32, i32* %12
ret i32 %147
}

LLVM IR (-O2):
@.str = [4 x i8] c" \09\0A\00"
@.str.1 = [6 x i8] c"MARIA\00"
@.str.2 = [4 x i8] c"MA.\00"
@.str.3 = [5 x i8] c"JOSE\00"
@.str.4 = [29 x i8] c"Eliminando la palabra \22%s\22.\0A\00"
@.str.5 = [2 x i8] c" \00"
define i32 @fisica_regla6(i8* %0, i32 %1) {
%3 = alloca [10 x i8*]
%4 = alloca i8*
%5 = bitcast [10 x i8*]* %3 to i8*
%6 = bitcast i8** %4 to i8*
%7 = tail call i32 @strlen(i8* %0)
%8 = sext i32 %7 to i64
%9 = tail call i8* @strdupa(i8* %0)
store i8* %9, i8** %4
%10 = add nsw i64 %8, 1
%11 = tail call i32 @memset(i8* %0, i32 0, i64 %10)
%12 = getelementptr inbounds [10 x i8*], [10 x i8*]* %3, i64 0, i64 0
%13 = getelementptr inbounds [10 x i8*], [10 x i8*]* %3, i64 0, i64 9
br label %14
14: ; preds = %2, %19
%15 = phi i8** [ %12, %2 ], [ %23, %19 ]
%16 = phi i32 [ 0, %2 ], [ %24, %19 ]
%17 = call i8* @strsep(i8** %4, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str, i64 0, i64 0))
store i8* %17, i8** %15
%18 = icmp eq i8* %17, null
br i1 %18, label %26, label %19
19: ; preds = %14
%20 = load i8, i8* %17
%21 = icmp ne i8 %20, 0
%22 = zext i1 %21 to i64
%23 = getelementptr i8*, i8** %15, i64 %22
%24 = add nuw nsw i32 %16, 1
%25 = icmp ult i8** %23, %13
br i1 %25, label %14, label %26
26: ; preds = %19, %14
%27 = phi i32 [ %24, %19 ], [ %16, %14 ]
%28 = phi i8** [ %23, %19 ], [ %15, %14 ]
store i8* null, i8** %28
%29 = icmp ugt i32 %27, 1
br i1 %29, label %30, label %69
30: ; preds = %26
%31 = icmp eq i32 %1, 0
%32 = zext i32 %27 to i64
br label %33
33: ; preds = %30, %65
%34 = phi i64 [ 0, %30 ], [ %67, %65 ]
%35 = phi i32 [ 0, %30 ], [ %66, %65 ]
%36 = getelementptr inbounds [10 x i8*], [10 x i8*]* %3, i64 0, i64 %34
%37 = load i8*, i8** %36
%38 = call i64 @strcmp(i8* %37, i8* getelementptr inbounds ([6 x i8], [6 x i8]* @.str.1, i64 0, i64 0))
%39 = icmp eq i64 %38, 0
br i1 %39, label %52, label %40
40: ; preds = %33
%41 = load i8*, i8** %36
%42 = call i64 @strcmp(i8* %41, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.2, i64 0, i64 0))
%43 = icmp eq i64 %42, 0
br i1 %43, label %52, label %44
44: ; preds = %40
%45 = load i8*, i8** %36
%46 = call i64 @strcmp(i8* %45, i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.3, i64 0, i64 0))
%47 = icmp eq i64 %46, 0
br i1 %47, label %52, label %48
48: ; preds = %44
%49 = load i8*, i8** %36
%50 = call i64 @fisica_regla8(i8* %49, i32 %1)
%51 = icmp eq i64 %50, 0
br i1 %51, label %56, label %52
52: ; preds = %48, %44, %40, %33
br i1 %31, label %65, label %53
53: ; preds = %52
%54 = load i8*, i8** %36
%55 = call i32 @printf(i8* getelementptr inbounds ([29 x i8], [29 x i8]* @.str.4, i64 0, i64 0), i8* %54)
br label %65
56: ; preds = %48
%57 = call i32 @strlen(i8* %0)
%58 = icmp eq i32 %57, 0
br i1 %58, label %61, label %59
59: ; preds = %56
%60 = call i32 @strncat(i8* %0, i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.5, i64 0, i64 0), i32 1)
br label %61
61: ; preds = %59, %56
%62 = load i8*, i8** %36
%63 = call i32 @strlen(i8* %62)
%64 = call i32 @strncat(i8* %0, i8* %62, i32 %63)
br label %65
65: ; preds = %53, %52, %61
%66 = phi i32 [ %35, %61 ], [ 1, %52 ], [ 1, %53 ]
%67 = add nuw nsw i64 %34, 1
%68 = icmp eq i64 %67, %32
br i1 %68, label %73, label %33
69: ; preds = %26
%70 = load i8*, i8** %12
%71 = call i32 @strlen(i8* %70)
%72 = call i32 @strncat(i8* %0, i8* %70, i32 %71)
br label %73
73: ; preds = %65, %69
%74 = phi i32 [ 0, %69 ], [ %66, %65 ]
%75 = call i32 @strlen(i8* %0)
%76 = icmp eq i32 %75, 0
br i1 %76, label %77, label %84
77: ; preds = %73
%78 = add nsw i32 %27, -1
%79 = sext i32 %78 to i64
%80 = getelementptr inbounds [10 x i8*], [10 x i8*]* %3, i64 0, i64 %79
%81 = load i8*, i8** %80
%82 = call i32 @strlen(i8* %81)
%83 = call i32 @strncat(i8* %0, i8* %81, i32 %82)
br label %84
84: ; preds = %77, %73
ret i32 %74
}