#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 */
float RAND_MAX;
int /*<<< orphan*/ fclose(int /*<<< orphan*/ *);
int /*<<< orphan*/ *fopen(char *, char *);
int /*<<< orphan*/ fprintf(int /*<<< orphan*/ *, char *, int, ...);
int /*<<< orphan*/ printf(char *);
scalar_t__ rand();
int /*<<< orphan*/ scanf(char *, ...);
int /*<<< orphan*/ srand(int);
int main() {
  int n, i, j, k;
  double M[700][700], b[700], x[700];
  FILE *fp;
  char filename[100];
  printf("\nn= ");
  scanf("%d", &n);
  printf("\nOutput file name= ");
  scanf("%s", filename);
  srand(853);
  for (i = 0; i < n; i++)
    for (j = 0; j < n; j++)
      M[i][j] = 10 * ((float)rand() / RAND_MAX - 0.5);
  for (i = 0; i < n; i++)
    x[i] = 1 + i % (n / 100);
  for (i = 0; i < n; i++) {
    b[i] = 0;
    for (j = 0; j < n; j++)
      b[i] += M[i][j] * x[j];
  }
  fp = fopen(filename, "wt");
  fprintf(fp, "%d", n);
  for (i = 0; i < n; i++)
    for (j = 0; j < n; j++)
      fprintf(fp, "\n%3d %3d % .20e", i, j, M[i][j]);
  for (i = 0; i < n; i++)
    fprintf(fp, "\n%3d % .20e", i, b[i]);
  fclose(fp);
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x3bfce0,%rsp
movl   $0x0,-0x4(%rbp)
lea    0xe87(%rip),%rdi
call   1040 <printf@plt>
lea    0xe80(%rip),%rdi
lea    -0x8(%rbp),%rsi
mov    $0x0,%al
call   1070 <scanf@plt>
lea    0xe71(%rip),%rdi
call   1040 <printf@plt>
lea    -0x3bfcd0(%rbp),%rsi
lea    0xe72(%rip),%rdi
mov    $0x0,%al
call   1070 <scanf@plt>
mov    $0x355,%edi
call   1050 <srand@plt>
movl   $0x0,-0xc(%rbp)
mov    -0xc(%rbp),%eax
cmp    -0x8(%rbp),%eax
jge    1263 <main+0xf3>
movl   $0x0,-0x10(%rbp)
mov    -0x10(%rbp),%eax
cmp    -0x8(%rbp),%eax
jge    1250 <main+0xe0>
mov    $0x0,%al
call   1090 <rand@plt>
cvtsi2ss %rax,%xmm0
mov    0x2de4(%rip),%rax
divss  (%rax),%xmm0
cvtss2sd %xmm0,%xmm1
movsd  0xdf4(%rip),%xmm0
subsd  %xmm0,%xmm1
movsd  0xde0(%rip),%xmm0
mulsd  %xmm1,%xmm0
movslq -0xc(%rbp),%rcx
lea    -0x3bd0a0(%rbp),%rax
imul   $0x15e0,%rcx,%rcx
add    %rcx,%rax
movslq -0x10(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x10(%rbp)
jmp    11e5 <main+0x75>
jmp    1255 <main+0xe5>
mov    -0xc(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0xc(%rbp)
jmp    11d2 <main+0x62>
movl   $0x0,-0xc(%rbp)
mov    -0xc(%rbp),%eax
cmp    -0x8(%rbp),%eax
jge    12b7 <main+0x147>
mov    -0xc(%rbp),%eax
mov    %eax,-0x3bfcd4(%rbp)
mov    -0x8(%rbp),%eax
mov    $0x64,%ecx
cltd
idiv   %ecx
mov    %eax,%ecx
mov    -0x3bfcd4(%rbp),%eax
cltd
idiv   %ecx
add    $0x1,%edx
cvtsi2sd %edx,%xmm0
movslq -0xc(%rbp),%rax
movsd  %xmm0,-0x3bfc60(%rbp,%rax,8)
c4 ff
mov    -0xc(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0xc(%rbp)
jmp    126a <main+0xfa>
movl   $0x0,-0xc(%rbp)
mov    -0xc(%rbp),%eax
cmp    -0x8(%rbp),%eax
jge    1357 <main+0x1e7>
movslq -0xc(%rbp),%rax
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x3be680(%rbp,%rax,8)
c4 ff
movl   $0x0,-0x10(%rbp)
mov    -0x10(%rbp),%eax
cmp    -0x8(%rbp),%eax
jge    1344 <main+0x1d4>
movslq -0xc(%rbp),%rcx
lea    -0x3bd0a0(%rbp),%rax
imul   $0x15e0,%rcx,%rcx
add    %rcx,%rax
movslq -0x10(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movslq -0x10(%rbp),%rax
movsd  -0x3bfc60(%rbp,%rax,8),%xmm2
c4 ff
movslq -0xc(%rbp),%rax
movsd  -0x3be680(%rbp,%rax,8),%xmm1
c4 ff
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x3be680(%rbp,%rax,8)
c4 ff
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x10(%rbp)
jmp    12e1 <main+0x171>
jmp    1349 <main+0x1d9>
mov    -0xc(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0xc(%rbp)
jmp    12be <main+0x14e>
lea    -0x3bfcd0(%rbp),%rdi
lea    0xcca(%rip),%rsi
call   1080 <fopen@plt>
mov    %rax,-0x3bfc68(%rbp)
mov    -0x3bfc68(%rbp),%rdi
mov    -0x8(%rbp),%edx
lea    0xc93(%rip),%rsi
mov    $0x0,%al
call   1060 <fprintf@plt>
movl   $0x0,-0xc(%rbp)
mov    -0xc(%rbp),%eax
cmp    -0x8(%rbp),%eax
jge    1409 <main+0x299>
movl   $0x0,-0x10(%rbp)
mov    -0x10(%rbp),%eax
cmp    -0x8(%rbp),%eax
jge    13f6 <main+0x286>
mov    -0x3bfc68(%rbp),%rdi
mov    -0xc(%rbp),%edx
mov    -0x10(%rbp),%ecx
movslq -0xc(%rbp),%rsi
lea    -0x3bd0a0(%rbp),%rax
imul   $0x15e0,%rsi,%rsi
add    %rsi,%rax
movslq -0x10(%rbp),%rsi
movsd  (%rax,%rsi,8),%xmm0
lea    0xc51(%rip),%rsi
mov    $0x1,%al
call   1060 <fprintf@plt>
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x10(%rbp)
jmp    13a3 <main+0x233>
jmp    13fb <main+0x28b>
mov    -0xc(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0xc(%rbp)
jmp    1390 <main+0x220>
movl   $0x0,-0xc(%rbp)
mov    -0xc(%rbp),%eax
cmp    -0x8(%rbp),%eax
jge    144f <main+0x2df>
mov    -0x3bfc68(%rbp),%rdi
mov    -0xc(%rbp),%edx
movslq -0xc(%rbp),%rax
movsd  -0x3be680(%rbp,%rax,8),%xmm0
c4 ff
lea    0xc08(%rip),%rsi
mov    $0x1,%al
call   1060 <fprintf@plt>
mov    -0xc(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0xc(%rbp)
jmp    1410 <main+0x2a0>
mov    -0x3bfc68(%rbp),%rdi
call   1030 <fclose@plt>
xor    %eax,%eax
add    $0x3bfce0,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x3bfcc0,%rsp
lea    0xe89(%rip),%rdi
call   1040 <printf@plt>
lea    0xe82(%rip),%rdi
lea    0xc(%rsp),%rsi
xor    %eax,%eax
call   1070 <scanf@plt>
lea    0xe72(%rip),%rdi
call   1040 <printf@plt>
lea    0xe7a(%rip),%rdi
lea    0x10(%rsp),%rsi
xor    %eax,%eax
call   1070 <scanf@plt>
mov    $0x355,%edi
call   1050 <srand@plt>
mov    0xc(%rsp),%esi
test   %esi,%esi
jle    13ec <main+0x27c>
lea    0x2c40(%rsp),%r14
mov    0x2e05(%rip),%r15
xor    %r12d,%r12d
jmp    1203 <main+0x93>
nopl   0x0(%rax,%rax,1)
movslq %esi,%rax
add    $0x1,%r12
add    $0x15e0,%r14
cmp    %rax,%r12
jge    1256 <main+0xe6>
test   %esi,%esi
jle    11f0 <main+0x80>
xor    %ebx,%ebx
nopl   0x0(%rax)
xor    %eax,%eax
call   1090 <rand@plt>
movsd  0xde1(%rip),%xmm1
xorps  %xmm0,%xmm0
cvtsi2ss %rax,%xmm0
divss  (%r15),%xmm0
cvtss2sd %xmm0,%xmm0
addsd  %xmm1,%xmm0
movsd  0xdcc(%rip),%xmm1
mulsd  %xmm1,%xmm0
movsd  %xmm0,(%r14,%rbx,8)
add    $0x1,%rbx
movslq 0xc(%rsp),%rsi
cmp    %rsi,%rbx
jl     1210 <main+0xa0>
jmp    11f0 <main+0x80>
test   %esi,%esi
jle    13ec <main+0x27c>
mov    %esi,%r9d
imul   $0x51eb851f,%r9,%rdi
shr    $0x25,%rdi
mov    %r9,%r8
add    $0xffffffffffffffff,%r8
je     14e1 <main+0x371>
mov    %r9d,%ebx
and    $0xfffffffe,%ebx
xor    %ecx,%ecx
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
mov    %ecx,%eax
cltd
idiv   %edi
add    $0x1,%edx
xorps  %xmm0,%xmm0
cvtsi2sd %edx,%xmm0
movsd  %xmm0,0x80(%rsp,%rcx,8)
lea    0x1(%rcx),%eax
cltd
idiv   %edi
add    $0x1,%edx
xorps  %xmm0,%xmm0
cvtsi2sd %edx,%xmm0
movsd  %xmm0,0x88(%rsp,%rcx,8)
add    $0x2,%rcx
cmp    %rbx,%rcx
jne    1290 <main+0x120>
test   $0x1,%r9b
je     12e8 <main+0x178>
mov    %ecx,%eax
cltd
idiv   %edi
add    $0x1,%edx
xorps  %xmm0,%xmm0
cvtsi2sd %edx,%xmm0
movsd  %xmm0,0x80(%rsp,%rcx,8)
test   %esi,%esi
jle    13ec <main+0x27c>
mov    %r9d,%eax
and    $0x3,%eax
mov    %r9d,%ecx
and    $0xfffffffc,%ecx
lea    0x2c58(%rsp),%rdx
lea    0x2c40(%rsp),%r10
xor    %r11d,%r11d
jmp    1345 <main+0x1d5>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movsd  %xmm0,0x1660(%rsp,%r11,8)
add    $0x1,%r11
add    $0x15e0,%rdx
add    $0x15e0,%r10
cmp    %r9,%r11
je     13ec <main+0x27c>
xorpd  %xmm0,%xmm0
xor    %esi,%esi
cmp    $0x3,%r8
jb     13b4 <main+0x244>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movsd  -0x18(%rdx,%rsi,8),%xmm1
movsd  -0x10(%rdx,%rsi,8),%xmm2
mulsd  0x80(%rsp,%rsi,8),%xmm1
mulsd  0x88(%rsp,%rsi,8),%xmm2
addsd  %xmm0,%xmm1
movsd  -0x8(%rdx,%rsi,8),%xmm3
mulsd  0x90(%rsp,%rsi,8),%xmm3
addsd  %xmm1,%xmm2
movsd  (%rdx,%rsi,8),%xmm0
mulsd  0x98(%rsp,%rsi,8),%xmm0
addsd  %xmm2,%xmm3
addsd  %xmm3,%xmm0
add    $0x4,%rsi
cmp    %rsi,%rcx
jne    1360 <main+0x1f0>
test   %rax,%rax
je     1320 <main+0x1b0>
lea    (%rsp,%rsi,8),%rbx
add    $0x80,%rbx
lea    (%r10,%rsi,8),%rsi
xor    %edi,%edi
xchg   %ax,%ax
movsd  (%rsi,%rdi,8),%xmm1
mulsd  (%rbx,%rdi,8),%xmm1
addsd  %xmm1,%xmm0
add    $0x1,%rdi
cmp    %rdi,%rax
jne    13d0 <main+0x260>
jmp    1320 <main+0x1b0>
lea    0xc3c(%rip),%rsi
lea    0x10(%rsp),%rdi
call   1080 <fopen@plt>
mov    %rax,%r14
mov    0xc(%rsp),%edx
lea    0xc0a(%rip),%rsi
mov    %rax,%rdi
xor    %eax,%eax
call   1060 <fprintf@plt>
mov    0xc(%rsp),%eax
test   %eax,%eax
jle    14c6 <main+0x356>
lea    0x2c40(%rsp),%r13
xor    %r12d,%r12d
lea    0xbff(%rip),%r15
jmp    1453 <main+0x2e3>
cs nopw 0x0(%rax,%rax,1)
nop
movslq %eax,%rcx
add    $0x1,%r12
add    $0x15e0,%r13
cmp    %rcx,%r12
jge    1489 <main+0x319>
test   %eax,%eax
jle    1440 <main+0x2d0>
xor    %ebx,%ebx
nopl   0x0(%rax)
movsd  0x0(%r13,%rbx,8),%xmm0
mov    %r14,%rdi
mov    %r15,%rsi
mov    %r12d,%edx
mov    %ebx,%ecx
mov    $0x1,%al
call   1060 <fprintf@plt>
add    $0x1,%rbx
movslq 0xc(%rsp),%rax
cmp    %rax,%rbx
jl     1460 <main+0x2f0>
jmp    1440 <main+0x2d0>
test   %eax,%eax
jle    14c6 <main+0x356>
xor    %ebx,%ebx
lea    0xbac(%rip),%r15
cs nopw 0x0(%rax,%rax,1)
movsd  0x1660(%rsp,%rbx,8),%xmm0
mov    %r14,%rdi
mov    %r15,%rsi
mov    %ebx,%edx
mov    $0x1,%al
call   1060 <fprintf@plt>
add    $0x1,%rbx
movslq 0xc(%rsp),%rax
cmp    %rax,%rbx
jl     14a0 <main+0x330>
mov    %r14,%rdi
call   1030 <fclose@plt>
xor    %eax,%eax
add    $0x3bfcc0,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
ret
xor    %ecx,%ecx
test   $0x1,%r9b
jne    12d0 <main+0x160>
jmp    12e8 <main+0x178>

LLVM IR (-O0):
@.str = [5 x i8] c"\0An= \00"
@.str.1 = [3 x i8] c"%d\00"
@.str.2 = [20 x i8] c"\0AOutput file name= \00"
@.str.3 = [3 x i8] c"%s\00"
@RAND_MAX = global float 0.000000e+00
@.str.4 = [3 x i8] c"wt\00"
@.str.5 = [16 x i8] c"\0A%3d %3d % .20e\00"
@.str.6 = [12 x i8] c"\0A%3d % .20e\00"
define i32 @main() {
%1 = alloca i32
%2 = alloca i32
%3 = alloca i32
%4 = alloca i32
%5 = alloca i32
%6 = alloca [700 x [700 x double]]
%7 = alloca [700 x double]
%8 = alloca [700 x double]
%9 = alloca i32*
%10 = alloca [100 x i8]
store i32 0, i32* %1
%11 = call i32 @printf(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str, i64 0, i64 0))
%12 = call i32 (i8*, ...) @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0), i32* %2)
%13 = call i32 @printf(i8* getelementptr inbounds ([20 x i8], [20 x i8]* @.str.2, i64 0, i64 0))
%14 = getelementptr inbounds [100 x i8], [100 x i8]* %10, i64 0, i64 0
%15 = call i32 (i8*, ...) @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.3, i64 0, i64 0), i8* %14)
%16 = call i32 @srand(i32 853)
store i32 0, i32* %3
br label %17
17: ; preds = %44, %0
%18 = load i32, i32* %3
%19 = load i32, i32* %2
%20 = icmp slt i32 %18, %19
br i1 %20, label %21, label %47
21: ; preds = %17
store i32 0, i32* %4
br label %22
22: ; preds = %40, %21
%23 = load i32, i32* %4
%24 = load i32, i32* %2
%25 = icmp slt i32 %23, %24
br i1 %25, label %26, label %43
26: ; preds = %22
%27 = call i64 (...) @rand()
%28 = sitofp i64 %27 to float
%29 = load float, float* @RAND_MAX
%30 = fdiv float %28, %29
%31 = fpext float %30 to double
%32 = fsub double %31, 5.000000e-01
%33 = fmul double 1.000000e+01, %32
%34 = load i32, i32* %3
%35 = sext i32 %34 to i64
%36 = getelementptr inbounds [700 x [700 x double]], [700 x [700 x double]]* %6, i64 0, i64 %35
%37 = load i32, i32* %4
%38 = sext i32 %37 to i64
%39 = getelementptr inbounds [700 x double], [700 x double]* %36, i64 0, i64 %38
store double %33, double* %39
br label %40
40: ; preds = %26
%41 = load i32, i32* %4
%42 = add nsw i32 %41, 1
store i32 %42, i32* %4
br label %22
43: ; preds = %22
br label %44
44: ; preds = %43
%45 = load i32, i32* %3
%46 = add nsw i32 %45, 1
store i32 %46, i32* %3
br label %17
47: ; preds = %17
store i32 0, i32* %3
br label %48
48: ; preds = %62, %47
%49 = load i32, i32* %3
%50 = load i32, i32* %2
%51 = icmp slt i32 %49, %50
br i1 %51, label %52, label %65
52: ; preds = %48
%53 = load i32, i32* %3
%54 = load i32, i32* %2
%55 = sdiv i32 %54, 100
%56 = srem i32 %53, %55
%57 = add nsw i32 1, %56
%58 = sitofp i32 %57 to double
%59 = load i32, i32* %3
%60 = sext i32 %59 to i64
%61 = getelementptr inbounds [700 x double], [700 x double]* %8, i64 0, i64 %60
store double %58, double* %61
br label %62
62: ; preds = %52
%63 = load i32, i32* %3
%64 = add nsw i32 %63, 1
store i32 %64, i32* %3
br label %48
65: ; preds = %48
store i32 0, i32* %3
br label %66
66: ; preds = %99, %65
%67 = load i32, i32* %3
%68 = load i32, i32* %2
%69 = icmp slt i32 %67, %68
br i1 %69, label %70, label %102
70: ; preds = %66
%71 = load i32, i32* %3
%72 = sext i32 %71 to i64
%73 = getelementptr inbounds [700 x double], [700 x double]* %7, i64 0, i64 %72
store double 0.000000e+00, double* %73
store i32 0, i32* %4
br label %74
74: ; preds = %95, %70
%75 = load i32, i32* %4
%76 = load i32, i32* %2
%77 = icmp slt i32 %75, %76
br i1 %77, label %78, label %98
78: ; preds = %74
%79 = load i32, i32* %3
%80 = sext i32 %79 to i64
%81 = getelementptr inbounds [700 x [700 x double]], [700 x [700 x double]]* %6, i64 0, i64 %80
%82 = load i32, i32* %4
%83 = sext i32 %82 to i64
%84 = getelementptr inbounds [700 x double], [700 x double]* %81, i64 0, i64 %83
%85 = load double, double* %84
%86 = load i32, i32* %4
%87 = sext i32 %86 to i64
%88 = getelementptr inbounds [700 x double], [700 x double]* %8, i64 0, i64 %87
%89 = load double, double* %88
%90 = load i32, i32* %3
%91 = sext i32 %90 to i64
%92 = getelementptr inbounds [700 x double], [700 x double]* %7, i64 0, i64 %91
%93 = load double, double* %92
%94 = call double @llvm.fmuladd.f64(double %85, double %89, double %93)
store double %94, double* %92
br label %95
95: ; preds = %78
%96 = load i32, i32* %4
%97 = add nsw i32 %96, 1
store i32 %97, i32* %4
br label %74
98: ; preds = %74
br label %99
99: ; preds = %98
%100 = load i32, i32* %3
%101 = add nsw i32 %100, 1
store i32 %101, i32* %3
br label %66
102: ; preds = %66
%103 = getelementptr inbounds [100 x i8], [100 x i8]* %10, i64 0, i64 0
%104 = call i32* @fopen(i8* %103, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.4, i64 0, i64 0))
store i32* %104, i32** %9
%105 = load i32*, i32** %9
%106 = load i32, i32* %2
%107 = call i32 (i32*, i8*, i32, ...) @fprintf(i32* %105, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0), i32 %106)
store i32 0, i32* %3
br label %108
108: ; preds = %133, %102
%109 = load i32, i32* %3
%110 = load i32, i32* %2
%111 = icmp slt i32 %109, %110
br i1 %111, label %112, label %136
112: ; preds = %108
store i32 0, i32* %4
br label %113
113: ; preds = %129, %112
%114 = load i32, i32* %4
%115 = load i32, i32* %2
%116 = icmp slt i32 %114, %115
br i1 %116, label %117, label %132
117: ; preds = %113
%118 = load i32*, i32** %9
%119 = load i32, i32* %3
%120 = load i32, i32* %4
%121 = load i32, i32* %3
%122 = sext i32 %121 to i64
%123 = getelementptr inbounds [700 x [700 x double]], [700 x [700 x double]]* %6, i64 0, i64 %122
%124 = load i32, i32* %4
%125 = sext i32 %124 to i64
%126 = getelementptr inbounds [700 x double], [700 x double]* %123, i64 0, i64 %125
%127 = load double, double* %126
%128 = call i32 (i32*, i8*, i32, ...) @fprintf(i32* %118, i8* getelementptr inbounds ([16 x i8], [16 x i8]* @.str.5, i64 0, i64 0), i32 %119, i32 %120, double %127)
br label %129
129: ; preds = %117
%130 = load i32, i32* %4
%131 = add nsw i32 %130, 1
store i32 %131, i32* %4
br label %113
132: ; preds = %113
br label %133
133: ; preds = %132
%134 = load i32, i32* %3
%135 = add nsw i32 %134, 1
store i32 %135, i32* %3
br label %108
136: ; preds = %108
store i32 0, i32* %3
br label %137
137: ; preds = %149, %136
%138 = load i32, i32* %3
%139 = load i32, i32* %2
%140 = icmp slt i32 %138, %139
br i1 %140, label %141, label %152
141: ; preds = %137
%142 = load i32*, i32** %9
%143 = load i32, i32* %3
%144 = load i32, i32* %3
%145 = sext i32 %144 to i64
%146 = getelementptr inbounds [700 x double], [700 x double]* %7, i64 0, i64 %145
%147 = load double, double* %146
%148 = call i32 (i32*, i8*, i32, ...) @fprintf(i32* %142, i8* getelementptr inbounds ([12 x i8], [12 x i8]* @.str.6, i64 0, i64 0), i32 %143, double %147)
br label %149
149: ; preds = %141
%150 = load i32, i32* %3
%151 = add nsw i32 %150, 1
store i32 %151, i32* %3
br label %137
152: ; preds = %137
%153 = load i32*, i32** %9
%154 = call i32 @fclose(i32* %153)
ret i32 0
}

LLVM IR (-O2):
@.str = [5 x i8] c"\0An= \00"
@.str.1 = [3 x i8] c"%d\00"
@.str.2 = [20 x i8] c"\0AOutput file name= \00"
@.str.3 = [3 x i8] c"%s\00"
@RAND_MAX = global float 0.000000e+00
@.str.4 = [3 x i8] c"wt\00"
@.str.5 = [16 x i8] c"\0A%3d %3d % .20e\00"
@.str.6 = [12 x i8] c"\0A%3d % .20e\00"
define i32 @main() {
%1 = alloca i32
%2 = alloca [700 x [700 x double]]
%3 = alloca [700 x double]
%4 = alloca [700 x double]
%5 = alloca [100 x i8]
%6 = bitcast i32* %1 to i8*
%7 = bitcast [700 x [700 x double]]* %2 to i8*
%8 = bitcast [700 x double]* %3 to i8*
%9 = bitcast [700 x double]* %4 to i8*
%10 = getelementptr inbounds [100 x i8], [100 x i8]* %5, i64 0, i64 0
%11 = tail call i32 @printf(i8* dereferenceable(1) getelementptr inbounds ([5 x i8], [5 x i8]* @.str, i64 0, i64 0))
%12 = call i32 (i8*, ...) @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0), i32* %1)
%13 = call i32 @printf(i8* dereferenceable(1) getelementptr inbounds ([20 x i8], [20 x i8]* @.str.2, i64 0, i64 0))
%14 = call i32 (i8*, ...) @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.3, i64 0, i64 0), i8* %10)
%15 = call i32 @srand(i32 853)
%16 = load i32, i32* %1
%17 = icmp sgt i32 %16, 0
br i1 %17, label %18, label %137
18: ; preds = %0, %46
%19 = phi i32 [ %47, %46 ], [ %16, %0 ]
%20 = phi i64 [ %49, %46 ], [ 0, %0 ]
%21 = icmp sgt i32 %19, 0
br i1 %21, label %32, label %46
22: ; preds = %46
%23 = icmp sgt i32 %47, 0
br i1 %23, label %24, label %137
24: ; preds = %22
%25 = udiv i32 %47, 100
%26 = zext i32 %47 to i64
%27 = add nsw i64 %26, -1
%28 = and i64 %26, 1
%29 = icmp eq i64 %27, 0
br i1 %29, label %51, label %30
30: ; preds = %24
%31 = and i64 %26, 4294967294
br label %67
32: ; preds = %18, %32
%33 = phi i64 [ %42, %32 ], [ 0, %18 ]
%34 = call i64 (...) @rand()
%35 = sitofp i64 %34 to float
%36 = load float, float* @RAND_MAX
%37 = fdiv float %35, %36
%38 = fpext float %37 to double
%39 = fadd double %38, -5.000000e-01
%40 = fmul double %39, 1.000000e+01
%41 = getelementptr inbounds [700 x [700 x double]], [700 x [700 x double]]* %2, i64 0, i64 %20, i64 %33
store double %40, double* %41
%42 = add nuw nsw i64 %33, 1
%43 = load i32, i32* %1
%44 = sext i32 %43 to i64
%45 = icmp slt i64 %42, %44
br i1 %45, label %32, label %46
46: ; preds = %32, %18
%47 = phi i32 [ %19, %18 ], [ %43, %32 ]
%48 = sext i32 %47 to i64
%49 = add nuw nsw i64 %20, 1
%50 = icmp slt i64 %49, %48
br i1 %50, label %18, label %22
51: ; preds = %67, %24
%52 = phi i64 [ 0, %24 ], [ %81, %67 ]
%53 = icmp eq i64 %28, 0
br i1 %53, label %60, label %54
54: ; preds = %51
%55 = trunc i64 %52 to i32
%56 = srem i32 %55, %25
%57 = add nuw nsw i32 %56, 1
%58 = sitofp i32 %57 to double
%59 = getelementptr inbounds [700 x double], [700 x double]* %4, i64 0, i64 %52
store double %58, double* %59
br label %60
60: ; preds = %51, %54
br i1 %23, label %61, label %137
61: ; preds = %60
%62 = zext i32 %47 to i64
%63 = and i64 %26, 3
%64 = icmp ult i64 %27, 3
%65 = and i64 %26, 4294967292
%66 = icmp eq i64 %63, 0
br label %84
67: ; preds = %67, %30
%68 = phi i64 [ 0, %30 ], [ %81, %67 ]
%69 = phi i64 [ 0, %30 ], [ %82, %67 ]
%70 = trunc i64 %68 to i32
%71 = srem i32 %70, %25
%72 = add nuw nsw i32 %71, 1
%73 = sitofp i32 %72 to double
%74 = getelementptr inbounds [700 x double], [700 x double]* %4, i64 0, i64 %68
store double %73, double* %74
%75 = or i64 %68, 1
%76 = trunc i64 %75 to i32
%77 = srem i32 %76, %25
%78 = add nuw nsw i32 %77, 1
%79 = sitofp i32 %78 to double
%80 = getelementptr inbounds [700 x double], [700 x double]* %4, i64 0, i64 %75
store double %79, double* %80
%81 = add nuw nsw i64 %68, 2
%82 = add i64 %69, 2
%83 = icmp eq i64 %82, %31
br i1 %83, label %51, label %67
84: ; preds = %133, %61
%85 = phi i64 [ 0, %61 ], [ %135, %133 ]
%86 = getelementptr inbounds [700 x double], [700 x double]* %3, i64 0, i64 %85
br i1 %64, label %117, label %87
87: ; preds = %84, %87
%88 = phi i64 [ %114, %87 ], [ 0, %84 ]
%89 = phi double [ %113, %87 ], [ 0.000000e+00, %84 ]
%90 = phi i64 [ %115, %87 ], [ 0, %84 ]
%91 = getelementptr inbounds [700 x [700 x double]], [700 x [700 x double]]* %2, i64 0, i64 %85, i64 %88
%92 = load double, double* %91
%93 = getelementptr inbounds [700 x double], [700 x double]* %4, i64 0, i64 %88
%94 = load double, double* %93
%95 = call double @llvm.fmuladd.f64(double %92, double %94, double %89)
%96 = or i64 %88, 1
%97 = getelementptr inbounds [700 x [700 x double]], [700 x [700 x double]]* %2, i64 0, i64 %85, i64 %96
%98 = load double, double* %97
%99 = getelementptr inbounds [700 x double], [700 x double]* %4, i64 0, i64 %96
%100 = load double, double* %99
%101 = call double @llvm.fmuladd.f64(double %98, double %100, double %95)
%102 = or i64 %88, 2
%103 = getelementptr inbounds [700 x [700 x double]], [700 x [700 x double]]* %2, i64 0, i64 %85, i64 %102
%104 = load double, double* %103
%105 = getelementptr inbounds [700 x double], [700 x double]* %4, i64 0, i64 %102
%106 = load double, double* %105
%107 = call double @llvm.fmuladd.f64(double %104, double %106, double %101)
%108 = or i64 %88, 3
%109 = getelementptr inbounds [700 x [700 x double]], [700 x [700 x double]]* %2, i64 0, i64 %85, i64 %108
%110 = load double, double* %109
%111 = getelementptr inbounds [700 x double], [700 x double]* %4, i64 0, i64 %108
%112 = load double, double* %111
%113 = call double @llvm.fmuladd.f64(double %110, double %112, double %107)
%114 = add nuw nsw i64 %88, 4
%115 = add i64 %90, 4
%116 = icmp eq i64 %115, %65
br i1 %116, label %117, label %87
117: ; preds = %87, %84
%118 = phi double [ undef, %84 ], [ %113, %87 ]
%119 = phi i64 [ 0, %84 ], [ %114, %87 ]
%120 = phi double [ 0.000000e+00, %84 ], [ %113, %87 ]
br i1 %66, label %133, label %121
121: ; preds = %117, %121
%122 = phi i64 [ %130, %121 ], [ %119, %117 ]
%123 = phi double [ %129, %121 ], [ %120, %117 ]
%124 = phi i64 [ %131, %121 ], [ 0, %117 ]
%125 = getelementptr inbounds [700 x [700 x double]], [700 x [700 x double]]* %2, i64 0, i64 %85, i64 %122
%126 = load double, double* %125
%127 = getelementptr inbounds [700 x double], [700 x double]* %4, i64 0, i64 %122
%128 = load double, double* %127
%129 = call double @llvm.fmuladd.f64(double %126, double %128, double %123)
%130 = add nuw nsw i64 %122, 1
%131 = add i64 %124, 1
%132 = icmp eq i64 %131, %63
br i1 %132, label %133, label %121
133: ; preds = %121, %117
%134 = phi double [ %118, %117 ], [ %129, %121 ]
store double %134, double* %86
%135 = add nuw nsw i64 %85, 1
%136 = icmp eq i64 %135, %62
br i1 %136, label %137, label %84
137: ; preds = %133, %22, %0, %60
%138 = call i32* @fopen(i8* %10, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.4, i64 0, i64 0))
%139 = load i32, i32* %1
%140 = call i32 (i32*, i8*, i32, ...) @fprintf(i32* %138, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0), i32 %139)
%141 = load i32, i32* %1
%142 = icmp sgt i32 %141, 0
br i1 %142, label %143, label %176
143: ; preds = %137, %161
%144 = phi i32 [ %162, %161 ], [ %141, %137 ]
%145 = phi i64 [ %164, %161 ], [ 0, %137 ]
%146 = icmp sgt i32 %144, 0
br i1 %146, label %147, label %161
147: ; preds = %143
%148 = trunc i64 %145 to i32
br label %151
149: ; preds = %161
%150 = icmp sgt i32 %162, 0
br i1 %150, label %166, label %176
151: ; preds = %147, %151
%152 = phi i64 [ 0, %147 ], [ %157, %151 ]
%153 = getelementptr inbounds [700 x [700 x double]], [700 x [700 x double]]* %2, i64 0, i64 %145, i64 %152
%154 = load double, double* %153
%155 = trunc i64 %152 to i32
%156 = call i32 (i32*, i8*, i32, ...) @fprintf(i32* %138, i8* getelementptr inbounds ([16 x i8], [16 x i8]* @.str.5, i64 0, i64 0), i32 %148, i32 %155, double %154)
%157 = add nuw nsw i64 %152, 1
%158 = load i32, i32* %1
%159 = sext i32 %158 to i64
%160 = icmp slt i64 %157, %159
br i1 %160, label %151, label %161
161: ; preds = %151, %143
%162 = phi i32 [ %144, %143 ], [ %158, %151 ]
%163 = sext i32 %162 to i64
%164 = add nuw nsw i64 %145, 1
%165 = icmp slt i64 %164, %163
br i1 %165, label %143, label %149
166: ; preds = %149, %166
%167 = phi i64 [ %172, %166 ], [ 0, %149 ]
%168 = getelementptr inbounds [700 x double], [700 x double]* %3, i64 0, i64 %167
%169 = load double, double* %168
%170 = trunc i64 %167 to i32
%171 = call i32 (i32*, i8*, i32, ...) @fprintf(i32* %138, i8* getelementptr inbounds ([12 x i8], [12 x i8]* @.str.6, i64 0, i64 0), i32 %170, double %169)
%172 = add nuw nsw i64 %167, 1
%173 = load i32, i32* %1
%174 = sext i32 %173 to i64
%175 = icmp slt i64 %172, %174
br i1 %175, label %166, label %176
176: ; preds = %166, %137, %149
%177 = call i32 @fclose(i32* %138)
ret i32 0
}