#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*/ exit(int);
int /*<<< orphan*/ fprintf(int /*<<< orphan*/ *, char *, ...);
int isqrt2(int);
int /*<<< orphan*/ printf(char *, char);
void write_lu_info(FILE *fp, int nprocs, char class) {
  int isiz1, isiz2, itmax, inorm, problem_size;
  int xdiv, ydiv;
  char *dt_default;
  if (class == 'S') {
    problem_size = 12;
    dt_default = "0.5d0";
    itmax = 50;
  } else if (class == 'W') {
    problem_size = 33;
    dt_default = "1.5d-3";
    itmax = 300;
  } else if (class == 'A') {
    problem_size = 64;
    dt_default = "2.0d0";
    itmax = 250;
  } else if (class == 'B') {
    problem_size = 102;
    dt_default = "2.0d0";
    itmax = 250;
  } else if (class == 'C') {
    problem_size = 162;
    dt_default = "2.0d0";
    itmax = 250;
  } else if (class == 'D') {
    problem_size = 408;
    dt_default = "1.0d0";
    itmax = 300;
  } else if (class == 'E') {
    problem_size = 1020;
    dt_default = "0.5d0";
    itmax = 300;
  } else {
    printf("setparams: Internal error: invalid class %c\n", class);
    exit(1);
  }
  inorm = itmax;
  xdiv = isqrt2(nprocs);
  ydiv = nprocs / xdiv;
  isiz1 = problem_size / xdiv;
  if (isiz1 * xdiv < problem_size)
    isiz1++;
  isiz2 = problem_size / ydiv;
  if (isiz2 * ydiv < problem_size)
    isiz2++;
  fprintf(fp, "\nc number of nodes for which this version is compiled\n");
  fprintf(fp, "%sinteger nnodes_compiled, nnodes_xdim\n", "        ");
  fprintf(fp, "%sparameter (nnodes_compiled=%d, nnodes_xdim=%d)\n", "        ",
          nprocs, xdiv);
  fprintf(fp, "\nc full problem size\n");
  fprintf(fp, "%sinteger isiz01, isiz02, isiz03\n", "        ");
  fprintf(fp, "%sparameter (isiz01=%d, isiz02=%d, isiz03=%d)\n", "        ",
          problem_size, problem_size, problem_size);
  fprintf(fp, "\nc sub-domain array size\n");
  fprintf(fp, "%sinteger isiz1, isiz2, isiz3\n", "        ");
  fprintf(fp, "%sparameter (isiz1=%d, isiz2=%d, isiz3=isiz03)\n", "        ",
          isiz1, isiz2);
  fprintf(fp, "\nc number of iterations and how often to print the norm\n");
  fprintf(fp, "%sinteger itmax_default, inorm_default\n", "        ");
  fprintf(fp, "%sparameter (itmax_default=%d, inorm_default=%d)\n", "        ",
          itmax, inorm);
  fprintf(fp, "%sdouble precision dt_default\n", "        ");
  fprintf(fp, "%sparameter (dt_default = %s)\n", "        ", dt_default);
}


