void ej13() {
  int M, N, P;
  double s;
  printf("Escriba los valores enteros M,N y P (Considere que de no ingresar "
         "matrices cuadradas a la hora de calcular transpuesta habrá un error "
         "de violación de segmento): \n");
  scanf("%d %d %d", &M, &N, &P);
  double **A, **B, **C, **D;
  A = ej7(M, N);
  B = ej7(M, N);
  C = ej7(N, P);
  D = ej7(N, P);
  ej10(A, M, N);
  printf("La matriz A es:\n");
  ej11(A, M, N);
  ej10(B, M, N);
  printf("La matriz B es:\n");
  ej11(B, M, N);
  ej10(C, N, P);
  printf("La matriz C es:\n");
  ej11(C, N, P);
  ej10(D, N, P);
  printf("La matriz D es:\n");
  ej11(D, N, P);
  printf("Ingrese el factor:\n");
  scanf("%lf", &s);
  ej9(A, M, N, s);
  printf("La matriz A escalada por %lf es:\n", s);
  ej11(A, M, N);
  ej9(B, M, N, s);
  printf("La matriz B escalada por %lf es:\n", s);
  ej11(B, M, N);
  ej9(C, N, P, s);
  printf("La matriz C escalada por %lf es:\n", s);
  ej11(C, N, P);
  ej9(D, N, P, s);
  printf("La matriz D escalada por %lf es:\n", s);
  ej11(D, N, P);
  double **C1, **C2;
  printf("La matriz C1=AxC es:\n");
  C1 = ej8(A, C, M, N, P);
  printf("La matriz C2=BxD es:\n");
  C2 = ej8(B, D, M, N, P);
  if (M != N || M != P || N != P) {
    printf("ERROR: Las matrices no son cuadradas. \n");
  }
  ej12(C2, M, P);
  printf("La matriz C2 transpuesta es:\n");
  ej11(C2, M, P);
  double **C3;
  printf("La matriz C3=C1xC2 es:\n");
  C3 = ej8(C1, C2, M, P, M);
  int i;
  for (i = 0; i < M; i++) {
    free(A[i]);
    free(B[i]);
    free(C1[i]);
    free(C3[i]);
  }
  for (i = 0; i < N; i++) {
    free(C[i]);
    free(D[i]);
  }
  for (i = 0; i < P; i++) {
    free(C2[i]);
  }
  free(A);
  free(B);
  free(C);
  free(D);
  free(C1);
  free(C2);
  free(C3);
}


