#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 */
typedef int /*<<< orphan*/ FILE;

/* Variables and functions */
int /*<<< orphan*/ cntab2(int **, int, int, float *, float *, float *, float *,
                          float *, float *, float *, float *);
int /*<<< orphan*/ fclose(int /*<<< orphan*/ *);
int /*<<< orphan*/ fgets(char *, int, int /*<<< orphan*/ *);
int /*<<< orphan*/ *fopen(char *, char *);
int /*<<< orphan*/ free_imatrix(int **, int, int, int, int);
int /*<<< orphan*/ fscanf(int /*<<< orphan*/ *, char *, ...);
int **imatrix(int, int, int, int);
int /*<<< orphan*/ nrerror(char *);
int /*<<< orphan*/ printf(char *, ...);
int main(void) {
  float h, hx, hxgy, hy, hygx, uxgy, uxy, uygx;
  int i, j, **nmbr;
  char dummy[80], fate[9 + 1][16], mon[12 + 1][6], txt[16];
  FILE *fp;
  nmbr = imatrix(1, 9, 1, 12);
  if ((fp = fopen("table1.dat", "r")) == NULL)
    nrerror("Data file table1.dat not found\n");
  fgets(dummy, 80, fp);
  fgets(dummy, 80, fp);
  fscanf(fp, "%16c", txt);
  txt[15] = '\0';
  for (i = 1; i <= 12; i++)
    fscanf(fp, " %s", mon[i]);
  fgets(dummy, 80, fp);
  fgets(dummy, 80, fp);
  for (i = 1; i <= 9; i++) {
    fscanf(fp, "%16[^0123456789]", fate[i]);
    fate[i][15] = '\0';
    for (j = 1; j <= 12; j++)
      fscanf(fp, "%d ", &nmbr[i][j]);
  }
  fclose(fp);
  printf("\n%s", txt);
  for (i = 1; i <= 12; i++)
    printf("%5s", mon[i]);
  printf("\n\n");
  for (i = 1; i <= 9; i++) {
    printf("%s", fate[i]);
    for (j = 1; j <= 12; j++)
      printf("%5d", nmbr[i][j]);
    printf("\n");
  }
  cntab2(nmbr, 9, 12, &h, &hx, &hy, &hygx, &hxgy, &uygx, &uxgy, &uxy);
  printf("\n       entropy of table           %10.4f\n", h);
  printf("       entropy of x-distribution  %10.4f\n", hx);
  printf("       entropy of y-distribution  %10.4f\n", hy);
  printf("       entropy of y given x       %10.4f\n", hygx);
  printf("       entropy of x given y       %10.4f\n", hxgy);
  printf("       dependency of y on x       %10.4f\n", uygx);
  printf("       dependency of x on y       %10.4f\n", uxgy);
  printf("       symmetrical dependency     %10.4f\n", uxy);
  free_imatrix(nmbr, 1, 9, 1, 12);
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
push   %r14
push   %rbx
sub    $0x1c0,%rsp
movl   $0x0,-0x14(%rbp)
mov    $0x1,%edx
mov    $0x9,%esi
mov    $0xc,%ecx
mov    %edx,%edi
call   1030 <imatrix@plt>
mov    %rax,-0x48(%rbp)
lea    0xe3a(%rip),%rdi
lea    0xe3e(%rip),%rsi
call   10b0 <fopen@plt>
mov    %rax,-0x1a8(%rbp)
cmp    $0x0,%rax
jne    11ef <main+0x5f>
lea    0xe23(%rip),%rdi
call   1040 <nrerror@plt>
lea    -0xa0(%rbp),%rdi
mov    -0x1a8(%rbp),%rdx
mov    $0x50,%esi
call   1090 <fgets@plt>
lea    -0xa0(%rbp),%rdi
mov    -0x1a8(%rbp),%rdx
mov    $0x50,%esi
call   1090 <fgets@plt>
mov    -0x1a8(%rbp),%rdi
lea    -0x1a0(%rbp),%rdx
lea    0xdf9(%rip),%rsi
mov    $0x0,%al
call   1070 <fscanf@plt>
movb   $0x0,-0x191(%rbp)
movl   $0x1,-0x38(%rbp)
cmpl   $0xc,-0x38(%rbp)
jg     1288 <main+0xf8>
mov    -0x1a8(%rbp),%rdi
movslq -0x38(%rbp),%rax
lea    -0x190(%rbp),%rdx
imul   $0x6,%rax,%rax
add    %rax,%rdx
lea    0xdbf(%rip),%rsi
mov    $0x0,%al
call   1070 <fscanf@plt>
mov    -0x38(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x38(%rbp)
jmp    1249 <main+0xb9>
lea    -0xa0(%rbp),%rdi
mov    -0x1a8(%rbp),%rdx
mov    $0x50,%esi
call   1090 <fgets@plt>
lea    -0xa0(%rbp),%rdi
mov    -0x1a8(%rbp),%rdx
mov    $0x50,%esi
call   1090 <fgets@plt>
movl   $0x1,-0x38(%rbp)
cmpl   $0x9,-0x38(%rbp)
jg     1364 <main+0x1d4>
mov    -0x1a8(%rbp),%rdi
movslq -0x38(%rbp),%rax
lea    -0x140(%rbp),%rdx
shl    $0x4,%rax
add    %rax,%rdx
lea    0xd4d(%rip),%rsi
mov    $0x0,%al
call   1070 <fscanf@plt>
movslq -0x38(%rbp),%rcx
lea    -0x140(%rbp),%rax
shl    $0x4,%rcx
add    %rcx,%rax
movb   $0x0,0xf(%rax)
movl   $0x1,-0x3c(%rbp)
cmpl   $0xc,-0x3c(%rbp)
jg     1351 <main+0x1c1>
mov    -0x1a8(%rbp),%rdi
mov    -0x48(%rbp),%rax
movslq -0x38(%rbp),%rcx
mov    (%rax,%rcx,8),%rdx
movslq -0x3c(%rbp),%rax
shl    $0x2,%rax
add    %rax,%rdx
lea    0xd0b(%rip),%rsi
mov    $0x0,%al
call   1070 <fscanf@plt>
mov    -0x3c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x3c(%rbp)
jmp    130d <main+0x17d>
jmp    1356 <main+0x1c6>
mov    -0x38(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x38(%rbp)
jmp    12bf <main+0x12f>
mov    -0x1a8(%rbp),%rdi
call   1050 <fclose@plt>
lea    -0x1a0(%rbp),%rsi
lea    0xccd(%rip),%rdi
mov    $0x0,%al
call   1060 <printf@plt>
movl   $0x1,-0x38(%rbp)
cmpl   $0xc,-0x38(%rbp)
jg     13c4 <main+0x234>
movslq -0x38(%rbp),%rax
lea    -0x190(%rbp),%rsi
imul   $0x6,%rax,%rax
add    %rax,%rsi
lea    0xca0(%rip),%rdi
mov    $0x0,%al
call   1060 <printf@plt>
mov    -0x38(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x38(%rbp)
jmp    138c <main+0x1fc>
lea    0xc88(%rip),%rdi
mov    $0x0,%al
call   1060 <printf@plt>
movl   $0x1,-0x38(%rbp)
cmpl   $0x9,-0x38(%rbp)
jg     145f <main+0x2cf>
movslq -0x38(%rbp),%rax
lea    -0x140(%rbp),%rsi
shl    $0x4,%rax
add    %rax,%rsi
lea    0xc50(%rip),%rdi
mov    $0x0,%al
call   1060 <printf@plt>
movl   $0x1,-0x3c(%rbp)
cmpl   $0xc,-0x3c(%rbp)
jg     1443 <main+0x2b3>
mov    -0x48(%rbp),%rax
movslq -0x38(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x3c(%rbp),%rcx
mov    (%rax,%rcx,4),%esi
lea    0xc28(%rip),%rdi
mov    $0x0,%al
call   1060 <printf@plt>
mov    -0x3c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x3c(%rbp)
jmp    140a <main+0x27a>
lea    0xc0a(%rip),%rdi
mov    $0x0,%al
call   1060 <printf@plt>
mov    -0x38(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x38(%rbp)
jmp    13d9 <main+0x249>
mov    -0x48(%rbp),%rdi
mov    $0x9,%esi
mov    $0xc,%edx
lea    -0x18(%rbp),%rcx
lea    -0x1c(%rbp),%r8
lea    -0x24(%rbp),%r9
lea    -0x28(%rbp),%r14
lea    -0x20(%rbp),%rbx
lea    -0x34(%rbp),%r11
lea    -0x2c(%rbp),%r10
lea    -0x30(%rbp),%rax
mov    %r14,(%rsp)
mov    %rbx,0x8(%rsp)
mov    %r11,0x10(%rsp)
mov    %r10,0x18(%rsp)
mov    %rax,0x20(%rsp)
call   1080 <cntab2@plt>
movss  -0x18(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0xba0(%rip),%rdi
mov    $0x1,%al
call   1060 <printf@plt>
movss  -0x1c(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0xbb4(%rip),%rdi
mov    $0x1,%al
call   1060 <printf@plt>
movss  -0x24(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0xbc7(%rip),%rdi
mov    $0x1,%al
call   1060 <printf@plt>
movss  -0x28(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0xbda(%rip),%rdi
mov    $0x1,%al
call   1060 <printf@plt>
movss  -0x20(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0xbed(%rip),%rdi
mov    $0x1,%al
call   1060 <printf@plt>
movss  -0x34(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0xc00(%rip),%rdi
mov    $0x1,%al
call   1060 <printf@plt>
movss  -0x2c(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0xc13(%rip),%rdi
mov    $0x1,%al
call   1060 <printf@plt>
movss  -0x30(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0xc26(%rip),%rdi
mov    $0x1,%al
call   1060 <printf@plt>
mov    -0x48(%rbp),%rdi
mov    $0x1,%ecx
mov    $0x9,%edx
mov    $0xc,%r8d
mov    %ecx,%esi
call   10a0 <free_imatrix@plt>
xor    %eax,%eax
add    $0x1c0,%rsp
pop    %rbx
pop    %r14
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x178,%rsp
mov    $0x1,%edi
mov    $0x9,%esi
mov    $0x1,%edx
mov    $0xc,%ecx
call   1040 <imatrix@plt>
mov    %rax,%r14
lea    0xe1c(%rip),%rdi
lea    0xe20(%rip),%rsi
call   10d0 <fopen@plt>
mov    %rax,%rbx
test   %rax,%rax
jne    1204 <main+0x54>
lea    0xe0e(%rip),%rdi
call   1060 <nrerror@plt>
lea    0x120(%rsp),%r15
mov    %r15,%rdi
mov    $0x50,%esi
mov    %rbx,%rdx
call   10b0 <fgets@plt>
mov    %r15,%rdi
mov    $0x50,%esi
mov    %rbx,%rdx
call   10b0 <fgets@plt>
lea    0xdfa(%rip),%rsi
lea    0x70(%rsp),%rdx
mov    %rbx,%rdi
xor    %eax,%eax
call   1090 <fscanf@plt>
movb   $0x0,0x7f(%rsp)
lea    0x26(%rsp),%rdx
lea    0xddf(%rip),%rbp
mov    %rbx,%rdi
mov    %rbp,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
lea    0x2c(%rsp),%rdx
mov    %rbx,%rdi
mov    %rbp,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
lea    0x32(%rsp),%rdx
mov    %rbx,%rdi
mov    %rbp,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
lea    0x38(%rsp),%rdx
mov    %rbx,%rdi
mov    %rbp,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
lea    0x3e(%rsp),%rdx
mov    %rbx,%rdi
mov    %rbp,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
lea    0x44(%rsp),%rdx
mov    %rbx,%rdi
mov    %rbp,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
lea    0x4a(%rsp),%rdx
mov    %rbx,%rdi
mov    %rbp,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
lea    0x50(%rsp),%rdx
mov    %rbx,%rdi
mov    %rbp,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
lea    0x56(%rsp),%rdx
mov    %rbx,%rdi
mov    %rbp,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
lea    0x5c(%rsp),%rdx
mov    %rbx,%rdi
mov    %rbp,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
lea    0x62(%rsp),%rdx
mov    %rbx,%rdi
mov    %rbp,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
lea    0x68(%rsp),%rdx
mov    %rbx,%rdi
mov    %rbp,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
mov    %r15,%rdi
mov    $0x50,%esi
mov    %rbx,%rdx
call   10b0 <fgets@plt>
mov    %r15,%rdi
mov    $0x50,%esi
mov    %rbx,%rdx
call   10b0 <fgets@plt>
lea    0x90(%rsp),%r15
mov    $0x1,%ebp
lea    0xcdc(%rip),%r12
lea    0xce6(%rip),%r13
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
mov    %rbx,%rdi
mov    %r12,%rsi
mov    %r15,%rdx
xor    %eax,%eax
call   1090 <fscanf@plt>
movb   $0x0,0xf(%r15)
mov    (%r14,%rbp,8),%rdx
add    $0x4,%rdx
mov    %rbx,%rdi
mov    %r13,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
mov    (%r14,%rbp,8),%rdx
add    $0x8,%rdx
mov    %rbx,%rdi
mov    %r13,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
mov    (%r14,%rbp,8),%rdx
add    $0xc,%rdx
mov    %rbx,%rdi
mov    %r13,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
mov    (%r14,%rbp,8),%rdx
add    $0x10,%rdx
mov    %rbx,%rdi
mov    %r13,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
mov    (%r14,%rbp,8),%rdx
add    $0x14,%rdx
mov    %rbx,%rdi
mov    %r13,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
mov    (%r14,%rbp,8),%rdx
add    $0x18,%rdx
mov    %rbx,%rdi
mov    %r13,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
mov    (%r14,%rbp,8),%rdx
add    $0x1c,%rdx
mov    %rbx,%rdi
mov    %r13,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
mov    (%r14,%rbp,8),%rdx
add    $0x20,%rdx
mov    %rbx,%rdi
mov    %r13,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
mov    (%r14,%rbp,8),%rdx
add    $0x24,%rdx
mov    %rbx,%rdi
mov    %r13,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
mov    (%r14,%rbp,8),%rdx
add    $0x28,%rdx
mov    %rbx,%rdi
mov    %r13,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
mov    (%r14,%rbp,8),%rdx
add    $0x2c,%rdx
mov    %rbx,%rdi
mov    %r13,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
mov    (%r14,%rbp,8),%rdx
add    $0x30,%rdx
mov    %rbx,%rdi
mov    %r13,%rsi
xor    %eax,%eax
call   1090 <fscanf@plt>
add    $0x1,%rbp
add    $0x10,%r15
cmp    $0xa,%rbp
jne    1370 <main+0x1c0>
mov    %rbx,%rdi
call   1070 <fclose@plt>
lea    0xba9(%rip),%rdi
lea    0x70(%rsp),%rsi
xor    %eax,%eax
call   1080 <printf@plt>
lea    0xb9a(%rip),%rbx
mov    %rbx,%rdi
lea    0x26(%rsp),%rsi
xor    %eax,%eax
call   1080 <printf@plt>
mov    %rbx,%rdi
lea    0x2c(%rsp),%rsi
xor    %eax,%eax
call   1080 <printf@plt>
mov    %rbx,%rdi
lea    0x32(%rsp),%rsi
xor    %eax,%eax
call   1080 <printf@plt>
mov    %rbx,%rdi
lea    0x38(%rsp),%rsi
xor    %eax,%eax
call   1080 <printf@plt>
mov    %rbx,%rdi
lea    0x3e(%rsp),%rsi
xor    %eax,%eax
call   1080 <printf@plt>
mov    %rbx,%rdi
lea    0x44(%rsp),%rsi
xor    %eax,%eax
call   1080 <printf@plt>
mov    %rbx,%rdi
lea    0x4a(%rsp),%rsi
xor    %eax,%eax
call   1080 <printf@plt>
mov    %rbx,%rdi
lea    0x50(%rsp),%rsi
xor    %eax,%eax
call   1080 <printf@plt>
mov    %rbx,%rdi
lea    0x56(%rsp),%rsi
xor    %eax,%eax
call   1080 <printf@plt>
mov    %rbx,%rdi
lea    0x5c(%rsp),%rsi
xor    %eax,%eax
call   1080 <printf@plt>
mov    %rbx,%rdi
lea    0x62(%rsp),%rsi
xor    %eax,%eax
call   1080 <printf@plt>
mov    %rbx,%rdi
lea    0x68(%rsp),%rsi
xor    %eax,%eax
call   1080 <printf@plt>
lea    0xabb(%rip),%rdi
call   1050 <puts@plt>
lea    0x90(%rsp),%rbx
mov    $0x1,%ebp
lea    0xac3(%rip),%r15
lea    0xac3(%rip),%r12
mov    %r15,%rdi
mov    %rbx,%rsi
xor    %eax,%eax
call   1080 <printf@plt>
mov    (%r14,%rbp,8),%rax
mov    0x4(%rax),%esi
mov    %r12,%rdi
xor    %eax,%eax
call   1080 <printf@plt>
mov    (%r14,%rbp,8),%rax
mov    0x8(%rax),%esi
mov    %r12,%rdi
xor    %eax,%eax
call   1080 <printf@plt>
mov    (%r14,%rbp,8),%rax
mov    0xc(%rax),%esi
mov    %r12,%rdi
xor    %eax,%eax
call   1080 <printf@plt>
mov    (%r14,%rbp,8),%rax
mov    0x10(%rax),%esi
mov    %r12,%rdi
xor    %eax,%eax
call   1080 <printf@plt>
mov    (%r14,%rbp,8),%rax
mov    0x14(%rax),%esi
mov    %r12,%rdi
xor    %eax,%eax
call   1080 <printf@plt>
mov    (%r14,%rbp,8),%rax
mov    0x18(%rax),%esi
mov    %r12,%rdi
xor    %eax,%eax
call   1080 <printf@plt>
mov    (%r14,%rbp,8),%rax
mov    0x1c(%rax),%esi
mov    %r12,%rdi
xor    %eax,%eax
call   1080 <printf@plt>
mov    (%r14,%rbp,8),%rax
mov    0x20(%rax),%esi
mov    %r12,%rdi
xor    %eax,%eax
call   1080 <printf@plt>
mov    (%r14,%rbp,8),%rax
mov    0x24(%rax),%esi
mov    %r12,%rdi
xor    %eax,%eax
call   1080 <printf@plt>
mov    (%r14,%rbp,8),%rax
mov    0x28(%rax),%esi
mov    %r12,%rdi
xor    %eax,%eax
call   1080 <printf@plt>
mov    (%r14,%rbp,8),%rax
mov    0x2c(%rax),%esi
mov    %r12,%rdi
xor    %eax,%eax
call   1080 <printf@plt>
mov    (%r14,%rbp,8),%rax
mov    0x30(%rax),%esi
mov    %r12,%rdi
xor    %eax,%eax
call   1080 <printf@plt>
mov    $0xa,%edi
call   1030 <putchar@plt>
add    $0x1,%rbp
add    $0x10,%rbx
cmp    $0xa,%rbp
jne    1590 <main+0x3e0>
sub    $0x8,%rsp
lea    0xc(%rsp),%rax
lea    0x10(%rsp),%rbp
lea    0x8(%rsp),%rbx
lea    0x1c(%rsp),%r10
lea    0x14(%rsp),%r11
lea    0x24(%rsp),%rcx
lea    0x20(%rsp),%r8
lea    0x18(%rsp),%r9
mov    %r14,%rdi
mov    $0x9,%esi
mov    $0xc,%edx
push   %rax
push   %rbp
push   %rbx
push   %r10
push   %r11
call   10a0 <cntab2@plt>
add    $0x30,%rsp
movss  0x1c(%rsp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0x978(%rip),%rdi
mov    $0x1,%al
call   1080 <printf@plt>
movss  0x18(%rsp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0x98b(%rip),%rdi
mov    $0x1,%al
call   1080 <printf@plt>
movss  0x10(%rsp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0x99d(%rip),%rdi
mov    $0x1,%al
call   1080 <printf@plt>
movss  0xc(%rsp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0x9af(%rip),%rdi
mov    $0x1,%al
call   1080 <printf@plt>
movss  0x14(%rsp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0x9c1(%rip),%rdi
mov    $0x1,%al
call   1080 <printf@plt>
movss  (%rsp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0x9d4(%rip),%rdi
mov    $0x1,%al
call   1080 <printf@plt>
movss  0x8(%rsp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0x9e6(%rip),%rdi
mov    $0x1,%al
call   1080 <printf@plt>
movss  0x4(%rsp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0x9f8(%rip),%rdi
mov    $0x1,%al
call   1080 <printf@plt>
mov    %r14,%rdi
mov    $0x1,%esi
mov    $0x9,%edx
mov    $0x1,%ecx
mov    $0xc,%r8d
call   10c0 <free_imatrix@plt>
xor    %eax,%eax
add    $0x178,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [11 x i8] c"table1.dat\00"
@.str.1 = [2 x i8] c"r\00"
@.str.2 = [32 x i8] c"Data file table1.dat not found\0A\00"
@.str.3 = [5 x i8] c"%16c\00"
@.str.4 = [4 x i8] c" %s\00"
@.str.5 = [17 x i8] c"%16[^0123456789]\00"
@.str.6 = [4 x i8] c"%d \00"
@.str.7 = [4 x i8] c"\0A%s\00"
@.str.8 = [4 x i8] c"%5s\00"
@.str.9 = [3 x i8] c"\0A\0A\00"
@.str.10 = [3 x i8] c"%s\00"
@.str.11 = [4 x i8] c"%5d\00"
@.str.12 = [2 x i8] c"\0A\00"
@.str.13 = [43 x i8] c"\0A entropy of table %10.4f\0A\00"
@.str.14 = [42 x i8] c" entropy of x-distribution %10.4f\0A\00"
@.str.15 = [42 x i8] c" entropy of y-distribution %10.4f\0A\00"
@.str.16 = [42 x i8] c" entropy of y given x %10.4f\0A\00"
@.str.17 = [42 x i8] c" entropy of x given y %10.4f\0A\00"
@.str.18 = [42 x i8] c" dependency of y on x %10.4f\0A\00"
@.str.19 = [42 x i8] c" dependency of x on y %10.4f\0A\00"
@.str.20 = [42 x i8] c" symmetrical dependency %10.4f\0A\00"
define i32 @main() {
%1 = alloca i32
%2 = alloca float
%3 = alloca float
%4 = alloca float
%5 = alloca float
%6 = alloca float
%7 = alloca float
%8 = alloca float
%9 = alloca float
%10 = alloca i32
%11 = alloca i32
%12 = alloca i32**
%13 = alloca [80 x i8]
%14 = alloca [10 x [16 x i8]]
%15 = alloca [13 x [6 x i8]]
%16 = alloca [16 x i8]
%17 = alloca i32*
store i32 0, i32* %1
%18 = call i32** @imatrix(i32 1, i32 9, i32 1, i32 12)
store i32** %18, i32*** %12
%19 = call i32* @fopen(i8* getelementptr inbounds ([11 x i8], [11 x i8]* @.str, i64 0, i64 0), i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.1, i64 0, i64 0))
store i32* %19, i32** %17
%20 = icmp eq i32* %19, null
br i1 %20, label %21, label %23
21: ; preds = %0
%22 = call i32 @nrerror(i8* getelementptr inbounds ([32 x i8], [32 x i8]* @.str.2, i64 0, i64 0))
br label %23
23: ; preds = %21, %0
%24 = getelementptr inbounds [80 x i8], [80 x i8]* %13, i64 0, i64 0
%25 = load i32*, i32** %17
%26 = call i32 @fgets(i8* %24, i32 80, i32* %25)
%27 = getelementptr inbounds [80 x i8], [80 x i8]* %13, i64 0, i64 0
%28 = load i32*, i32** %17
%29 = call i32 @fgets(i8* %27, i32 80, i32* %28)
%30 = load i32*, i32** %17
%31 = getelementptr inbounds [16 x i8], [16 x i8]* %16, i64 0, i64 0
%32 = call i32 (i32*, i8*, ...) @fscanf(i32* %30, i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.3, i64 0, i64 0), i8* %31)
%33 = getelementptr inbounds [16 x i8], [16 x i8]* %16, i64 0, i64 15
store i8 0, i8* %33
store i32 1, i32* %10
br label %34
34: ; preds = %44, %23
%35 = load i32, i32* %10
%36 = icmp sle i32 %35, 12
br i1 %36, label %37, label %47
37: ; preds = %34
%38 = load i32*, i32** %17
%39 = load i32, i32* %10
%40 = sext i32 %39 to i64
%41 = getelementptr inbounds [13 x [6 x i8]], [13 x [6 x i8]]* %15, i64 0, i64 %40
%42 = getelementptr inbounds [6 x i8], [6 x i8]* %41, i64 0, i64 0
%43 = call i32 (i32*, i8*, ...) @fscanf(i32* %38, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.4, i64 0, i64 0), i8* %42)
br label %44
44: ; preds = %37
%45 = load i32, i32* %10
%46 = add nsw i32 %45, 1
store i32 %46, i32* %10
br label %34
47: ; preds = %34
%48 = getelementptr inbounds [80 x i8], [80 x i8]* %13, i64 0, i64 0
%49 = load i32*, i32** %17
%50 = call i32 @fgets(i8* %48, i32 80, i32* %49)
%51 = getelementptr inbounds [80 x i8], [80 x i8]* %13, i64 0, i64 0
%52 = load i32*, i32** %17
%53 = call i32 @fgets(i8* %51, i32 80, i32* %52)
store i32 1, i32* %10
br label %54
54: ; preds = %86, %47
%55 = load i32, i32* %10
%56 = icmp sle i32 %55, 9
br i1 %56, label %57, label %89
57: ; preds = %54
%58 = load i32*, i32** %17
%59 = load i32, i32* %10
%60 = sext i32 %59 to i64
%61 = getelementptr inbounds [10 x [16 x i8]], [10 x [16 x i8]]* %14, i64 0, i64 %60
%62 = getelementptr inbounds [16 x i8], [16 x i8]* %61, i64 0, i64 0
%63 = call i32 (i32*, i8*, ...) @fscanf(i32* %58, i8* getelementptr inbounds ([17 x i8], [17 x i8]* @.str.5, i64 0, i64 0), i8* %62)
%64 = load i32, i32* %10
%65 = sext i32 %64 to i64
%66 = getelementptr inbounds [10 x [16 x i8]], [10 x [16 x i8]]* %14, i64 0, i64 %65
%67 = getelementptr inbounds [16 x i8], [16 x i8]* %66, i64 0, i64 15
store i8 0, i8* %67
store i32 1, i32* %11
br label %68
68: ; preds = %82, %57
%69 = load i32, i32* %11
%70 = icmp sle i32 %69, 12
br i1 %70, label %71, label %85
71: ; preds = %68
%72 = load i32*, i32** %17
%73 = load i32**, i32*** %12
%74 = load i32, i32* %10
%75 = sext i32 %74 to i64
%76 = getelementptr inbounds i32*, i32** %73, i64 %75
%77 = load i32*, i32** %76
%78 = load i32, i32* %11
%79 = sext i32 %78 to i64
%80 = getelementptr inbounds i32, i32* %77, i64 %79
%81 = call i32 (i32*, i8*, ...) @fscanf(i32* %72, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.6, i64 0, i64 0), i32* %80)
br label %82
82: ; preds = %71
%83 = load i32, i32* %11
%84 = add nsw i32 %83, 1
store i32 %84, i32* %11
br label %68
85: ; preds = %68
br label %86
86: ; preds = %85
%87 = load i32, i32* %10
%88 = add nsw i32 %87, 1
store i32 %88, i32* %10
br label %54
89: ; preds = %54
%90 = load i32*, i32** %17
%91 = call i32 @fclose(i32* %90)
%92 = getelementptr inbounds [16 x i8], [16 x i8]* %16, i64 0, i64 0
%93 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.7, i64 0, i64 0), i8* %92)
store i32 1, i32* %10
br label %94
94: ; preds = %103, %89
%95 = load i32, i32* %10
%96 = icmp sle i32 %95, 12
br i1 %96, label %97, label %106
97: ; preds = %94
%98 = load i32, i32* %10
%99 = sext i32 %98 to i64
%100 = getelementptr inbounds [13 x [6 x i8]], [13 x [6 x i8]]* %15, i64 0, i64 %99
%101 = getelementptr inbounds [6 x i8], [6 x i8]* %100, i64 0, i64 0
%102 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.8, i64 0, i64 0), i8* %101)
br label %103
103: ; preds = %97
%104 = load i32, i32* %10
%105 = add nsw i32 %104, 1
store i32 %105, i32* %10
br label %94
106: ; preds = %94
%107 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.9, i64 0, i64 0))
store i32 1, i32* %10
br label %108
108: ; preds = %136, %106
%109 = load i32, i32* %10
%110 = icmp sle i32 %109, 9
br i1 %110, label %111, label %139
111: ; preds = %108
%112 = load i32, i32* %10
%113 = sext i32 %112 to i64
%114 = getelementptr inbounds [10 x [16 x i8]], [10 x [16 x i8]]* %14, i64 0, i64 %113
%115 = getelementptr inbounds [16 x i8], [16 x i8]* %114, i64 0, i64 0
%116 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.10, i64 0, i64 0), i8* %115)
store i32 1, i32* %11
br label %117
117: ; preds = %131, %111
%118 = load i32, i32* %11
%119 = icmp sle i32 %118, 12
br i1 %119, label %120, label %134
120: ; preds = %117
%121 = load i32**, i32*** %12
%122 = load i32, i32* %10
%123 = sext i32 %122 to i64
%124 = getelementptr inbounds i32*, i32** %121, i64 %123
%125 = load i32*, i32** %124
%126 = load i32, i32* %11
%127 = sext i32 %126 to i64
%128 = getelementptr inbounds i32, i32* %125, i64 %127
%129 = load i32, i32* %128
%130 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.11, i64 0, i64 0), i32 %129)
br label %131
131: ; preds = %120
%132 = load i32, i32* %11
%133 = add nsw i32 %132, 1
store i32 %133, i32* %11
br label %117
134: ; preds = %117
%135 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.12, i64 0, i64 0))
br label %136
136: ; preds = %134
%137 = load i32, i32* %10
%138 = add nsw i32 %137, 1
store i32 %138, i32* %10
br label %108
139: ; preds = %108
%140 = load i32**, i32*** %12
%141 = call i32 @cntab2(i32** %140, i32 9, i32 12, float* %2, float* %3, float* %5, float* %6, float* %4, float* %9, float* %7, float* %8)
%142 = load float, float* %2
%143 = fpext float %142 to double
%144 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([43 x i8], [43 x i8]* @.str.13, i64 0, i64 0), double %143)
%145 = load float, float* %3
%146 = fpext float %145 to double
%147 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([42 x i8], [42 x i8]* @.str.14, i64 0, i64 0), double %146)
%148 = load float, float* %5
%149 = fpext float %148 to double
%150 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([42 x i8], [42 x i8]* @.str.15, i64 0, i64 0), double %149)
%151 = load float, float* %6
%152 = fpext float %151 to double
%153 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([42 x i8], [42 x i8]* @.str.16, i64 0, i64 0), double %152)
%154 = load float, float* %4
%155 = fpext float %154 to double
%156 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([42 x i8], [42 x i8]* @.str.17, i64 0, i64 0), double %155)
%157 = load float, float* %9
%158 = fpext float %157 to double
%159 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([42 x i8], [42 x i8]* @.str.18, i64 0, i64 0), double %158)
%160 = load float, float* %7
%161 = fpext float %160 to double
%162 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([42 x i8], [42 x i8]* @.str.19, i64 0, i64 0), double %161)
%163 = load float, float* %8
%164 = fpext float %163 to double
%165 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([42 x i8], [42 x i8]* @.str.20, i64 0, i64 0), double %164)
%166 = load i32**, i32*** %12
%167 = call i32 @free_imatrix(i32** %166, i32 1, i32 9, i32 1, i32 12)
ret i32 0
}