x86 assembly (clang, -O0):
<write_lu_info>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %dl,%al
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %al,-0xd(%rbp)
movsbl -0xd(%rbp),%eax
cmp    $0x53,%eax
jne    117f <write_lu_info+0x3f>
movl   $0xc,-0x24(%rbp)
lea    0xe91(%rip),%rax
mov    %rax,-0x38(%rbp)
movl   $0x32,-0x1c(%rbp)
jmp    12b9 <write_lu_info+0x179>
movsbl -0xd(%rbp),%eax
cmp    $0x57,%eax
jne    11aa <write_lu_info+0x6a>
movl   $0x21,-0x24(%rbp)
lea    0xe6c(%rip),%rax
mov    %rax,-0x38(%rbp)
movl   $0x12c,-0x1c(%rbp)
jmp    12b4 <write_lu_info+0x174>
movsbl -0xd(%rbp),%eax
cmp    $0x41,%eax
jne    11d5 <write_lu_info+0x95>
movl   $0x40,-0x24(%rbp)
lea    0xe48(%rip),%rax
mov    %rax,-0x38(%rbp)
movl   $0xfa,-0x1c(%rbp)
jmp    12af <write_lu_info+0x16f>
movsbl -0xd(%rbp),%eax
cmp    $0x42,%eax
jne    1200 <write_lu_info+0xc0>
movl   $0x66,-0x24(%rbp)
lea    0xe1d(%rip),%rax
mov    %rax,-0x38(%rbp)
movl   $0xfa,-0x1c(%rbp)
jmp    12aa <write_lu_info+0x16a>
movsbl -0xd(%rbp),%eax
cmp    $0x43,%eax
jne    122b <write_lu_info+0xeb>
movl   $0xa2,-0x24(%rbp)
lea    0xdf2(%rip),%rax
mov    %rax,-0x38(%rbp)
movl   $0xfa,-0x1c(%rbp)
jmp    12a5 <write_lu_info+0x165>
movsbl -0xd(%rbp),%eax
cmp    $0x44,%eax
jne    1256 <write_lu_info+0x116>
movl   $0x198,-0x24(%rbp)
lea    0xdcd(%rip),%rax
mov    %rax,-0x38(%rbp)
movl   $0x12c,-0x1c(%rbp)
jmp    12a0 <write_lu_info+0x160>
movsbl -0xd(%rbp),%eax
cmp    $0x45,%eax
jne    1281 <write_lu_info+0x141>
movl   $0x3fc,-0x24(%rbp)
lea    0xd8f(%rip),%rax
mov    %rax,-0x38(%rbp)
movl   $0x12c,-0x1c(%rbp)
jmp    129b <write_lu_info+0x15b>
lea    0xd91(%rip),%rdi
movsbl -0xd(%rbp),%esi
call   1030 <printf@plt>
mov    $0x1,%edi
call   1060 <exit@plt>
jmp    12a0 <write_lu_info+0x160>
jmp    12a5 <write_lu_info+0x165>
jmp    12aa <write_lu_info+0x16a>
jmp    12af <write_lu_info+0x16f>
jmp    12b4 <write_lu_info+0x174>
jmp    12b9 <write_lu_info+0x179>
mov    -0x1c(%rbp),%eax
mov    %eax,-0x20(%rbp)
mov    -0xc(%rbp),%edi
call   1050 <isqrt2@plt>
mov    %eax,-0x28(%rbp)
mov    -0xc(%rbp),%eax
cltd
idivl  -0x28(%rbp)
mov    %eax,-0x2c(%rbp)
mov    -0x24(%rbp),%eax
cltd
idivl  -0x28(%rbp)
mov    %eax,-0x14(%rbp)
mov    -0x14(%rbp),%eax
imul   -0x28(%rbp),%eax
cmp    -0x24(%rbp),%eax
jge    12f7 <write_lu_info+0x1b7>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
mov    -0x24(%rbp),%eax
cltd
idivl  -0x2c(%rbp)
mov    %eax,-0x18(%rbp)
mov    -0x18(%rbp),%eax
imul   -0x2c(%rbp),%eax
cmp    -0x24(%rbp),%eax
jge    131a <write_lu_info+0x1da>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
mov    -0x8(%rbp),%rdi
lea    0xd21(%rip),%rsi
mov    $0x0,%al
call   1040 <fprintf@plt>
mov    -0x8(%rbp),%rdi
lea    0xd46(%rip),%rsi
lea    0xd67(%rip),%rdx
mov    $0x0,%al
call   1040 <fprintf@plt>
mov    -0x8(%rbp),%rdi
mov    -0xc(%rbp),%ecx
mov    -0x28(%rbp),%r8d
lea    0xd57(%rip),%rsi
lea    0xd47(%rip),%rdx
mov    $0x0,%al
call   1040 <fprintf@plt>
mov    -0x8(%rbp),%rdi
lea    0xd70(%rip),%rsi
mov    $0x0,%al
call   1040 <fprintf@plt>
mov    -0x8(%rbp),%rdi
lea    0xd74(%rip),%rsi
lea    0xd1c(%rip),%rdx
mov    $0x0,%al
call   1040 <fprintf@plt>
mov    -0x8(%rbp),%rdi
mov    -0x24(%rbp),%ecx
mov    -0x24(%rbp),%r8d
mov    -0x24(%rbp),%r9d
lea    0xd72(%rip),%rsi
lea    0xcf8(%rip),%rdx
mov    $0x0,%al
call   1040 <fprintf@plt>
mov    -0x8(%rbp),%rdi
lea    0xd88(%rip),%rsi
mov    $0x0,%al
call   1040 <fprintf@plt>
mov    -0x8(%rbp),%rdi
lea    0xd90(%rip),%rsi
lea    0xccd(%rip),%rdx
mov    $0x0,%al
call   1040 <fprintf@plt>
mov    -0x8(%rbp),%rdi
mov    -0x14(%rbp),%ecx
mov    -0x18(%rbp),%r8d
lea    0xd8f(%rip),%rsi
lea    0xcad(%rip),%rdx
mov    $0x0,%al
call   1040 <fprintf@plt>
mov    -0x8(%rbp),%rdi
lea    0xda6(%rip),%rsi
mov    $0x0,%al
call   1040 <fprintf@plt>
mov    -0x8(%rbp),%rdi
lea    0xdcd(%rip),%rsi
lea    0xc82(%rip),%rdx
mov    $0x0,%al
call   1040 <fprintf@plt>
mov    -0x8(%rbp),%rdi
mov    -0x1c(%rbp),%ecx
mov    -0x20(%rbp),%r8d
lea    0xdd5(%rip),%rsi
lea    0xc62(%rip),%rdx
mov    $0x0,%al
call   1040 <fprintf@plt>
mov    -0x8(%rbp),%rdi
lea    0xdee(%rip),%rsi
lea    0xc49(%rip),%rdx
mov    $0x0,%al
call   1040 <fprintf@plt>
mov    -0x8(%rbp),%rdi
mov    -0x38(%rbp),%rcx
lea    0xdf0(%rip),%rsi
lea    0xc2c(%rip),%rdx
mov    $0x0,%al
call   1040 <fprintf@plt>
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<write_lu_info>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x18,%rsp
lea    -0x41(%rdx),%eax
cmp    $0x16,%al
ja     13ac <write_lu_info+0x25c>
mov    %rdi,%rbx
lea    0xee9(%rip),%r8
mov    $0xc,%r13d
mov    $0x32,%edi
movzbl %al,%eax
lea    0xe78(%rip),%rcx
movslq (%rcx,%rax,4),%rax
add    %rcx,%rax
jmp    *%rax
lea    0xed1(%rip),%r8
mov    $0x40,%r13d
mov    $0xfa,%edi
jmp    11f6 <write_lu_info+0xa6>
lea    0xebd(%rip),%r8
mov    $0x66,%r13d
mov    $0xfa,%edi
jmp    11f6 <write_lu_info+0xa6>
lea    0xea9(%rip),%r8
mov    $0xa2,%r13d
mov    $0xfa,%edi
jmp    11f6 <write_lu_info+0xa6>
lea    0xe9b(%rip),%r8
mov    $0x198,%r13d
jmp    11f1 <write_lu_info+0xa1>
mov    $0x3fc,%r13d
jmp    11f1 <write_lu_info+0xa1>
lea    0xe77(%rip),%r8
mov    $0x21,%r13d
mov    $0x12c,%edi
mov    %edi,0xc(%rsp)
mov    %r8,0x10(%rsp)
mov    %esi,%edi
mov    %esi,%ebp
mov    %esi,0x8(%rsp)
call   1050 <isqrt2@plt>
mov    %eax,%r12d
mov    %ebp,%eax
cltd
idiv   %r12d
mov    %eax,%ecx
mov    %r13d,%eax
xor    %edx,%edx
idiv   %r12d
mov    %eax,%edx
imul   %r12d,%edx
xor    %r14d,%r14d
cmp    %r13d,%edx
setl   %r14b
add    %eax,%r14d
mov    %r13d,%eax
xor    %edx,%edx
idiv   %ecx
imul   %eax,%ecx
xor    %r15d,%r15d
cmp    %r13d,%ecx
setl   %r15b
add    %eax,%r15d
lea    0xe52(%rip),%rdi
mov    $0x36,%esi
mov    $0x1,%edx
mov    %rbx,%rcx
call   1070 <fwrite@plt>
lea    0xe70(%rip),%rsi
lea    0xe91(%rip),%rbp
mov    %rbx,%rdi
mov    %rbp,%rdx
xor    %eax,%eax
call   1040 <fprintf@plt>
lea    0xe86(%rip),%rsi
mov    %rbx,%rdi
mov    %rbp,%rdx
mov    0x8(%rsp),%ecx
mov    %r12d,%r8d
xor    %eax,%eax
call   1040 <fprintf@plt>
lea    0xe9d(%rip),%rdi
mov    $0x15,%esi
mov    $0x1,%edx
mov    %rbx,%rcx
call   1070 <fwrite@plt>
lea    0xe9a(%rip),%rsi
mov    %rbx,%rdi
mov    %rbp,%rdx
xor    %eax,%eax
call   1040 <fprintf@plt>
lea    0xea8(%rip),%rsi
mov    %rbx,%rdi
mov    %rbp,%rdx
mov    %r13d,%ecx
mov    %r13d,%r8d
mov    %r13d,%r9d
xor    %eax,%eax
call   1040 <fprintf@plt>
lea    0xeba(%rip),%rdi
mov    $0x19,%esi
mov    $0x1,%edx
mov    %rbx,%rcx
call   1070 <fwrite@plt>
lea    0xebb(%rip),%rsi
mov    %rbx,%rdi
mov    %rbp,%rdx
xor    %eax,%eax
call   1040 <fprintf@plt>
lea    0xec6(%rip),%rsi
mov    %rbx,%rdi
mov    %rbp,%rdx
mov    %r14d,%ecx
mov    %r15d,%r8d
xor    %eax,%eax
call   1040 <fprintf@plt>
lea    0xedc(%rip),%rdi
mov    $0x38,%esi
mov    $0x1,%edx
mov    %rbx,%rcx
call   1070 <fwrite@plt>
lea    0xefc(%rip),%rsi
mov    %rbx,%rdi
mov    %rbp,%rdx
xor    %eax,%eax
call   1040 <fprintf@plt>
lea    0xf10(%rip),%rsi
mov    %rbx,%rdi
mov    %rbp,%rdx
mov    0xc(%rsp),%ecx
mov    %ecx,%r8d
xor    %eax,%eax
call   1040 <fprintf@plt>
lea    0xf27(%rip),%rsi
mov    %rbx,%rdi
mov    %rbp,%rdx
xor    %eax,%eax
call   1040 <fprintf@plt>
lea    0xf32(%rip),%rsi
mov    %rbx,%rdi
mov    %rbp,%rdx
mov    0x10(%rsp),%rcx
xor    %eax,%eax
add    $0x18,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
jmp    1040 <fprintf@plt>
movsbl %dl,%esi
lea    0xcbf(%rip),%rdi
call   1030 <printf@plt>
mov    $0x1,%edi
call   1060 <exit@plt>