x86 assembly (clang, -O0):
<ej13>:
push   %rbp
mov    %rsp,%rbp
sub    $0x60,%rsp
lea    0xe61(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
lea    0xef8(%rip),%rdi
lea    -0x4(%rbp),%rsi
lea    -0x8(%rbp),%rdx
lea    -0xc(%rbp),%rcx
mov    $0x0,%al
call   1080 <scanf@plt>
mov    -0x4(%rbp),%edi
mov    -0x8(%rbp),%esi
mov    $0x0,%al
call   1050 <ej7@plt>
cltq
mov    %rax,-0x20(%rbp)
mov    -0x4(%rbp),%edi
mov    -0x8(%rbp),%esi
mov    $0x0,%al
call   1050 <ej7@plt>
cltq
mov    %rax,-0x28(%rbp)
mov    -0x8(%rbp),%edi
mov    -0xc(%rbp),%esi
mov    $0x0,%al
call   1050 <ej7@plt>
cltq
mov    %rax,-0x30(%rbp)
mov    -0x8(%rbp),%edi
mov    -0xc(%rbp),%esi
mov    $0x0,%al
call   1050 <ej7@plt>
cltq
mov    %rax,-0x38(%rbp)
mov    -0x20(%rbp),%rdi
mov    -0x4(%rbp),%esi
mov    -0x8(%rbp),%edx
mov    $0x0,%al
call   10b0 <ej10@plt>
lea    0xe8a(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
mov    -0x20(%rbp),%rdi
mov    -0x4(%rbp),%esi
mov    -0x8(%rbp),%edx
mov    $0x0,%al
call   1070 <ej11@plt>
mov    -0x28(%rbp),%rdi
mov    -0x4(%rbp),%esi
mov    -0x8(%rbp),%edx
mov    $0x0,%al
call   10b0 <ej10@plt>
lea    0xe6b(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
mov    -0x28(%rbp),%rdi
mov    -0x4(%rbp),%esi
mov    -0x8(%rbp),%edx
mov    $0x0,%al
call   1070 <ej11@plt>
mov    -0x30(%rbp),%rdi
mov    -0x8(%rbp),%esi
mov    -0xc(%rbp),%edx
mov    $0x0,%al
call   10b0 <ej10@plt>
lea    0xe4c(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
mov    -0x30(%rbp),%rdi
mov    -0x8(%rbp),%esi
mov    -0xc(%rbp),%edx
mov    $0x0,%al
call   1070 <ej11@plt>
mov    -0x38(%rbp),%rdi
mov    -0x8(%rbp),%esi
mov    -0xc(%rbp),%edx
mov    $0x0,%al
call   10b0 <ej10@plt>
lea    0xe2d(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
mov    -0x38(%rbp),%rdi
mov    -0x8(%rbp),%esi
mov    -0xc(%rbp),%edx
mov    $0x0,%al
call   1070 <ej11@plt>
lea    0xe1f(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
lea    0xe25(%rip),%rdi
lea    -0x18(%rbp),%rsi
mov    $0x0,%al
call   1080 <scanf@plt>
mov    -0x20(%rbp),%rdi
mov    -0x4(%rbp),%esi
mov    -0x8(%rbp),%edx
movsd  -0x18(%rbp),%xmm0
mov    $0x1,%al
call   1060 <ej9@plt>
movsd  -0x18(%rbp),%xmm0
lea    0xdfc(%rip),%rdi
mov    $0x1,%al
call   1040 <printf@plt>
mov    -0x20(%rbp),%rdi
mov    -0x4(%rbp),%esi
mov    -0x8(%rbp),%edx
mov    $0x0,%al
call   1070 <ej11@plt>
mov    -0x28(%rbp),%rdi
mov    -0x4(%rbp),%esi
mov    -0x8(%rbp),%edx
movsd  -0x18(%rbp),%xmm0
mov    $0x1,%al
call   1060 <ej9@plt>
movsd  -0x18(%rbp),%xmm0
lea    0xde4(%rip),%rdi
mov    $0x1,%al
call   1040 <printf@plt>
mov    -0x28(%rbp),%rdi
mov    -0x4(%rbp),%esi
mov    -0x8(%rbp),%edx
mov    $0x0,%al
call   1070 <ej11@plt>
mov    -0x30(%rbp),%rdi
mov    -0x8(%rbp),%esi
mov    -0xc(%rbp),%edx
movsd  -0x18(%rbp),%xmm0
mov    $0x1,%al
call   1060 <ej9@plt>
movsd  -0x18(%rbp),%xmm0
lea    0xdcc(%rip),%rdi
mov    $0x1,%al
call   1040 <printf@plt>
mov    -0x30(%rbp),%rdi
mov    -0x8(%rbp),%esi
mov    -0xc(%rbp),%edx
mov    $0x0,%al
call   1070 <ej11@plt>
mov    -0x38(%rbp),%rdi
mov    -0x8(%rbp),%esi
mov    -0xc(%rbp),%edx
movsd  -0x18(%rbp),%xmm0
mov    $0x1,%al
call   1060 <ej9@plt>
movsd  -0x18(%rbp),%xmm0
lea    0xdb4(%rip),%rdi
mov    $0x1,%al
call   1040 <printf@plt>
mov    -0x38(%rbp),%rdi
mov    -0x8(%rbp),%esi
mov    -0xc(%rbp),%edx
mov    $0x0,%al
call   1070 <ej11@plt>
lea    0xdb7(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
mov    -0x20(%rbp),%rdi
mov    -0x30(%rbp),%rsi
mov    -0x4(%rbp),%edx
mov    -0x8(%rbp),%ecx
mov    -0xc(%rbp),%r8d
mov    $0x0,%al
call   1090 <ej8@plt>
cltq
mov    %rax,-0x40(%rbp)
lea    0xda0(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
mov    -0x28(%rbp),%rdi
mov    -0x38(%rbp),%rsi
mov    -0x4(%rbp),%edx
mov    -0x8(%rbp),%ecx
mov    -0xc(%rbp),%r8d
mov    $0x0,%al
call   1090 <ej8@plt>
cltq
mov    %rax,-0x48(%rbp)
mov    -0x4(%rbp),%eax
cmp    -0x8(%rbp),%eax
jne    1452 <ej13+0x2c2>
mov    -0x4(%rbp),%eax
cmp    -0xc(%rbp),%eax
jne    1452 <ej13+0x2c2>
mov    -0x8(%rbp),%eax
cmp    -0xc(%rbp),%eax
je     1460 <ej13+0x2d0>
lea    0xd65(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
mov    -0x48(%rbp),%rdi
mov    -0x4(%rbp),%esi
mov    -0xc(%rbp),%edx
mov    $0x0,%al
call   10a0 <ej12@plt>
lea    0xd6e(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
mov    -0x48(%rbp),%rdi
mov    -0x4(%rbp),%esi
mov    -0xc(%rbp),%edx
mov    $0x0,%al
call   1070 <ej11@plt>
lea    0xd6d(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
mov    -0x40(%rbp),%rdi
mov    -0x48(%rbp),%rsi
mov    -0x4(%rbp),%edx
mov    -0xc(%rbp),%ecx
mov    -0x4(%rbp),%r8d
mov    $0x0,%al
call   1090 <ej8@plt>
cltq
mov    %rax,-0x50(%rbp)
movl   $0x0,-0x54(%rbp)
mov    -0x54(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    1522 <ej13+0x392>
mov    -0x20(%rbp),%rax
movslq -0x54(%rbp),%rcx
mov    (%rax,%rcx,8),%rdi
call   1030 <free@plt>
mov    -0x28(%rbp),%rax
movslq -0x54(%rbp),%rcx
mov    (%rax,%rcx,8),%rdi
call   1030 <free@plt>
mov    -0x40(%rbp),%rax
movslq -0x54(%rbp),%rcx
mov    (%rax,%rcx,8),%rdi
call   1030 <free@plt>
mov    -0x50(%rbp),%rax
movslq -0x54(%rbp),%rcx
mov    (%rax,%rcx,8),%rdi
call   1030 <free@plt>
mov    -0x54(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x54(%rbp)
jmp    14c4 <ej13+0x334>
movl   $0x0,-0x54(%rbp)
mov    -0x54(%rbp),%eax
cmp    -0x8(%rbp),%eax
jge    1565 <ej13+0x3d5>
mov    -0x30(%rbp),%rax
movslq -0x54(%rbp),%rcx
mov    (%rax,%rcx,8),%rdi
call   1030 <free@plt>
mov    -0x38(%rbp),%rax
movslq -0x54(%rbp),%rcx
mov    (%rax,%rcx,8),%rdi
call   1030 <free@plt>
mov    -0x54(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x54(%rbp)
jmp    1529 <ej13+0x399>
movl   $0x0,-0x54(%rbp)
mov    -0x54(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    1597 <ej13+0x407>
mov    -0x48(%rbp),%rax
movslq -0x54(%rbp),%rcx
mov    (%rax,%rcx,8),%rdi
call   1030 <free@plt>
mov    -0x54(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x54(%rbp)
jmp    156c <ej13+0x3dc>
mov    -0x20(%rbp),%rdi
call   1030 <free@plt>
mov    -0x28(%rbp),%rdi
call   1030 <free@plt>
mov    -0x30(%rbp),%rdi
call   1030 <free@plt>
mov    -0x38(%rbp),%rdi
call   1030 <free@plt>
mov    -0x40(%rbp),%rdi
call   1030 <free@plt>
mov    -0x48(%rbp),%rdi
call   1030 <free@plt>
mov    -0x50(%rbp),%rdi
call   1030 <free@plt>
add    $0x60,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<ej13>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x38,%rsp
lea    0xee0(%rip),%rdi
call   1040 <puts@plt>
lea    0xe3f(%rip),%rdi
lea    0xc(%rsp),%rsi
lea    0x4(%rsp),%rdx
lea    0x8(%rsp),%rcx
xor    %eax,%eax
call   1090 <scanf@plt>
mov    0xc(%rsp),%edi
mov    0x4(%rsp),%esi
xor    %eax,%eax
call   1060 <ej7@plt>
movslq %eax,%rbx
mov    0xc(%rsp),%edi
mov    0x4(%rsp),%esi
xor    %eax,%eax
call   1060 <ej7@plt>
movslq %eax,%r14
mov    0x4(%rsp),%edi
mov    0x8(%rsp),%esi
xor    %eax,%eax
call   1060 <ej7@plt>
movslq %eax,%rbp
mov    0x4(%rsp),%edi
mov    0x8(%rsp),%esi
xor    %eax,%eax
call   1060 <ej7@plt>
movslq %eax,%r15
mov    0xc(%rsp),%esi
mov    0x4(%rsp),%edx
mov    %rbx,%rdi
xor    %eax,%eax
call   10c0 <ej10@plt>
lea    0xf01(%rip),%rdi
call   1040 <puts@plt>
mov    0xc(%rsp),%esi
mov    0x4(%rsp),%edx
mov    %rbx,%rdi
xor    %eax,%eax
call   1080 <ej11@plt>
mov    0xc(%rsp),%esi
mov    0x4(%rsp),%edx
mov    %r14,%rdi
xor    %eax,%eax
call   10c0 <ej10@plt>
lea    0xee1(%rip),%rdi
call   1040 <puts@plt>
mov    0xc(%rsp),%esi
mov    0x4(%rsp),%edx
mov    %r14,%rdi
xor    %eax,%eax
call   1080 <ej11@plt>
mov    0x4(%rsp),%esi
mov    0x8(%rsp),%edx
mov    %rbp,%rdi
xor    %eax,%eax
call   10c0 <ej10@plt>
lea    0xec1(%rip),%rdi
call   1040 <puts@plt>
mov    0x4(%rsp),%esi
mov    0x8(%rsp),%edx
mov    %rbp,%rdi
xor    %eax,%eax
call   1080 <ej11@plt>
mov    0x4(%rsp),%esi
mov    0x8(%rsp),%edx
mov    %r15,%rdi
xor    %eax,%eax
call   10c0 <ej10@plt>
lea    0xea1(%rip),%rdi
call   1040 <puts@plt>
mov    0x4(%rsp),%esi
mov    0x8(%rsp),%edx
mov    %r15,%rdi
xor    %eax,%eax
call   1080 <ej11@plt>
lea    0xe93(%rip),%rdi
call   1040 <puts@plt>
lea    0xd17(%rip),%rdi
lea    0x10(%rsp),%rsi
xor    %eax,%eax
call   1090 <scanf@plt>
mov    0xc(%rsp),%esi
mov    0x4(%rsp),%edx
movsd  0x10(%rsp),%xmm0
mov    %rbx,%rdi
mov    $0x1,%al
call   1070 <ej9@plt>
movsd  0x10(%rsp),%xmm0
lea    0xcea(%rip),%rdi
mov    $0x1,%al
call   1050 <printf@plt>
mov    0xc(%rsp),%esi
mov    0x4(%rsp),%edx
mov    %rbx,%rdi
xor    %eax,%eax
call   1080 <ej11@plt>
mov    0xc(%rsp),%esi
mov    0x4(%rsp),%edx
movsd  0x10(%rsp),%xmm0
mov    %r14,%rdi
mov    $0x1,%al
call   1070 <ej9@plt>
movsd  0x10(%rsp),%xmm0
lea    0xcce(%rip),%rdi
mov    $0x1,%al
call   1050 <printf@plt>
mov    0xc(%rsp),%esi
mov    0x4(%rsp),%edx
mov    %r14,%rdi
xor    %eax,%eax
call   1080 <ej11@plt>
mov    0x4(%rsp),%esi
mov    0x8(%rsp),%edx
movsd  0x10(%rsp),%xmm0
mov    %rbp,%rdi
mov    $0x1,%al
call   1070 <ej9@plt>
movsd  0x10(%rsp),%xmm0
lea    0xcb2(%rip),%rdi
mov    $0x1,%al
call   1050 <printf@plt>
mov    0x4(%rsp),%esi
mov    0x8(%rsp),%edx
mov    %rbp,%rdi
xor    %eax,%eax
call   1080 <ej11@plt>
mov    0x4(%rsp),%esi
mov    0x8(%rsp),%edx
movsd  0x10(%rsp),%xmm0
mov    %r15,%rdi
mov    $0x1,%al
call   1070 <ej9@plt>
movsd  0x10(%rsp),%xmm0
lea    0xc96(%rip),%rdi
mov    $0x1,%al
call   1050 <printf@plt>
mov    0x4(%rsp),%esi
mov    0x8(%rsp),%edx
mov    %r15,%rdi
xor    %eax,%eax
call   1080 <ej11@plt>
lea    0xd8f(%rip),%rdi
call   1040 <puts@plt>
mov    0xc(%rsp),%edx
mov    0x4(%rsp),%ecx
mov    0x8(%rsp),%r8d
mov    %rbx,%rdi
mov    %rbp,0x30(%rsp)
mov    %rbp,%rsi
xor    %eax,%eax
call   10a0 <ej8@plt>
movslq %eax,%rbp
lea    0xd76(%rip),%rdi
call   1040 <puts@plt>
mov    0xc(%rsp),%edx
mov    0x4(%rsp),%ecx
mov    0x8(%rsp),%r8d
mov    %r14,0x18(%rsp)
mov    %r14,%rdi
mov    %r15,0x28(%rsp)
mov    %r15,%rsi
xor    %eax,%eax
call   10a0 <ej8@plt>
movslq %eax,%r12
mov    0xc(%rsp),%edx
cmp    0x4(%rsp),%edx
jne    1469 <ej13+0x2c9>
mov    %edx,%esi
cmp    0x8(%rsp),%edx
je     147d <ej13+0x2dd>
lea    0xd7a(%rip),%rdi
call   1040 <puts@plt>
mov    0xc(%rsp),%esi
mov    0x8(%rsp),%edx
mov    %r12,%rdi
xor    %eax,%eax
call   10b0 <ej12@plt>
lea    0xd28(%rip),%rdi
call   1040 <puts@plt>
mov    0xc(%rsp),%esi
mov    0x8(%rsp),%edx
mov    %r12,%rdi
xor    %eax,%eax
call   1080 <ej11@plt>
lea    0xd27(%rip),%rdi
call   1040 <puts@plt>
mov    0xc(%rsp),%edx
mov    0x8(%rsp),%ecx
mov    %rbp,%rdi
mov    %r12,%rsi
mov    %edx,%r8d
xor    %eax,%eax
call   10a0 <ej8@plt>
movslq %eax,%r14
cmpl   $0x0,0xc(%rsp)
mov    0x18(%rsp),%r13
jle    1514 <ej13+0x374>
xor    %r15d,%r15d
nopl   0x0(%rax,%rax,1)
mov    (%rbx,%r15,8),%rdi
call   1030 <free@plt>
mov    0x0(%r13,%r15,8),%rdi
call   1030 <free@plt>
mov    0x0(%rbp,%r15,8),%rdi
call   1030 <free@plt>
mov    (%r14,%r15,8),%rdi
call   1030 <free@plt>
add    $0x1,%r15
movslq 0xc(%rsp),%rax
cmp    %rax,%r15
jl     14e0 <ej13+0x340>
mov    %rbp,0x20(%rsp)
mov    %rbx,%r15
cmpl   $0x0,0x4(%rsp)
mov    0x30(%rsp),%rbp
mov    0x28(%rsp),%r13
jle    1552 <ej13+0x3b2>
xor    %ebx,%ebx
nop
mov    0x0(%rbp,%rbx,8),%rdi
call   1030 <free@plt>
mov    0x0(%r13,%rbx,8),%rdi
call   1030 <free@plt>
add    $0x1,%rbx
movslq 0x4(%rsp),%rax
cmp    %rax,%rbx
jl     1530 <ej13+0x390>
cmpl   $0x0,0x8(%rsp)
jle    1577 <ej13+0x3d7>
xor    %ebx,%ebx
nopl   0x0(%rax,%rax,1)
mov    (%r12,%rbx,8),%rdi
call   1030 <free@plt>
add    $0x1,%rbx
movslq 0x8(%rsp),%rax
cmp    %rax,%rbx
jl     1560 <ej13+0x3c0>
mov    %r15,%rdi
call   1030 <free@plt>
mov    0x18(%rsp),%rdi
call   1030 <free@plt>
mov    %rbp,%rdi
call   1030 <free@plt>
mov    %r13,%rdi
call   1030 <free@plt>
mov    0x20(%rsp),%rdi
call   1030 <free@plt>
mov    %r12,%rdi
call   1030 <free@plt>
mov    %r14,%rdi
call   1030 <free@plt>
add    $0x38,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [165 x i8] c"Escriba los valores enteros M,N y P (Considere que de no ingresar matrices cuadradas a la hora de calcular transpuesta habr\C3\A1 un error de violaci\C3\B3n de segmento): \0A\00"
@.str.1 = [9 x i8] c"%d %d %d\00"
@.str.2 = [17 x i8] c"La matriz A es:\0A\00"
@.str.3 = [17 x i8] c"La matriz B es:\0A\00"
@.str.4 = [17 x i8] c"La matriz C es:\0A\00"
@.str.5 = [17 x i8] c"La matriz D es:\0A\00"
@.str.6 = [20 x i8] c"Ingrese el factor:\0A\00"
@.str.7 = [4 x i8] c"%lf\00"
@.str.8 = [34 x i8] c"La matriz A escalada por %lf es:\0A\00"
@.str.9 = [34 x i8] c"La matriz B escalada por %lf es:\0A\00"
@.str.10 = [34 x i8] c"La matriz C escalada por %lf es:\0A\00"
@.str.11 = [34 x i8] c"La matriz D escalada por %lf es:\0A\00"
@.str.12 = [22 x i8] c"La matriz C1=AxC es:\0A\00"
@.str.13 = [22 x i8] c"La matriz C2=BxD es:\0A\00"
@.str.14 = [40 x i8] c"ERROR: Las matrices no son cuadradas. \0A\00"
@.str.15 = [30 x i8] c"La matriz C2 transpuesta es:\0A\00"
@.str.16 = [24 x i8] c"La matriz C3=C1xC2 es:\0A\00"
define void @ej13() {
%1 = alloca i32
%2 = alloca i32
%3 = alloca i32
%4 = alloca double
%5 = alloca double**
%6 = alloca double**
%7 = alloca double**
%8 = alloca double**
%9 = alloca double**
%10 = alloca double**
%11 = alloca double**
%12 = alloca i32
%13 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([165 x i8], [165 x i8]* @.str, i64 0, i64 0))
%14 = call i32 (i8*, ...) @scanf(i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.1, i64 0, i64 0), i32* %1, i32* %2, i32* %3)
%15 = load i32, i32* %1
%16 = load i32, i32* %2
%17 = call i32 (i32, i32, ...) bitcast (i32 (...)* @ej7 to i32 (i32, i32, ...)*)(i32 %15, i32 %16)
%18 = sext i32 %17 to i64
%19 = inttoptr i64 %18 to double**
store double** %19, double*** %5
%20 = load i32, i32* %1
%21 = load i32, i32* %2
%22 = call i32 (i32, i32, ...) bitcast (i32 (...)* @ej7 to i32 (i32, i32, ...)*)(i32 %20, i32 %21)
%23 = sext i32 %22 to i64
%24 = inttoptr i64 %23 to double**
store double** %24, double*** %6
%25 = load i32, i32* %2
%26 = load i32, i32* %3
%27 = call i32 (i32, i32, ...) bitcast (i32 (...)* @ej7 to i32 (i32, i32, ...)*)(i32 %25, i32 %26)
%28 = sext i32 %27 to i64
%29 = inttoptr i64 %28 to double**
store double** %29, double*** %7
%30 = load i32, i32* %2
%31 = load i32, i32* %3
%32 = call i32 (i32, i32, ...) bitcast (i32 (...)* @ej7 to i32 (i32, i32, ...)*)(i32 %30, i32 %31)
%33 = sext i32 %32 to i64
%34 = inttoptr i64 %33 to double**
store double** %34, double*** %8
%35 = load double**, double*** %5
%36 = load i32, i32* %1
%37 = load i32, i32* %2
%38 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej10 to i32 (double**, i32, i32, ...)*)(double** %35, i32 %36, i32 %37)
%39 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([17 x i8], [17 x i8]* @.str.2, i64 0, i64 0))
%40 = load double**, double*** %5
%41 = load i32, i32* %1
%42 = load i32, i32* %2
%43 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej11 to i32 (double**, i32, i32, ...)*)(double** %40, i32 %41, i32 %42)
%44 = load double**, double*** %6
%45 = load i32, i32* %1
%46 = load i32, i32* %2
%47 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej10 to i32 (double**, i32, i32, ...)*)(double** %44, i32 %45, i32 %46)
%48 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([17 x i8], [17 x i8]* @.str.3, i64 0, i64 0))
%49 = load double**, double*** %6
%50 = load i32, i32* %1
%51 = load i32, i32* %2
%52 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej11 to i32 (double**, i32, i32, ...)*)(double** %49, i32 %50, i32 %51)
%53 = load double**, double*** %7
%54 = load i32, i32* %2
%55 = load i32, i32* %3
%56 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej10 to i32 (double**, i32, i32, ...)*)(double** %53, i32 %54, i32 %55)
%57 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([17 x i8], [17 x i8]* @.str.4, i64 0, i64 0))
%58 = load double**, double*** %7
%59 = load i32, i32* %2
%60 = load i32, i32* %3
%61 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej11 to i32 (double**, i32, i32, ...)*)(double** %58, i32 %59, i32 %60)
%62 = load double**, double*** %8
%63 = load i32, i32* %2
%64 = load i32, i32* %3
%65 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej10 to i32 (double**, i32, i32, ...)*)(double** %62, i32 %63, i32 %64)
%66 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([17 x i8], [17 x i8]* @.str.5, i64 0, i64 0))
%67 = load double**, double*** %8
%68 = load i32, i32* %2
%69 = load i32, i32* %3
%70 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej11 to i32 (double**, i32, i32, ...)*)(double** %67, i32 %68, i32 %69)
%71 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([20 x i8], [20 x i8]* @.str.6, i64 0, i64 0))
%72 = call i32 (i8*, ...) @scanf(i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.7, i64 0, i64 0), double* %4)
%73 = load double**, double*** %5
%74 = load i32, i32* %1
%75 = load i32, i32* %2
%76 = load double, double* %4
%77 = call i32 (double**, i32, i32, double, ...) bitcast (i32 (...)* @ej9 to i32 (double**, i32, i32, double, ...)*)(double** %73, i32 %74, i32 %75, double %76)
%78 = load double, double* %4
%79 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([34 x i8], [34 x i8]* @.str.8, i64 0, i64 0), double %78)
%80 = load double**, double*** %5
%81 = load i32, i32* %1
%82 = load i32, i32* %2
%83 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej11 to i32 (double**, i32, i32, ...)*)(double** %80, i32 %81, i32 %82)
%84 = load double**, double*** %6
%85 = load i32, i32* %1
%86 = load i32, i32* %2
%87 = load double, double* %4
%88 = call i32 (double**, i32, i32, double, ...) bitcast (i32 (...)* @ej9 to i32 (double**, i32, i32, double, ...)*)(double** %84, i32 %85, i32 %86, double %87)
%89 = load double, double* %4
%90 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([34 x i8], [34 x i8]* @.str.9, i64 0, i64 0), double %89)
%91 = load double**, double*** %6
%92 = load i32, i32* %1
%93 = load i32, i32* %2
%94 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej11 to i32 (double**, i32, i32, ...)*)(double** %91, i32 %92, i32 %93)
%95 = load double**, double*** %7
%96 = load i32, i32* %2
%97 = load i32, i32* %3
%98 = load double, double* %4
%99 = call i32 (double**, i32, i32, double, ...) bitcast (i32 (...)* @ej9 to i32 (double**, i32, i32, double, ...)*)(double** %95, i32 %96, i32 %97, double %98)
%100 = load double, double* %4
%101 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([34 x i8], [34 x i8]* @.str.10, i64 0, i64 0), double %100)
%102 = load double**, double*** %7
%103 = load i32, i32* %2
%104 = load i32, i32* %3
%105 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej11 to i32 (double**, i32, i32, ...)*)(double** %102, i32 %103, i32 %104)
%106 = load double**, double*** %8
%107 = load i32, i32* %2
%108 = load i32, i32* %3
%109 = load double, double* %4
%110 = call i32 (double**, i32, i32, double, ...) bitcast (i32 (...)* @ej9 to i32 (double**, i32, i32, double, ...)*)(double** %106, i32 %107, i32 %108, double %109)
%111 = load double, double* %4
%112 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([34 x i8], [34 x i8]* @.str.11, i64 0, i64 0), double %111)
%113 = load double**, double*** %8
%114 = load i32, i32* %2
%115 = load i32, i32* %3
%116 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej11 to i32 (double**, i32, i32, ...)*)(double** %113, i32 %114, i32 %115)
%117 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([22 x i8], [22 x i8]* @.str.12, i64 0, i64 0))
%118 = load double**, double*** %5
%119 = load double**, double*** %7
%120 = load i32, i32* %1
%121 = load i32, i32* %2
%122 = load i32, i32* %3
%123 = call i32 (double**, double**, i32, i32, i32, ...) bitcast (i32 (...)* @ej8 to i32 (double**, double**, i32, i32, i32, ...)*)(double** %118, double** %119, i32 %120, i32 %121, i32 %122)
%124 = sext i32 %123 to i64
%125 = inttoptr i64 %124 to double**
store double** %125, double*** %9
%126 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([22 x i8], [22 x i8]* @.str.13, i64 0, i64 0))
%127 = load double**, double*** %6
%128 = load double**, double*** %8
%129 = load i32, i32* %1
%130 = load i32, i32* %2
%131 = load i32, i32* %3
%132 = call i32 (double**, double**, i32, i32, i32, ...) bitcast (i32 (...)* @ej8 to i32 (double**, double**, i32, i32, i32, ...)*)(double** %127, double** %128, i32 %129, i32 %130, i32 %131)
%133 = sext i32 %132 to i64
%134 = inttoptr i64 %133 to double**
store double** %134, double*** %10
%135 = load i32, i32* %1
%136 = load i32, i32* %2
%137 = icmp ne i32 %135, %136
br i1 %137, label %146, label %138
138: ; preds = %0
%139 = load i32, i32* %1
%140 = load i32, i32* %3
%141 = icmp ne i32 %139, %140
br i1 %141, label %146, label %142
142: ; preds = %138
%143 = load i32, i32* %2
%144 = load i32, i32* %3
%145 = icmp ne i32 %143, %144
br i1 %145, label %146, label %148
146: ; preds = %142, %138, %0
%147 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([40 x i8], [40 x i8]* @.str.14, i64 0, i64 0))
br label %148
148: ; preds = %146, %142
%149 = load double**, double*** %10
%150 = load i32, i32* %1
%151 = load i32, i32* %3
%152 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej12 to i32 (double**, i32, i32, ...)*)(double** %149, i32 %150, i32 %151)
%153 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([30 x i8], [30 x i8]* @.str.15, i64 0, i64 0))
%154 = load double**, double*** %10
%155 = load i32, i32* %1
%156 = load i32, i32* %3
%157 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej11 to i32 (double**, i32, i32, ...)*)(double** %154, i32 %155, i32 %156)
%158 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([24 x i8], [24 x i8]* @.str.16, i64 0, i64 0))
%159 = load double**, double*** %9
%160 = load double**, double*** %10
%161 = load i32, i32* %1
%162 = load i32, i32* %3
%163 = load i32, i32* %1
%164 = call i32 (double**, double**, i32, i32, i32, ...) bitcast (i32 (...)* @ej8 to i32 (double**, double**, i32, i32, i32, ...)*)(double** %159, double** %160, i32 %161, i32 %162, i32 %163)
%165 = sext i32 %164 to i64
%166 = inttoptr i64 %165 to double**
store double** %166, double*** %11
store i32 0, i32* %12
br label %167
167: ; preds = %196, %148
%168 = load i32, i32* %12
%169 = load i32, i32* %1
%170 = icmp slt i32 %168, %169
br i1 %170, label %171, label %199
171: ; preds = %167
%172 = load double**, double*** %5
%173 = load i32, i32* %12
%174 = sext i32 %173 to i64
%175 = getelementptr inbounds double*, double** %172, i64 %174
%176 = load double*, double** %175
%177 = bitcast double* %176 to i8*
%178 = load double**, double*** %6
%179 = load i32, i32* %12
%180 = sext i32 %179 to i64
%181 = getelementptr inbounds double*, double** %178, i64 %180
%182 = load double*, double** %181
%183 = bitcast double* %182 to i8*
%184 = load double**, double*** %9
%185 = load i32, i32* %12
%186 = sext i32 %185 to i64
%187 = getelementptr inbounds double*, double** %184, i64 %186
%188 = load double*, double** %187
%189 = bitcast double* %188 to i8*
%190 = load double**, double*** %11
%191 = load i32, i32* %12
%192 = sext i32 %191 to i64
%193 = getelementptr inbounds double*, double** %190, i64 %192
%194 = load double*, double** %193
%195 = bitcast double* %194 to i8*
br label %196
196: ; preds = %171
%197 = load i32, i32* %12
%198 = add nsw i32 %197, 1
store i32 %198, i32* %12
br label %167
199: ; preds = %167
store i32 0, i32* %12
br label %200
200: ; preds = %217, %199
%201 = load i32, i32* %12
%202 = load i32, i32* %2
%203 = icmp slt i32 %201, %202
br i1 %203, label %204, label %220
204: ; preds = %200
%205 = load double**, double*** %7
%206 = load i32, i32* %12
%207 = sext i32 %206 to i64
%208 = getelementptr inbounds double*, double** %205, i64 %207
%209 = load double*, double** %208
%210 = bitcast double* %209 to i8*
%211 = load double**, double*** %8
%212 = load i32, i32* %12
%213 = sext i32 %212 to i64
%214 = getelementptr inbounds double*, double** %211, i64 %213
%215 = load double*, double** %214
%216 = bitcast double* %215 to i8*
br label %217
217: ; preds = %204
%218 = load i32, i32* %12
%219 = add nsw i32 %218, 1
store i32 %219, i32* %12
br label %200
220: ; preds = %200
store i32 0, i32* %12
br label %221
221: ; preds = %232, %220
%222 = load i32, i32* %12
%223 = load i32, i32* %3
%224 = icmp slt i32 %222, %223
br i1 %224, label %225, label %235
225: ; preds = %221
%226 = load double**, double*** %10
%227 = load i32, i32* %12
%228 = sext i32 %227 to i64
%229 = getelementptr inbounds double*, double** %226, i64 %228
%230 = load double*, double** %229
%231 = bitcast double* %230 to i8*
br label %232
232: ; preds = %225
%233 = load i32, i32* %12
%234 = add nsw i32 %233, 1
store i32 %234, i32* %12
br label %221
235: ; preds = %221
%236 = load double**, double*** %5
%237 = bitcast double** %236 to i8*
%238 = load double**, double*** %6
%239 = bitcast double** %238 to i8*
%240 = load double**, double*** %7
%241 = bitcast double** %240 to i8*
%242 = load double**, double*** %8
%243 = bitcast double** %242 to i8*
%244 = load double**, double*** %9
%245 = bitcast double** %244 to i8*
%246 = load double**, double*** %10
%247 = bitcast double** %246 to i8*
%248 = load double**, double*** %11
%249 = bitcast double** %248 to i8*
ret void
}