LLVM IR (-O2):
@.str = [11 x i8] c"table1.dat\00"
@.str.1 = [2 x i8] c"r\00"
@.str.2 = [32 x i8] c"Data file table1.dat not found\0A\00"
@.str.3 = [5 x i8] c"%16c\00"
@.str.4 = [4 x i8] c" %s\00"
@.str.5 = [17 x i8] c"%16[^0123456789]\00"
@.str.6 = [4 x i8] c"%d \00"
@.str.7 = [4 x i8] c"\0A%s\00"
@.str.8 = [4 x i8] c"%5s\00"
@.str.10 = [3 x i8] c"%s\00"
@.str.11 = [4 x i8] c"%5d\00"
@.str.13 = [43 x i8] c"\0A entropy of table %10.4f\0A\00"
@.str.14 = [42 x i8] c" entropy of x-distribution %10.4f\0A\00"
@.str.15 = [42 x i8] c" entropy of y-distribution %10.4f\0A\00"
@.str.16 = [42 x i8] c" entropy of y given x %10.4f\0A\00"
@.str.17 = [42 x i8] c" entropy of x given y %10.4f\0A\00"
@.str.18 = [42 x i8] c" dependency of y on x %10.4f\0A\00"
@.str.19 = [42 x i8] c" dependency of x on y %10.4f\0A\00"
@.str.20 = [42 x i8] c" symmetrical dependency %10.4f\0A\00"
@str = [2 x i8] c"\0A\00"
define i32 @main() {
%1 = alloca float
%2 = alloca float
%3 = alloca float
%4 = alloca float
%5 = alloca float
%6 = alloca float
%7 = alloca float
%8 = alloca float
%9 = alloca [80 x i8]
%10 = alloca [10 x [16 x i8]]
%11 = alloca [13 x [6 x i8]]
%12 = alloca [16 x i8]
%13 = bitcast float* %1 to i8*
%14 = bitcast float* %2 to i8*
%15 = bitcast float* %3 to i8*
%16 = bitcast float* %4 to i8*
%17 = bitcast float* %5 to i8*
%18 = bitcast float* %6 to i8*
%19 = bitcast float* %7 to i8*
%20 = bitcast float* %8 to i8*
%21 = getelementptr inbounds [80 x i8], [80 x i8]* %9, i64 0, i64 0
%22 = getelementptr inbounds [10 x [16 x i8]], [10 x [16 x i8]]* %10, i64 0, i64 0, i64 0
%23 = getelementptr inbounds [13 x [6 x i8]], [13 x [6 x i8]]* %11, i64 0, i64 0, i64 0
%24 = getelementptr inbounds [16 x i8], [16 x i8]* %12, i64 0, i64 0
%25 = tail call i32** @imatrix(i32 1, i32 9, i32 1, i32 12)
%26 = tail call i32* @fopen(i8* getelementptr inbounds ([11 x i8], [11 x i8]* @.str, i64 0, i64 0), i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.1, i64 0, i64 0))
%27 = icmp eq i32* %26, null
br i1 %27, label %28, label %30
28: ; preds = %0
%29 = tail call i32 @nrerror(i8* getelementptr inbounds ([32 x i8], [32 x i8]* @.str.2, i64 0, i64 0))
br label %30
30: ; preds = %28, %0
%31 = call i32 @fgets(i8* %21, i32 80, i32* %26)
%32 = call i32 @fgets(i8* %21, i32 80, i32* %26)
%33 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.3, i64 0, i64 0), i8* %24)
%34 = getelementptr inbounds [16 x i8], [16 x i8]* %12, i64 0, i64 15
store i8 0, i8* %34
%35 = getelementptr inbounds [13 x [6 x i8]], [13 x [6 x i8]]* %11, i64 0, i64 1, i64 0
%36 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.4, i64 0, i64 0), i8* %35)
%37 = getelementptr inbounds [13 x [6 x i8]], [13 x [6 x i8]]* %11, i64 0, i64 2, i64 0
%38 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.4, i64 0, i64 0), i8* %37)
%39 = getelementptr inbounds [13 x [6 x i8]], [13 x [6 x i8]]* %11, i64 0, i64 3, i64 0
%40 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.4, i64 0, i64 0), i8* %39)
%41 = getelementptr inbounds [13 x [6 x i8]], [13 x [6 x i8]]* %11, i64 0, i64 4, i64 0
%42 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.4, i64 0, i64 0), i8* %41)
%43 = getelementptr inbounds [13 x [6 x i8]], [13 x [6 x i8]]* %11, i64 0, i64 5, i64 0
%44 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.4, i64 0, i64 0), i8* %43)
%45 = getelementptr inbounds [13 x [6 x i8]], [13 x [6 x i8]]* %11, i64 0, i64 6, i64 0
%46 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.4, i64 0, i64 0), i8* %45)
%47 = getelementptr inbounds [13 x [6 x i8]], [13 x [6 x i8]]* %11, i64 0, i64 7, i64 0
%48 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.4, i64 0, i64 0), i8* %47)
%49 = getelementptr inbounds [13 x [6 x i8]], [13 x [6 x i8]]* %11, i64 0, i64 8, i64 0
%50 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.4, i64 0, i64 0), i8* %49)
%51 = getelementptr inbounds [13 x [6 x i8]], [13 x [6 x i8]]* %11, i64 0, i64 9, i64 0
%52 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.4, i64 0, i64 0), i8* %51)
%53 = getelementptr inbounds [13 x [6 x i8]], [13 x [6 x i8]]* %11, i64 0, i64 10, i64 0
%54 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.4, i64 0, i64 0), i8* %53)
%55 = getelementptr inbounds [13 x [6 x i8]], [13 x [6 x i8]]* %11, i64 0, i64 11, i64 0
%56 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.4, i64 0, i64 0), i8* %55)
%57 = getelementptr inbounds [13 x [6 x i8]], [13 x [6 x i8]]* %11, i64 0, i64 12, i64 0
%58 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.4, i64 0, i64 0), i8* %57)
%59 = call i32 @fgets(i8* %21, i32 80, i32* %26)
%60 = call i32 @fgets(i8* %21, i32 80, i32* %26)
br label %61
61: ; preds = %30, %61
%62 = phi i64 [ 1, %30 ], [ %103, %61 ]
%63 = getelementptr inbounds [10 x [16 x i8]], [10 x [16 x i8]]* %10, i64 0, i64 %62, i64 0
%64 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([17 x i8], [17 x i8]* @.str.5, i64 0, i64 0), i8* %63)
%65 = getelementptr inbounds [10 x [16 x i8]], [10 x [16 x i8]]* %10, i64 0, i64 %62, i64 15
store i8 0, i8* %65
%66 = getelementptr inbounds i32*, i32** %25, i64 %62
%67 = load i32*, i32** %66
%68 = getelementptr inbounds i32, i32* %67, i64 1
%69 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.6, i64 0, i64 0), i32* %68)
%70 = load i32*, i32** %66
%71 = getelementptr inbounds i32, i32* %70, i64 2
%72 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.6, i64 0, i64 0), i32* %71)
%73 = load i32*, i32** %66
%74 = getelementptr inbounds i32, i32* %73, i64 3
%75 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.6, i64 0, i64 0), i32* %74)
%76 = load i32*, i32** %66
%77 = getelementptr inbounds i32, i32* %76, i64 4
%78 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.6, i64 0, i64 0), i32* %77)
%79 = load i32*, i32** %66
%80 = getelementptr inbounds i32, i32* %79, i64 5
%81 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.6, i64 0, i64 0), i32* %80)
%82 = load i32*, i32** %66
%83 = getelementptr inbounds i32, i32* %82, i64 6
%84 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.6, i64 0, i64 0), i32* %83)
%85 = load i32*, i32** %66
%86 = getelementptr inbounds i32, i32* %85, i64 7
%87 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.6, i64 0, i64 0), i32* %86)
%88 = load i32*, i32** %66
%89 = getelementptr inbounds i32, i32* %88, i64 8
%90 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.6, i64 0, i64 0), i32* %89)
%91 = load i32*, i32** %66
%92 = getelementptr inbounds i32, i32* %91, i64 9
%93 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.6, i64 0, i64 0), i32* %92)
%94 = load i32*, i32** %66
%95 = getelementptr inbounds i32, i32* %94, i64 10
%96 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.6, i64 0, i64 0), i32* %95)
%97 = load i32*, i32** %66
%98 = getelementptr inbounds i32, i32* %97, i64 11
%99 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.6, i64 0, i64 0), i32* %98)
%100 = load i32*, i32** %66
%101 = getelementptr inbounds i32, i32* %100, i64 12
%102 = call i32 (i32*, i8*, ...) @fscanf(i32* %26, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.6, i64 0, i64 0), i32* %101)
%103 = add nuw nsw i64 %62, 1
%104 = icmp eq i64 %103, 10
br i1 %104, label %105, label %61
105: ; preds = %61
%106 = call i32 @fclose(i32* %26)
%107 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.7, i64 0, i64 0), i8* %24)
%108 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.8, i64 0, i64 0), i8* %35)
%109 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.8, i64 0, i64 0), i8* %37)
%110 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.8, i64 0, i64 0), i8* %39)
%111 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.8, i64 0, i64 0), i8* %41)
%112 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.8, i64 0, i64 0), i8* %43)
%113 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.8, i64 0, i64 0), i8* %45)
%114 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.8, i64 0, i64 0), i8* %47)
%115 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.8, i64 0, i64 0), i8* %49)
%116 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.8, i64 0, i64 0), i8* %51)
%117 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.8, i64 0, i64 0), i8* %53)
%118 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.8, i64 0, i64 0), i8* %55)
%119 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.8, i64 0, i64 0), i8* %57)
%120 = call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([2 x i8], [2 x i8]* @str, i64 0, i64 0))
br label %121
121: ; preds = %105, %121
%122 = phi i64 [ 1, %105 ], [ %175, %121 ]
%123 = getelementptr inbounds [10 x [16 x i8]], [10 x [16 x i8]]* %10, i64 0, i64 %122, i64 0
%124 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([3 x i8], [3 x i8]* @.str.10, i64 0, i64 0), i8* %123)
%125 = getelementptr inbounds i32*, i32** %25, i64 %122
%126 = load i32*, i32** %125
%127 = getelementptr inbounds i32, i32* %126, i64 1
%128 = load i32, i32* %127
%129 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.11, i64 0, i64 0), i32 %128)
%130 = load i32*, i32** %125
%131 = getelementptr inbounds i32, i32* %130, i64 2
%132 = load i32, i32* %131
%133 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.11, i64 0, i64 0), i32 %132)
%134 = load i32*, i32** %125
%135 = getelementptr inbounds i32, i32* %134, i64 3
%136 = load i32, i32* %135
%137 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.11, i64 0, i64 0), i32 %136)
%138 = load i32*, i32** %125
%139 = getelementptr inbounds i32, i32* %138, i64 4
%140 = load i32, i32* %139
%141 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.11, i64 0, i64 0), i32 %140)
%142 = load i32*, i32** %125
%143 = getelementptr inbounds i32, i32* %142, i64 5
%144 = load i32, i32* %143
%145 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.11, i64 0, i64 0), i32 %144)
%146 = load i32*, i32** %125
%147 = getelementptr inbounds i32, i32* %146, i64 6
%148 = load i32, i32* %147
%149 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.11, i64 0, i64 0), i32 %148)
%150 = load i32*, i32** %125
%151 = getelementptr inbounds i32, i32* %150, i64 7
%152 = load i32, i32* %151
%153 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.11, i64 0, i64 0), i32 %152)
%154 = load i32*, i32** %125
%155 = getelementptr inbounds i32, i32* %154, i64 8
%156 = load i32, i32* %155
%157 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.11, i64 0, i64 0), i32 %156)
%158 = load i32*, i32** %125
%159 = getelementptr inbounds i32, i32* %158, i64 9
%160 = load i32, i32* %159
%161 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.11, i64 0, i64 0), i32 %160)
%162 = load i32*, i32** %125
%163 = getelementptr inbounds i32, i32* %162, i64 10
%164 = load i32, i32* %163
%165 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.11, i64 0, i64 0), i32 %164)
%166 = load i32*, i32** %125
%167 = getelementptr inbounds i32, i32* %166, i64 11
%168 = load i32, i32* %167
%169 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.11, i64 0, i64 0), i32 %168)
%170 = load i32*, i32** %125
%171 = getelementptr inbounds i32, i32* %170, i64 12
%172 = load i32, i32* %171
%173 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.11, i64 0, i64 0), i32 %172)
%174 = call i32 @putchar(i32 10)
%175 = add nuw nsw i64 %122, 1
%176 = icmp eq i64 %175, 10
br i1 %176, label %177, label %121
177: ; preds = %121
%178 = call i32 @cntab2(i32** %25, i32 9, i32 12, float* %1, float* %2, float* %4, float* %5, float* %3, float* %8, float* %6, float* %7)
%179 = load float, float* %1
%180 = fpext float %179 to double
%181 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([43 x i8], [43 x i8]* @.str.13, i64 0, i64 0), double %180)
%182 = load float, float* %2
%183 = fpext float %182 to double
%184 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([42 x i8], [42 x i8]* @.str.14, i64 0, i64 0), double %183)
%185 = load float, float* %4
%186 = fpext float %185 to double
%187 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([42 x i8], [42 x i8]* @.str.15, i64 0, i64 0), double %186)
%188 = load float, float* %5
%189 = fpext float %188 to double
%190 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([42 x i8], [42 x i8]* @.str.16, i64 0, i64 0), double %189)
%191 = load float, float* %3
%192 = fpext float %191 to double
%193 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([42 x i8], [42 x i8]* @.str.17, i64 0, i64 0), double %192)
%194 = load float, float* %8
%195 = fpext float %194 to double
%196 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([42 x i8], [42 x i8]* @.str.18, i64 0, i64 0), double %195)
%197 = load float, float* %6
%198 = fpext float %197 to double
%199 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([42 x i8], [42 x i8]* @.str.19, i64 0, i64 0), double %198)
%200 = load float, float* %7
%201 = fpext float %200 to double
%202 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([42 x i8], [42 x i8]* @.str.20, i64 0, i64 0), double %201)
%203 = call i32 @free_imatrix(i32** %25, i32 1, i32 9, i32 1, i32 12)
ret i32 0
}