LLVM IR (-O0):
@.str = [6 x i8] c"0.5d0\00"
@.str.1 = [7 x i8] c"1.5d-3\00"
@.str.2 = [6 x i8] c"2.0d0\00"
@.str.3 = [6 x i8] c"1.0d0\00"
@.str.4 = [45 x i8] c"setparams: Internal error: invalid class %c\0A\00"
@.str.5 = [55 x i8] c"\0Ac number of nodes for which this version is compiled\0A\00"
@.str.6 = [40 x i8] c"%sinteger nnodes_compiled, nnodes_xdim\0A\00"
@.str.7 = [9 x i8] c" \00"
@.str.8 = [50 x i8] c"%sparameter (nnodes_compiled=%d, nnodes_xdim=%d)\0A\00"
@.str.9 = [22 x i8] c"\0Ac full problem size\0A\00"
@.str.10 = [34 x i8] c"%sinteger isiz01, isiz02, isiz03\0A\00"
@.str.11 = [47 x i8] c"%sparameter (isiz01=%d, isiz02=%d, isiz03=%d)\0A\00"
@.str.12 = [26 x i8] c"\0Ac sub-domain array size\0A\00"
@.str.13 = [31 x i8] c"%sinteger isiz1, isiz2, isiz3\0A\00"
@.str.14 = [48 x i8] c"%sparameter (isiz1=%d, isiz2=%d, isiz3=isiz03)\0A\00"
@.str.15 = [57 x i8] c"\0Ac number of iterations and how often to print the norm\0A\00"
@.str.16 = [40 x i8] c"%sinteger itmax_default, inorm_default\0A\00"
@.str.17 = [50 x i8] c"%sparameter (itmax_default=%d, inorm_default=%d)\0A\00"
@.str.18 = [31 x i8] c"%sdouble precision dt_default\0A\00"
@.str.19 = [31 x i8] c"%sparameter (dt_default = %s)\0A\00"
define void @write_lu_info(i32* %0, i32 %1, i8 signext %2) {
%4 = alloca i32*
%5 = alloca i32
%6 = alloca i8
%7 = alloca i32
%8 = alloca i32
%9 = alloca i32
%10 = alloca i32
%11 = alloca i32
%12 = alloca i32
%13 = alloca i32
%14 = alloca i8*
store i32* %0, i32** %4
store i32 %1, i32* %5
store i8 %2, i8* %6
%15 = load i8, i8* %6
%16 = sext i8 %15 to i32
%17 = icmp eq i32 %16, 83
br i1 %17, label %18, label %19
18: ; preds = %3
store i32 12, i32* %11
store i8* getelementptr inbounds ([6 x i8], [6 x i8]* @.str, i64 0, i64 0), i8** %14
store i32 50, i32* %9
br label %59
19: ; preds = %3
%20 = load i8, i8* %6
%21 = sext i8 %20 to i32
%22 = icmp eq i32 %21, 87
br i1 %22, label %23, label %24
23: ; preds = %19
store i32 33, i32* %11
store i8* getelementptr inbounds ([7 x i8], [7 x i8]* @.str.1, i64 0, i64 0), i8** %14
store i32 300, i32* %9
br label %58
24: ; preds = %19
%25 = load i8, i8* %6
%26 = sext i8 %25 to i32
%27 = icmp eq i32 %26, 65
br i1 %27, label %28, label %29
28: ; preds = %24
store i32 64, i32* %11
store i8* getelementptr inbounds ([6 x i8], [6 x i8]* @.str.2, i64 0, i64 0), i8** %14
store i32 250, i32* %9
br label %57
29: ; preds = %24
%30 = load i8, i8* %6
%31 = sext i8 %30 to i32
%32 = icmp eq i32 %31, 66
br i1 %32, label %33, label %34
33: ; preds = %29
store i32 102, i32* %11
store i8* getelementptr inbounds ([6 x i8], [6 x i8]* @.str.2, i64 0, i64 0), i8** %14
store i32 250, i32* %9
br label %56
34: ; preds = %29
%35 = load i8, i8* %6
%36 = sext i8 %35 to i32
%37 = icmp eq i32 %36, 67
br i1 %37, label %38, label %39
38: ; preds = %34
store i32 162, i32* %11
store i8* getelementptr inbounds ([6 x i8], [6 x i8]* @.str.2, i64 0, i64 0), i8** %14
store i32 250, i32* %9
br label %55
39: ; preds = %34
%40 = load i8, i8* %6
%41 = sext i8 %40 to i32
%42 = icmp eq i32 %41, 68
br i1 %42, label %43, label %44
43: ; preds = %39
store i32 408, i32* %11
store i8* getelementptr inbounds ([6 x i8], [6 x i8]* @.str.3, i64 0, i64 0), i8** %14
store i32 300, i32* %9
br label %54
44: ; preds = %39
%45 = load i8, i8* %6
%46 = sext i8 %45 to i32
%47 = icmp eq i32 %46, 69
br i1 %47, label %48, label %49
48: ; preds = %44
store i32 1020, i32* %11
store i8* getelementptr inbounds ([6 x i8], [6 x i8]* @.str, i64 0, i64 0), i8** %14
store i32 300, i32* %9
br label %53
49: ; preds = %44
%50 = load i8, i8* %6
%51 = call i32 @printf(i8* getelementptr inbounds ([45 x i8], [45 x i8]* @.str.4, i64 0, i64 0), i8 signext %50)
%52 = call i32 @exit(i32 1)
unreachable
53: ; preds = %48
br label %54
54: ; preds = %53, %43
br label %55
55: ; preds = %54, %38
br label %56
56: ; preds = %55, %33
br label %57
57: ; preds = %56, %28
br label %58
58: ; preds = %57, %23
br label %59
59: ; preds = %58, %18
%60 = load i32, i32* %9
store i32 %60, i32* %10
%61 = load i32, i32* %5
%62 = call i32 @isqrt2(i32 %61)
store i32 %62, i32* %12
%63 = load i32, i32* %5
%64 = load i32, i32* %12
%65 = sdiv i32 %63, %64
store i32 %65, i32* %13
%66 = load i32, i32* %11
%67 = load i32, i32* %12
%68 = sdiv i32 %66, %67
store i32 %68, i32* %7
%69 = load i32, i32* %7
%70 = load i32, i32* %12
%71 = mul nsw i32 %69, %70
%72 = load i32, i32* %11
%73 = icmp slt i32 %71, %72
br i1 %73, label %74, label %77
74: ; preds = %59
%75 = load i32, i32* %7
%76 = add nsw i32 %75, 1
store i32 %76, i32* %7
br label %77
77: ; preds = %74, %59
%78 = load i32, i32* %11
%79 = load i32, i32* %13
%80 = sdiv i32 %78, %79
store i32 %80, i32* %8
%81 = load i32, i32* %8
%82 = load i32, i32* %13
%83 = mul nsw i32 %81, %82
%84 = load i32, i32* %11
%85 = icmp slt i32 %83, %84
br i1 %85, label %86, label %89
86: ; preds = %77
%87 = load i32, i32* %8
%88 = add nsw i32 %87, 1
store i32 %88, i32* %8
br label %89
89: ; preds = %86, %77
%90 = load i32*, i32** %4
%91 = call i32 (i32*, i8*, ...) @fprintf(i32* %90, i8* getelementptr inbounds ([55 x i8], [55 x i8]* @.str.5, i64 0, i64 0))
%92 = load i32*, i32** %4
%93 = call i32 (i32*, i8*, ...) @fprintf(i32* %92, i8* getelementptr inbounds ([40 x i8], [40 x i8]* @.str.6, i64 0, i64 0), i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.7, i64 0, i64 0))
%94 = load i32*, i32** %4
%95 = load i32, i32* %5
%96 = load i32, i32* %12
%97 = call i32 (i32*, i8*, ...) @fprintf(i32* %94, i8* getelementptr inbounds ([50 x i8], [50 x i8]* @.str.8, i64 0, i64 0), i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.7, i64 0, i64 0), i32 %95, i32 %96)
%98 = load i32*, i32** %4
%99 = call i32 (i32*, i8*, ...) @fprintf(i32* %98, i8* getelementptr inbounds ([22 x i8], [22 x i8]* @.str.9, i64 0, i64 0))
%100 = load i32*, i32** %4
%101 = call i32 (i32*, i8*, ...) @fprintf(i32* %100, i8* getelementptr inbounds ([34 x i8], [34 x i8]* @.str.10, i64 0, i64 0), i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.7, i64 0, i64 0))
%102 = load i32*, i32** %4
%103 = load i32, i32* %11
%104 = load i32, i32* %11
%105 = load i32, i32* %11
%106 = call i32 (i32*, i8*, ...) @fprintf(i32* %102, i8* getelementptr inbounds ([47 x i8], [47 x i8]* @.str.11, i64 0, i64 0), i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.7, i64 0, i64 0), i32 %103, i32 %104, i32 %105)
%107 = load i32*, i32** %4
%108 = call i32 (i32*, i8*, ...) @fprintf(i32* %107, i8* getelementptr inbounds ([26 x i8], [26 x i8]* @.str.12, i64 0, i64 0))
%109 = load i32*, i32** %4
%110 = call i32 (i32*, i8*, ...) @fprintf(i32* %109, i8* getelementptr inbounds ([31 x i8], [31 x i8]* @.str.13, i64 0, i64 0), i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.7, i64 0, i64 0))
%111 = load i32*, i32** %4
%112 = load i32, i32* %7
%113 = load i32, i32* %8
%114 = call i32 (i32*, i8*, ...) @fprintf(i32* %111, i8* getelementptr inbounds ([48 x i8], [48 x i8]* @.str.14, i64 0, i64 0), i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.7, i64 0, i64 0), i32 %112, i32 %113)
%115 = load i32*, i32** %4
%116 = call i32 (i32*, i8*, ...) @fprintf(i32* %115, i8* getelementptr inbounds ([57 x i8], [57 x i8]* @.str.15, i64 0, i64 0))
%117 = load i32*, i32** %4
%118 = call i32 (i32*, i8*, ...) @fprintf(i32* %117, i8* getelementptr inbounds ([40 x i8], [40 x i8]* @.str.16, i64 0, i64 0), i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.7, i64 0, i64 0))
%119 = load i32*, i32** %4
%120 = load i32, i32* %9
%121 = load i32, i32* %10
%122 = call i32 (i32*, i8*, ...) @fprintf(i32* %119, i8* getelementptr inbounds ([50 x i8], [50 x i8]* @.str.17, i64 0, i64 0), i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.7, i64 0, i64 0), i32 %120, i32 %121)
%123 = load i32*, i32** %4
%124 = call i32 (i32*, i8*, ...) @fprintf(i32* %123, i8* getelementptr inbounds ([31 x i8], [31 x i8]* @.str.18, i64 0, i64 0), i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.7, i64 0, i64 0))
%125 = load i32*, i32** %4
%126 = load i8*, i8** %14
%127 = call i32 (i32*, i8*, ...) @fprintf(i32* %125, i8* getelementptr inbounds ([31 x i8], [31 x i8]* @.str.19, i64 0, i64 0), i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.7, i64 0, i64 0), i8* %126)
ret void
}

