void init_array(int n, double *alpha, double *beta,
                double A[1300 + 0][1300 + 0], double B[1300 + 0][1300 + 0],
                double x[1300 + 0]) {
  int i, j;
  *alpha = 1.5;
  *beta = 1.2;
  for (i = 0; i < n; i++) {
    x[i] = (double)(i % n) / n;
    for (j = 0; j < n; j++) {
      A[i][j] = (double)(i * j % n) / n;
      B[i][j] = (double)(i * j % n) / n;
    }
  }
}


x86 assembly (clang, -O0):
<init_array>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8,-0x28(%rbp)
mov    %r9,-0x30(%rbp)
mov    -0x10(%rbp),%rax
movsd  0xee1(%rip),%xmm0
movsd  %xmm0,(%rax)
mov    -0x18(%rbp),%rax
movsd  0xec9(%rip),%xmm0
movsd  %xmm0,(%rax)
movl   $0x0,-0x34(%rbp)
mov    -0x34(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    1209 <init_array+0x109>
mov    -0x34(%rbp),%eax
cltd
idivl  -0x4(%rbp)
cvtsi2sd %edx,%xmm0
cvtsi2sdl -0x4(%rbp),%xmm1
divsd  %xmm1,%xmm0
mov    -0x30(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movl   $0x0,-0x38(%rbp)
mov    -0x38(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    11f6 <init_array+0xf6>
mov    -0x34(%rbp),%eax
imul   -0x38(%rbp),%eax
cltd
idivl  -0x4(%rbp)
cvtsi2sd %edx,%xmm0
cvtsi2sdl -0x4(%rbp),%xmm1
divsd  %xmm1,%xmm0
mov    -0x20(%rbp),%rax
movslq -0x34(%rbp),%rcx
imul   $0x28a0,%rcx,%rcx
add    %rcx,%rax
movslq -0x38(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x34(%rbp),%eax
imul   -0x38(%rbp),%eax
cltd
idivl  -0x4(%rbp)
cvtsi2sd %edx,%xmm0
cvtsi2sdl -0x4(%rbp),%xmm1
divsd  %xmm1,%xmm0
mov    -0x28(%rbp),%rax
movslq -0x34(%rbp),%rcx
imul   $0x28a0,%rcx,%rcx
add    %rcx,%rax
movslq -0x38(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x38(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x38(%rbp)
jmp    1176 <init_array+0x76>
jmp    11fb <init_array+0xfb>
mov    -0x34(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
jmp    1142 <init_array+0x42>
pop    %rbp
ret

x86 assembly (clang, -O2):
<init_array>:
movabs $0x3ff8000000000000,%rax
mov    %rax,(%rsi)
movabs $0x3ff3333333333333,%rax
33 f3 3f
mov    %rax,(%rdx)
test   %edi,%edi
jle    118f <init_array+0x8f>
mov    %edi,%r10d
cvtsi2sd %edi,%xmm0
xor    %r11d,%r11d
nopl   0x0(%rax,%rax,1)
xorps  %xmm1,%xmm1
cvtsi2sd %r11d,%xmm1
divsd  %xmm0,%xmm1
movsd  %xmm1,(%r9,%r11,8)
xor    %esi,%esi
xor    %edi,%edi
cs nopw 0x0(%rax,%rax,1)
mov    %esi,%eax
cltd
idiv   %r10d
xorps  %xmm1,%xmm1
cvtsi2sd %edx,%xmm1
divsd  %xmm0,%xmm1
movsd  %xmm1,(%rcx,%rdi,8)
movsd  %xmm1,(%r8,%rdi,8)
add    $0x1,%rdi
add    %r11d,%esi
cmp    %rdi,%r10
jne    1150 <init_array+0x50>
add    $0x1,%r11
add    $0x28a0,%r8
add    $0x28a0,%rcx
cmp    %r10,%r11
jne    1130 <init_array+0x30>
ret

LLVM IR (-O0):
define void @init_array(i32 %0, double* %1, double* %2, [1300 x double]* %3, [1300 x double]* %4, double* %5) {
%7 = alloca i32
%8 = alloca double*
%9 = alloca double*
%10 = alloca [1300 x double]*
%11 = alloca [1300 x double]*
%12 = alloca double*
%13 = alloca i32
%14 = alloca i32
store i32 %0, i32* %7
store double* %1, double** %8
store double* %2, double** %9
store [1300 x double]* %3, [1300 x double]** %10
store [1300 x double]* %4, [1300 x double]** %11
store double* %5, double** %12
%15 = load double*, double** %8
store double 1.500000e+00, double* %15
%16 = load double*, double** %9
store double 1.200000e+00, double* %16
store i32 0, i32* %13
br label %17
17: ; preds = %74, %6
%18 = load i32, i32* %13
%19 = load i32, i32* %7
%20 = icmp slt i32 %18, %19
br i1 %20, label %21, label %77
21: ; preds = %17
%22 = load i32, i32* %13
%23 = load i32, i32* %7
%24 = srem i32 %22, %23
%25 = sitofp i32 %24 to double
%26 = load i32, i32* %7
%27 = sitofp i32 %26 to double
%28 = fdiv double %25, %27
%29 = load double*, double** %12
%30 = load i32, i32* %13
%31 = sext i32 %30 to i64
%32 = getelementptr inbounds double, double* %29, i64 %31
store double %28, double* %32
store i32 0, i32* %14
br label %33
33: ; preds = %70, %21
%34 = load i32, i32* %14
%35 = load i32, i32* %7
%36 = icmp slt i32 %34, %35
br i1 %36, label %37, label %73
37: ; preds = %33
%38 = load i32, i32* %13
%39 = load i32, i32* %14
%40 = mul nsw i32 %38, %39
%41 = load i32, i32* %7
%42 = srem i32 %40, %41
%43 = sitofp i32 %42 to double
%44 = load i32, i32* %7
%45 = sitofp i32 %44 to double
%46 = fdiv double %43, %45
%47 = load [1300 x double]*, [1300 x double]** %10
%48 = load i32, i32* %13
%49 = sext i32 %48 to i64
%50 = getelementptr inbounds [1300 x double], [1300 x double]* %47, i64 %49
%51 = load i32, i32* %14
%52 = sext i32 %51 to i64
%53 = getelementptr inbounds [1300 x double], [1300 x double]* %50, i64 0, i64 %52
store double %46, double* %53
%54 = load i32, i32* %13
%55 = load i32, i32* %14
%56 = mul nsw i32 %54, %55
%57 = load i32, i32* %7
%58 = srem i32 %56, %57
%59 = sitofp i32 %58 to double
%60 = load i32, i32* %7
%61 = sitofp i32 %60 to double
%62 = fdiv double %59, %61
%63 = load [1300 x double]*, [1300 x double]** %11
%64 = load i32, i32* %13
%65 = sext i32 %64 to i64
%66 = getelementptr inbounds [1300 x double], [1300 x double]* %63, i64 %65
%67 = load i32, i32* %14
%68 = sext i32 %67 to i64
%69 = getelementptr inbounds [1300 x double], [1300 x double]* %66, i64 0, i64 %68
store double %62, double* %69
br label %70
70: ; preds = %37
%71 = load i32, i32* %14
%72 = add nsw i32 %71, 1
store i32 %72, i32* %14
br label %33
73: ; preds = %33
br label %74
74: ; preds = %73
%75 = load i32, i32* %13
%76 = add nsw i32 %75, 1
store i32 %76, i32* %13
br label %17
77: ; preds = %17
ret void
}

LLVM IR (-O2):
define void @init_array(i32 %0, double* nocapture writeonly %1, double* nocapture writeonly %2, [1300 x double]* nocapture writeonly %3, [1300 x double]* nocapture writeonly %4, double* nocapture writeonly %5) {
store double 1.500000e+00, double* %1
store double 1.200000e+00, double* %2
%7 = icmp sgt i32 %0, 0
br i1 %7, label %8, label %31
8: ; preds = %6
%9 = sitofp i32 %0 to double
%10 = zext i32 %0 to i64
br label %11
11: ; preds = %28, %8
%12 = phi i64 [ 0, %8 ], [ %29, %28 ]
%13 = trunc i64 %12 to i32
%14 = sitofp i32 %13 to double
%15 = fdiv double %14, %9
%16 = getelementptr inbounds double, double* %5, i64 %12
store double %15, double* %16
br label %17
17: ; preds = %11, %17
%18 = phi i64 [ 0, %11 ], [ %26, %17 ]
%19 = trunc i64 %18 to i32
%20 = mul nsw i32 %19, %13
%21 = srem i32 %20, %0
%22 = sitofp i32 %21 to double
%23 = fdiv double %22, %9
%24 = getelementptr inbounds [1300 x double], [1300 x double]* %3, i64 %12, i64 %18
store double %23, double* %24
%25 = getelementptr inbounds [1300 x double], [1300 x double]* %4, i64 %12, i64 %18
store double %23, double* %25
%26 = add nuw nsw i64 %18, 1
%27 = icmp eq i64 %26, %10
br i1 %27, label %28, label %17
28: ; preds = %17
%29 = add nuw nsw i64 %12, 1
%30 = icmp eq i64 %29, %10
br i1 %30, label %31, label %11
31: ; preds = %28, %6
ret void
}