LLVM IR (-O2):
@.str.1 = [9 x i8] c"%d %d %d\00"
@.str.7 = [4 x i8] c"%lf\00"
@.str.8 = [34 x i8] c"La matriz A escalada por %lf es:\0A\00"
@.str.9 = [34 x i8] c"La matriz B escalada por %lf es:\0A\00"
@.str.10 = [34 x i8] c"La matriz C escalada por %lf es:\0A\00"
@.str.11 = [34 x i8] c"La matriz D escalada por %lf es:\0A\00"
@str = [164 x i8] c"Escriba los valores enteros M,N y P (Considere que de no ingresar matrices cuadradas a la hora de calcular transpuesta habr\C3\A1 un error de violaci\C3\B3n de segmento): \00"
@str.17 = [16 x i8] c"La matriz A es:\00"
@str.18 = [16 x i8] c"La matriz B es:\00"
@str.19 = [16 x i8] c"La matriz C es:\00"
@str.20 = [16 x i8] c"La matriz D es:\00"
@str.21 = [19 x i8] c"Ingrese el factor:\00"
@str.22 = [21 x i8] c"La matriz C1=AxC es:\00"
@str.23 = [21 x i8] c"La matriz C2=BxD es:\00"
@str.24 = [29 x i8] c"La matriz C2 transpuesta es:\00"
@str.25 = [23 x i8] c"La matriz C3=C1xC2 es:\00"
@str.26 = [39 x i8] c"ERROR: Las matrices no son cuadradas. \00"
define void @ej13() {
%1 = alloca i32
%2 = alloca i32
%3 = alloca i32
%4 = alloca double
%5 = bitcast i32* %1 to i8*
%6 = bitcast i32* %2 to i8*
%7 = bitcast i32* %3 to i8*
%8 = bitcast double* %4 to i8*
%9 = tail call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([164 x i8], [164 x i8]* @str, i64 0, i64 0))
%10 = call i32 (i8*, ...) @scanf(i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.1, i64 0, i64 0), i32* %1, i32* %2, i32* %3)
%11 = load i32, i32* %1
%12 = load i32, i32* %2
%13 = call i32 (i32, i32, ...) bitcast (i32 (...)* @ej7 to i32 (i32, i32, ...)*)(i32 %11, i32 %12)
%14 = sext i32 %13 to i64
%15 = inttoptr i64 %14 to double**
%16 = load i32, i32* %1
%17 = load i32, i32* %2
%18 = call i32 (i32, i32, ...) bitcast (i32 (...)* @ej7 to i32 (i32, i32, ...)*)(i32 %16, i32 %17)
%19 = sext i32 %18 to i64
%20 = inttoptr i64 %19 to double**
%21 = load i32, i32* %2
%22 = load i32, i32* %3
%23 = call i32 (i32, i32, ...) bitcast (i32 (...)* @ej7 to i32 (i32, i32, ...)*)(i32 %21, i32 %22)
%24 = sext i32 %23 to i64
%25 = inttoptr i64 %24 to double**
%26 = load i32, i32* %2
%27 = load i32, i32* %3
%28 = call i32 (i32, i32, ...) bitcast (i32 (...)* @ej7 to i32 (i32, i32, ...)*)(i32 %26, i32 %27)
%29 = sext i32 %28 to i64
%30 = inttoptr i64 %29 to double**
%31 = load i32, i32* %1
%32 = load i32, i32* %2
%33 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej10 to i32 (double**, i32, i32, ...)*)(double** %15, i32 %31, i32 %32)
%34 = call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([16 x i8], [16 x i8]* @str.17, i64 0, i64 0))
%35 = load i32, i32* %1
%36 = load i32, i32* %2
%37 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej11 to i32 (double**, i32, i32, ...)*)(double** %15, i32 %35, i32 %36)
%38 = load i32, i32* %1
%39 = load i32, i32* %2
%40 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej10 to i32 (double**, i32, i32, ...)*)(double** %20, i32 %38, i32 %39)
%41 = call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([16 x i8], [16 x i8]* @str.18, i64 0, i64 0))
%42 = load i32, i32* %1
%43 = load i32, i32* %2
%44 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej11 to i32 (double**, i32, i32, ...)*)(double** %20, i32 %42, i32 %43)
%45 = load i32, i32* %2
%46 = load i32, i32* %3
%47 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej10 to i32 (double**, i32, i32, ...)*)(double** %25, i32 %45, i32 %46)
%48 = call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([16 x i8], [16 x i8]* @str.19, i64 0, i64 0))
%49 = load i32, i32* %2
%50 = load i32, i32* %3
%51 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej11 to i32 (double**, i32, i32, ...)*)(double** %25, i32 %49, i32 %50)
%52 = load i32, i32* %2
%53 = load i32, i32* %3
%54 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej10 to i32 (double**, i32, i32, ...)*)(double** %30, i32 %52, i32 %53)
%55 = call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([16 x i8], [16 x i8]* @str.20, i64 0, i64 0))
%56 = load i32, i32* %2
%57 = load i32, i32* %3
%58 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej11 to i32 (double**, i32, i32, ...)*)(double** %30, i32 %56, i32 %57)
%59 = call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([19 x i8], [19 x i8]* @str.21, i64 0, i64 0))
%60 = call i32 (i8*, ...) @scanf(i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.7, i64 0, i64 0), double* %4)
%61 = load i32, i32* %1
%62 = load i32, i32* %2
%63 = load double, double* %4
%64 = call i32 (double**, i32, i32, double, ...) bitcast (i32 (...)* @ej9 to i32 (double**, i32, i32, double, ...)*)(double** %15, i32 %61, i32 %62, double %63)
%65 = load double, double* %4
%66 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([34 x i8], [34 x i8]* @.str.8, i64 0, i64 0), double %65)
%67 = load i32, i32* %1
%68 = load i32, i32* %2
%69 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej11 to i32 (double**, i32, i32, ...)*)(double** %15, i32 %67, i32 %68)
%70 = load i32, i32* %1
%71 = load i32, i32* %2
%72 = load double, double* %4
%73 = call i32 (double**, i32, i32, double, ...) bitcast (i32 (...)* @ej9 to i32 (double**, i32, i32, double, ...)*)(double** %20, i32 %70, i32 %71, double %72)
%74 = load double, double* %4
%75 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([34 x i8], [34 x i8]* @.str.9, i64 0, i64 0), double %74)
%76 = load i32, i32* %1
%77 = load i32, i32* %2
%78 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej11 to i32 (double**, i32, i32, ...)*)(double** %20, i32 %76, i32 %77)
%79 = load i32, i32* %2
%80 = load i32, i32* %3
%81 = load double, double* %4
%82 = call i32 (double**, i32, i32, double, ...) bitcast (i32 (...)* @ej9 to i32 (double**, i32, i32, double, ...)*)(double** %25, i32 %79, i32 %80, double %81)
%83 = load double, double* %4
%84 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([34 x i8], [34 x i8]* @.str.10, i64 0, i64 0), double %83)
%85 = load i32, i32* %2
%86 = load i32, i32* %3
%87 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej11 to i32 (double**, i32, i32, ...)*)(double** %25, i32 %85, i32 %86)
%88 = load i32, i32* %2
%89 = load i32, i32* %3
%90 = load double, double* %4
%91 = call i32 (double**, i32, i32, double, ...) bitcast (i32 (...)* @ej9 to i32 (double**, i32, i32, double, ...)*)(double** %30, i32 %88, i32 %89, double %90)
%92 = load double, double* %4
%93 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([34 x i8], [34 x i8]* @.str.11, i64 0, i64 0), double %92)
%94 = load i32, i32* %2
%95 = load i32, i32* %3
%96 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej11 to i32 (double**, i32, i32, ...)*)(double** %30, i32 %94, i32 %95)
%97 = call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([21 x i8], [21 x i8]* @str.22, i64 0, i64 0))
%98 = load i32, i32* %1
%99 = load i32, i32* %2
%100 = load i32, i32* %3
%101 = call i32 (double**, double**, i32, i32, i32, ...) bitcast (i32 (...)* @ej8 to i32 (double**, double**, i32, i32, i32, ...)*)(double** %15, double** %25, i32 %98, i32 %99, i32 %100)
%102 = sext i32 %101 to i64
%103 = inttoptr i64 %102 to double**
%104 = call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([21 x i8], [21 x i8]* @str.23, i64 0, i64 0))
%105 = load i32, i32* %1
%106 = load i32, i32* %2
%107 = load i32, i32* %3
%108 = call i32 (double**, double**, i32, i32, i32, ...) bitcast (i32 (...)* @ej8 to i32 (double**, double**, i32, i32, i32, ...)*)(double** %20, double** %30, i32 %105, i32 %106, i32 %107)
%109 = sext i32 %108 to i64
%110 = inttoptr i64 %109 to double**
%111 = load i32, i32* %1
%112 = load i32, i32* %2
%113 = icmp eq i32 %111, %112
%114 = load i32, i32* %3
%115 = icmp eq i32 %111, %114
%116 = select i1 %113, i1 %115, i1 false
br i1 %116, label %121, label %117
117: ; preds = %0
%118 = call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([39 x i8], [39 x i8]* @str.26, i64 0, i64 0))
%119 = load i32, i32* %1
%120 = load i32, i32* %3
br label %121
121: ; preds = %0, %117
%122 = phi i32 [ %120, %117 ], [ %111, %0 ]
%123 = phi i32 [ %119, %117 ], [ %111, %0 ]
%124 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej12 to i32 (double**, i32, i32, ...)*)(double** %110, i32 %123, i32 %122)
%125 = call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([29 x i8], [29 x i8]* @str.24, i64 0, i64 0))
%126 = load i32, i32* %1
%127 = load i32, i32* %3
%128 = call i32 (double**, i32, i32, ...) bitcast (i32 (...)* @ej11 to i32 (double**, i32, i32, ...)*)(double** %110, i32 %126, i32 %127)
%129 = call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([23 x i8], [23 x i8]* @str.25, i64 0, i64 0))
%130 = load i32, i32* %1
%131 = load i32, i32* %3
%132 = call i32 (double**, double**, i32, i32, i32, ...) bitcast (i32 (...)* @ej8 to i32 (double**, double**, i32, i32, i32, ...)*)(double** %103, double** %110, i32 %130, i32 %131, i32 %130)
%133 = sext i32 %132 to i64
%134 = inttoptr i64 %133 to double**
%135 = load i32, i32* %1
%136 = icmp sgt i32 %135, 0
br i1 %136, label %140, label %137
137: ; preds = %140, %121
%138 = load i32, i32* %2
%139 = icmp sgt i32 %138, 0
br i1 %139, label %161, label %158
140: ; preds = %121, %140
%141 = phi i64 [ %154, %140 ], [ 0, %121 ]
%142 = getelementptr inbounds double*, double** %15, i64 %141
%143 = bitcast double** %142 to i8**
%144 = load i8*, i8** %143
%145 = getelementptr inbounds double*, double** %20, i64 %141
%146 = bitcast double** %145 to i8**
%147 = load i8*, i8** %146
%148 = getelementptr inbounds double*, double** %103, i64 %141
%149 = bitcast double** %148 to i8**
%150 = load i8*, i8** %149
%151 = getelementptr inbounds double*, double** %134, i64 %141
%152 = bitcast double** %151 to i8**
%153 = load i8*, i8** %152
%154 = add nuw nsw i64 %141, 1
%155 = load i32, i32* %1
%156 = sext i32 %155 to i64
%157 = icmp slt i64 %154, %156
br i1 %157, label %140, label %137
158: ; preds = %161, %137
%159 = load i32, i32* %3
%160 = icmp sgt i32 %159, 0
br i1 %160, label %173, label %182
161: ; preds = %137, %161
%162 = phi i64 [ %169, %161 ], [ 0, %137 ]
%163 = getelementptr inbounds double*, double** %25, i64 %162
%164 = bitcast double** %163 to i8**
%165 = load i8*, i8** %164
%166 = getelementptr inbounds double*, double** %30, i64 %162
%167 = bitcast double** %166 to i8**
%168 = load i8*, i8** %167
%169 = add nuw nsw i64 %162, 1
%170 = load i32, i32* %2
%171 = sext i32 %170 to i64
%172 = icmp slt i64 %169, %171
br i1 %172, label %161, label %158
173: ; preds = %158, %173
%174 = phi i64 [ %178, %173 ], [ 0, %158 ]
%175 = getelementptr inbounds double*, double** %110, i64 %174
%176 = bitcast double** %175 to i8**
%177 = load i8*, i8** %176
%178 = add nuw nsw i64 %174, 1
%179 = load i32, i32* %3
%180 = sext i32 %179 to i64
%181 = icmp slt i64 %178, %180
br i1 %181, label %173, label %182
182: ; preds = %173, %158
%183 = inttoptr i64 %14 to i8*
%184 = inttoptr i64 %19 to i8*
%185 = inttoptr i64 %24 to i8*
%186 = inttoptr i64 %29 to i8*
%187 = inttoptr i64 %102 to i8*
%188 = inttoptr i64 %109 to i8*
%189 = inttoptr i64 %133 to i8*
ret void
}