LLVM IR (-O2):
@.str = [6 x i8] c"0.5d0\00"
@.str.1 = [7 x i8] c"1.5d-3\00"
@.str.2 = [6 x i8] c"2.0d0\00"
@.str.3 = [6 x i8] c"1.0d0\00"
@.str.4 = [45 x i8] c"setparams: Internal error: invalid class %c\0A\00"
@.str.5 = [55 x i8] c"\0Ac number of nodes for which this version is compiled\0A\00"
@.str.6 = [40 x i8] c"%sinteger nnodes_compiled, nnodes_xdim\0A\00"
@.str.7 = [9 x i8] c" \00"
@.str.8 = [50 x i8] c"%sparameter (nnodes_compiled=%d, nnodes_xdim=%d)\0A\00"
@.str.9 = [22 x i8] c"\0Ac full problem size\0A\00"
@.str.10 = [34 x i8] c"%sinteger isiz01, isiz02, isiz03\0A\00"
@.str.11 = [47 x i8] c"%sparameter (isiz01=%d, isiz02=%d, isiz03=%d)\0A\00"
@.str.12 = [26 x i8] c"\0Ac sub-domain array size\0A\00"
@.str.13 = [31 x i8] c"%sinteger isiz1, isiz2, isiz3\0A\00"
@.str.14 = [48 x i8] c"%sparameter (isiz1=%d, isiz2=%d, isiz3=isiz03)\0A\00"
@.str.15 = [57 x i8] c"\0Ac number of iterations and how often to print the norm\0A\00"
@.str.16 = [40 x i8] c"%sinteger itmax_default, inorm_default\0A\00"
@.str.17 = [50 x i8] c"%sparameter (itmax_default=%d, inorm_default=%d)\0A\00"
@.str.18 = [31 x i8] c"%sdouble precision dt_default\0A\00"
@.str.19 = [31 x i8] c"%sparameter (dt_default = %s)\0A\00"
define void @write_lu_info(i32* nocapture %0, i32 %1, i8 signext %2) {
switch i8 %2, label %10 [
i8 83, label %13
i8 87, label %4
i8 65, label %5
i8 66, label %6
i8 67, label %7
i8 68, label %8
i8 69, label %9
]
4: ; preds = %3
br label %13
5: ; preds = %3
br label %13
6: ; preds = %3
br label %13
7: ; preds = %3
br label %13
8: ; preds = %3
br label %13
9: ; preds = %3
br label %13
10: ; preds = %3
%11 = tail call i32 @printf(i8* getelementptr inbounds ([45 x i8], [45 x i8]* @.str.4, i64 0, i64 0), i8 signext %2)
%12 = tail call i32 @exit(i32 1)
unreachable
13: ; preds = %3, %4, %6, %8, %9, %7, %5
%14 = phi i32 [ 300, %4 ], [ 250, %5 ], [ 250, %6 ], [ 250, %7 ], [ 300, %8 ], [ 300, %9 ], [ 50, %3 ]
%15 = phi i32 [ 33, %4 ], [ 64, %5 ], [ 102, %6 ], [ 162, %7 ], [ 408, %8 ], [ 1020, %9 ], [ 12, %3 ]
%16 = phi i8* [ getelementptr inbounds ([7 x i8], [7 x i8]* @.str.1, i64 0, i64 0), %4 ], [ getelementptr inbounds ([6 x i8], [6 x i8]* @.str.2, i64 0, i64 0), %5 ], [ getelementptr inbounds ([6 x i8], [6 x i8]* @.str.2, i64 0, i64 0), %6 ], [ getelementptr inbounds ([6 x i8], [6 x i8]* @.str.2, i64 0, i64 0), %7 ], [ getelementptr inbounds ([6 x i8], [6 x i8]* @.str.3, i64 0, i64 0), %8 ], [ getelementptr inbounds ([6 x i8], [6 x i8]* @.str, i64 0, i64 0), %9 ], [ getelementptr inbounds ([6 x i8], [6 x i8]* @.str, i64 0, i64 0), %3 ]
%17 = tail call i32 @isqrt2(i32 %1)
%18 = sdiv i32 %1, %17
%19 = sdiv i32 %15, %17
%20 = mul nsw i32 %19, %17
%21 = icmp slt i32 %20, %15
%22 = zext i1 %21 to i32
%23 = add nsw i32 %19, %22
%24 = sdiv i32 %15, %18
%25 = mul nsw i32 %24, %18
%26 = icmp slt i32 %25, %15
%27 = zext i1 %26 to i32
%28 = add nsw i32 %24, %27
%29 = tail call i64 @fwrite(i8* getelementptr inbounds ([55 x i8], [55 x i8]* @.str.5, i64 0, i64 0), i64 54, i64 1, i32* %0)
%30 = tail call i32 (i32*, i8*, ...) @fprintf(i32* %0, i8* getelementptr inbounds ([40 x i8], [40 x i8]* @.str.6, i64 0, i64 0), i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.7, i64 0, i64 0))
%31 = tail call i32 (i32*, i8*, ...) @fprintf(i32* %0, i8* getelementptr inbounds ([50 x i8], [50 x i8]* @.str.8, i64 0, i64 0), i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.7, i64 0, i64 0), i32 %1, i32 %17)
%32 = tail call i64 @fwrite(i8* getelementptr inbounds ([22 x i8], [22 x i8]* @.str.9, i64 0, i64 0), i64 21, i64 1, i32* %0)
%33 = tail call i32 (i32*, i8*, ...) @fprintf(i32* %0, i8* getelementptr inbounds ([34 x i8], [34 x i8]* @.str.10, i64 0, i64 0), i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.7, i64 0, i64 0))
%34 = tail call i32 (i32*, i8*, ...) @fprintf(i32* %0, i8* getelementptr inbounds ([47 x i8], [47 x i8]* @.str.11, i64 0, i64 0), i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.7, i64 0, i64 0), i32 %15, i32 %15, i32 %15)
%35 = tail call i64 @fwrite(i8* getelementptr inbounds ([26 x i8], [26 x i8]* @.str.12, i64 0, i64 0), i64 25, i64 1, i32* %0)
%36 = tail call i32 (i32*, i8*, ...) @fprintf(i32* %0, i8* getelementptr inbounds ([31 x i8], [31 x i8]* @.str.13, i64 0, i64 0), i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.7, i64 0, i64 0))
%37 = tail call i32 (i32*, i8*, ...) @fprintf(i32* %0, i8* getelementptr inbounds ([48 x i8], [48 x i8]* @.str.14, i64 0, i64 0), i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.7, i64 0, i64 0), i32 %23, i32 %28)
%38 = tail call i64 @fwrite(i8* getelementptr inbounds ([57 x i8], [57 x i8]* @.str.15, i64 0, i64 0), i64 56, i64 1, i32* %0)
%39 = tail call i32 (i32*, i8*, ...) @fprintf(i32* %0, i8* getelementptr inbounds ([40 x i8], [40 x i8]* @.str.16, i64 0, i64 0), i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.7, i64 0, i64 0))
%40 = tail call i32 (i32*, i8*, ...) @fprintf(i32* %0, i8* getelementptr inbounds ([50 x i8], [50 x i8]* @.str.17, i64 0, i64 0), i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.7, i64 0, i64 0), i32 %14, i32 %14)
%41 = tail call i32 (i32*, i8*, ...) @fprintf(i32* %0, i8* getelementptr inbounds ([31 x i8], [31 x i8]* @.str.18, i64 0, i64 0), i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.7, i64 0, i64 0))
%42 = tail call i32 (i32*, i8*, ...) @fprintf(i32* %0, i8* getelementptr inbounds ([31 x i8], [31 x i8]* @.str.19, i64 0, i64 0), i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.7, i64 0, i64 0), i8* %16)
ret void
}