#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 */

/* Variables and functions */
int /*<<< orphan*/ printf(char *, ...);
scalar_t__ strlen(char *);
void print_matrix_tri(double *mat, int ndim, char major, char *premsg) {
  int iptx[ndim];
  int i, j;
  for (i = 0; i < ndim; i++) {
    iptx[i] = (i + 1) * i / 2;
  }
  if (strlen(premsg) != 0)
    printf("%s\n", premsg);
  for (i = 0; i < ndim; i++) {
    for (j = 0; j < ndim; j++) {
      switch (major) {
      case 'U':
        if (i <= j)
          printf("%12.3lf ", mat[i + iptx[j]]);
        else
          printf("%12.3lf ", 0.0);
        break;
      case 'L':
        if (i >= j)
          printf("%12.3lf ", mat[j + iptx[i]]);
        else
          printf("%12.3lf ", 0.0);
        break;
      }
    }
    printf("\n");
  }
}


x86 assembly (clang, -O0):
<print_matrix_tri>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %dl,%al
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %al,-0xd(%rbp)
mov    %rcx,-0x18(%rbp)
mov    -0xc(%rbp),%eax
mov    %rsp,%rcx
mov    %rcx,-0x20(%rbp)
lea    0xf(,%rax,4),%rdx
and    $0xfffffffffffffff0,%rdx
mov    %rsp,%rcx
sub    %rdx,%rcx
mov    %rcx,-0x38(%rbp)
mov    %rcx,%rsp
mov    %rax,-0x28(%rbp)
movl   $0x0,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    119f <print_matrix_tri+0x7f>
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
imul   -0x2c(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,%edx
mov    -0x38(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    1166 <print_matrix_tri+0x46>
mov    -0x18(%rbp),%rdi
call   1030 <strlen@plt>
cmp    $0x0,%rax
je     11c4 <print_matrix_tri+0xa4>
mov    -0x18(%rbp),%rsi
lea    0xe43(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
movl   $0x0,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    12dd <print_matrix_tri+0x1bd>
movl   $0x0,-0x30(%rbp)
mov    -0x30(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    12c1 <print_matrix_tri+0x1a1>
movsbl -0xd(%rbp),%eax
mov    %eax,-0x3c(%rbp)
sub    $0x4c,%eax
je     125f <print_matrix_tri+0x13f>
jmp    11ff <print_matrix_tri+0xdf>
mov    -0x3c(%rbp),%eax
sub    $0x55,%eax
jne    12ae <print_matrix_tri+0x18e>
jmp    1210 <print_matrix_tri+0xf0>
mov    -0x2c(%rbp),%eax
cmp    -0x30(%rbp),%eax
jg     1249 <print_matrix_tri+0x129>
mov    -0x38(%rbp),%rdx
mov    -0x8(%rbp),%rax
mov    -0x2c(%rbp),%ecx
movslq -0x30(%rbp),%rsi
add    (%rdx,%rsi,4),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
lea    0xdc7(%rip),%rdi
mov    $0x1,%al
call   1040 <printf@plt>
jmp    125a <print_matrix_tri+0x13a>
lea    0xdb4(%rip),%rdi
xorps  %xmm0,%xmm0
mov    $0x1,%al
call   1040 <printf@plt>
jmp    12ae <print_matrix_tri+0x18e>
mov    -0x2c(%rbp),%eax
cmp    -0x30(%rbp),%eax
jl     1298 <print_matrix_tri+0x178>
mov    -0x38(%rbp),%rdx
mov    -0x8(%rbp),%rax
mov    -0x30(%rbp),%ecx
movslq -0x2c(%rbp),%rsi
add    (%rdx,%rsi,4),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
lea    0xd78(%rip),%rdi
mov    $0x1,%al
call   1040 <printf@plt>
jmp    12a9 <print_matrix_tri+0x189>
lea    0xd65(%rip),%rdi
xorps  %xmm0,%xmm0
mov    $0x1,%al
call   1040 <printf@plt>
jmp    12ae <print_matrix_tri+0x18e>
jmp    12b3 <print_matrix_tri+0x193>
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
jmp    11de <print_matrix_tri+0xbe>
lea    0xd3a(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    11cb <print_matrix_tri+0xab>
mov    -0x20(%rbp),%rax
mov    %rax,%rsp
mov    %rbp,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<print_matrix_tri>:
push   %rbp
mov    %rsp,%rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x18,%rsp
mov    %edx,%r14d
mov    %esi,%ebx
mov    %rdi,-0x38(%rbp)
mov    %esi,%r15d
mov    %rsp,%rdi
lea    0xf(,%r15,4),%rax
and    $0xfffffffffffffff0,%rax
sub    %rax,%rdi
mov    %rdi,%rsp
test   %esi,%esi
jle    1286 <print_matrix_tri+0x156>
cmp    $0x8,%ebx
jae    1176 <print_matrix_tri+0x46>
xor    %eax,%eax
jmp    1270 <print_matrix_tri+0x140>
mov    %r15d,%eax
and    $0xfffffff8,%eax
lea    0x0(,%r15,4),%rdx
and    $0xffffffffffffffe0,%rdx
movaps 0xe71(%rip),%xmm0
movaps 0xe7a(%rip),%xmm4
movdqa 0xe82(%rip),%xmm3
xor    %esi,%esi
movdqa 0xe87(%rip),%xmm8
pcmpeqd %xmm9,%xmm9
movdqa 0xe89(%rip),%xmm10
movdqa 0xe90(%rip),%xmm12
movdqa 0xe97(%rip),%xmm11
nopl   0x0(%rax)
movdqa %xmm3,%xmm2
paddd  %xmm8,%xmm2
movaps %xmm4,%xmm1
shufps $0x88,%xmm0,%xmm1
movaps %xmm1,%xmm5
psubd  %xmm9,%xmm5
paddd  %xmm10,%xmm1
pshufd $0xf5,%xmm5,%xmm7
pmuludq %xmm3,%xmm5
pshufd $0xe8,%xmm5,%xmm5
pshufd $0xf5,%xmm3,%xmm6
pmuludq %xmm7,%xmm6
pshufd $0xe8,%xmm6,%xmm6
punpckldq %xmm6,%xmm5
pshufd $0xf5,%xmm1,%xmm6
pmuludq %xmm2,%xmm1
pshufd $0xe8,%xmm1,%xmm1
pshufd $0xf5,%xmm2,%xmm2
pmuludq %xmm6,%xmm2
pshufd $0xe8,%xmm2,%xmm2
punpckldq %xmm2,%xmm1
psrld  $0x1,%xmm5
psrld  $0x1,%xmm1
movdqa %xmm5,(%rdi,%rsi,1)
movdqa %xmm1,0x10(%rdi,%rsi,1)
paddq  %xmm12,%xmm4
paddq  %xmm12,%xmm0
paddd  %xmm11,%xmm3
add    $0x20,%rsi
cmp    %rsi,%rdx
jne    11d0 <print_matrix_tri+0xa0>
cmp    %r15,%rax
je     1286 <print_matrix_tri+0x156>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
lea    0x1(%rax),%rdx
mov    %edx,%esi
imul   %eax,%esi
shr    %esi
mov    %esi,(%rdi,%rax,4)
mov    %rdx,%rax
cmp    %rdx,%r15
jne    1270 <print_matrix_tri+0x140>
mov    %rdi,-0x30(%rbp)
cmpb   $0x0,(%rcx)
je     1297 <print_matrix_tri+0x167>
mov    %rcx,%rdi
call   1040 <puts@plt>
test   %ebx,%ebx
jle    1325 <print_matrix_tri+0x1f5>
movsbl %r14b,%ebx
xor    %r12d,%r12d
lea    0xdc3(%rip),%r14
jmp    12c3 <print_matrix_tri+0x193>
nop
mov    $0xa,%edi
call   1030 <putchar@plt>
add    $0x1,%r12
cmp    %r15,%r12
je     1325 <print_matrix_tri+0x1f5>
xor    %r13d,%r13d
jmp    12ee <print_matrix_tri+0x1be>
nopl   0x0(%rax,%rax,1)
cltq
mov    -0x38(%rbp),%rcx
movsd  (%rcx,%rax,8),%xmm0
mov    %r14,%rdi
mov    $0x1,%al
call   1050 <printf@plt>
add    $0x1,%r13
cmp    %r13,%r15
je     12b0 <print_matrix_tri+0x180>
cmp    $0x4c,%ebx
je     1310 <print_matrix_tri+0x1e0>
cmp    $0x55,%ebx
jne    12e5 <print_matrix_tri+0x1b5>
xorps  %xmm0,%xmm0
cmp    %r13,%r12
ja     12db <print_matrix_tri+0x1ab>
mov    -0x30(%rbp),%rax
mov    (%rax,%r13,4),%eax
add    %r12d,%eax
jmp    12d0 <print_matrix_tri+0x1a0>
nopl   (%rax)
xorps  %xmm0,%xmm0
cmp    %r13,%r12
jb     12db <print_matrix_tri+0x1ab>
mov    -0x30(%rbp),%rax
mov    (%rax,%r12,4),%eax
add    %r13d,%eax
jmp    12d0 <print_matrix_tri+0x1a0>
lea    -0x28(%rbp),%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [4 x i8] c"%s\0A\00"
@.str.1 = [9 x i8] c"%12.3lf \00"
@.str.2 = [2 x i8] c"\0A\00"
define void @print_matrix_tri(double* %0, i32 %1, i8 signext %2, i8* %3) {
%5 = alloca double*
%6 = alloca i32
%7 = alloca i8
%8 = alloca i8*
%9 = alloca i8*
%10 = alloca i64
%11 = alloca i32
%12 = alloca i32
store double* %0, double** %5
store i32 %1, i32* %6
store i8 %2, i8* %7
store i8* %3, i8** %8
%13 = load i32, i32* %6
%14 = zext i32 %13 to i64
%15 = call i8* @llvm.stacksave()
store i8* %15, i8** %9
%16 = alloca i32, i64 %14
store i64 %14, i64* %10
store i32 0, i32* %11
br label %17
17: ; preds = %30, %4
%18 = load i32, i32* %11
%19 = load i32, i32* %6
%20 = icmp slt i32 %18, %19
br i1 %20, label %21, label %33
21: ; preds = %17
%22 = load i32, i32* %11
%23 = add nsw i32 %22, 1
%24 = load i32, i32* %11
%25 = mul nsw i32 %23, %24
%26 = sdiv i32 %25, 2
%27 = load i32, i32* %11
%28 = sext i32 %27 to i64
%29 = getelementptr inbounds i32, i32* %16, i64 %28
store i32 %26, i32* %29
br label %30
30: ; preds = %21
%31 = load i32, i32* %11
%32 = add nsw i32 %31, 1
store i32 %32, i32* %11
br label %17
33: ; preds = %17
%34 = load i8*, i8** %8
%35 = call i64 @strlen(i8* %34)
%36 = icmp ne i64 %35, 0
br i1 %36, label %37, label %40
37: ; preds = %33
%38 = load i8*, i8** %8
%39 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str, i64 0, i64 0), i8* %38)
br label %40
40: ; preds = %37, %33
store i32 0, i32* %11
br label %41
41: ; preds = %97, %40
%42 = load i32, i32* %11
%43 = load i32, i32* %6
%44 = icmp slt i32 %42, %43
br i1 %44, label %45, label %100
45: ; preds = %41
store i32 0, i32* %12
br label %46
46: ; preds = %92, %45
%47 = load i32, i32* %12
%48 = load i32, i32* %6
%49 = icmp slt i32 %47, %48
br i1 %49, label %50, label %95
50: ; preds = %46
%51 = load i8, i8* %7
%52 = sext i8 %51 to i32
switch i32 %52, label %91 [
i32 85, label %53
i32 76, label %72
]
53: ; preds = %50
%54 = load i32, i32* %11
%55 = load i32, i32* %12
%56 = icmp sle i32 %54, %55
br i1 %56, label %57, label %69
57: ; preds = %53
%58 = load double*, double** %5
%59 = load i32, i32* %11
%60 = load i32, i32* %12
%61 = sext i32 %60 to i64
%62 = getelementptr inbounds i32, i32* %16, i64 %61
%63 = load i32, i32* %62
%64 = add nsw i32 %59, %63
%65 = sext i32 %64 to i64
%66 = getelementptr inbounds double, double* %58, i64 %65
%67 = load double, double* %66
%68 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.1, i64 0, i64 0), double %67)
br label %71
69: ; preds = %53
%70 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.1, i64 0, i64 0), double 0.000000e+00)
br label %71
71: ; preds = %69, %57
br label %91
72: ; preds = %50
%73 = load i32, i32* %11
%74 = load i32, i32* %12
%75 = icmp sge i32 %73, %74
br i1 %75, label %76, label %88
76: ; preds = %72
%77 = load double*, double** %5
%78 = load i32, i32* %12
%79 = load i32, i32* %11
%80 = sext i32 %79 to i64
%81 = getelementptr inbounds i32, i32* %16, i64 %80
%82 = load i32, i32* %81
%83 = add nsw i32 %78, %82
%84 = sext i32 %83 to i64
%85 = getelementptr inbounds double, double* %77, i64 %84
%86 = load double, double* %85
%87 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.1, i64 0, i64 0), double %86)
br label %90
88: ; preds = %72
%89 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.1, i64 0, i64 0), double 0.000000e+00)
br label %90
90: ; preds = %88, %76
br label %91
91: ; preds = %50, %90, %71
br label %92
92: ; preds = %91
%93 = load i32, i32* %12
%94 = add nsw i32 %93, 1
store i32 %94, i32* %12
br label %46
95: ; preds = %46
%96 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.2, i64 0, i64 0))
br label %97
97: ; preds = %95
%98 = load i32, i32* %11
%99 = add nsw i32 %98, 1
store i32 %99, i32* %11
br label %41
100: ; preds = %41
%101 = load i8*, i8** %9
ret void
}

LLVM IR (-O2):
@.str.1 = [9 x i8] c"%12.3lf \00"
define void @print_matrix_tri(double* nocapture %0, i32 %1, i8 signext %2, i8* nocapture %3) {
%5 = zext i32 %1 to i64
%6 = alloca i32, i64 %5
%7 = icmp sgt i32 %1, 0
br i1 %7, label %8, label %46
8: ; preds = %4
%9 = icmp ult i32 %1, 8
br i1 %9, label %35, label %10
10: ; preds = %8
%11 = and i64 %5, 4294967288
br label %12
12: ; preds = %12, %10
%13 = phi i64 [ 0, %10 ], [ %29, %12 ]
%14 = phi <4 x i64> [ <i64 0, i64 1, i64 2, i64 3>, %10 ], [ %30, %12 ]
%15 = phi <4 x i32> [ <i32 0, i32 1, i32 2, i32 3>, %10 ], [ %31, %12 ]
%16 = add <4 x i32> %15, <i32 4, i32 4, i32 4, i32 4>
%17 = trunc <4 x i64> %14 to <4 x i32>
%18 = add <4 x i32> %17, <i32 1, i32 1, i32 1, i32 1>
%19 = trunc <4 x i64> %14 to <4 x i32>
%20 = add <4 x i32> %19, <i32 5, i32 5, i32 5, i32 5>
%21 = mul nsw <4 x i32> %18, %15
%22 = mul nsw <4 x i32> %20, %16
%23 = lshr <4 x i32> %21, <i32 1, i32 1, i32 1, i32 1>
%24 = lshr <4 x i32> %22, <i32 1, i32 1, i32 1, i32 1>
%25 = getelementptr inbounds i32, i32* %6, i64 %13
%26 = bitcast i32* %25 to <4 x i32>*
store <4 x i32> %23, <4 x i32>* %26
%27 = getelementptr inbounds i32, i32* %25, i64 4
%28 = bitcast i32* %27 to <4 x i32>*
store <4 x i32> %24, <4 x i32>* %28
%29 = add nuw i64 %13, 8
%30 = add <4 x i64> %14, <i64 8, i64 8, i64 8, i64 8>
%31 = add <4 x i32> %15, <i32 8, i32 8, i32 8, i32 8>
%32 = icmp eq i64 %29, %11
br i1 %32, label %33, label %12
33: ; preds = %12
%34 = icmp eq i64 %11, %5
br i1 %34, label %46, label %35
35: ; preds = %8, %33
%36 = phi i64 [ 0, %8 ], [ %11, %33 ]
br label %37
37: ; preds = %35, %37
%38 = phi i64 [ %39, %37 ], [ %36, %35 ]
%39 = add nuw nsw i64 %38, 1
%40 = trunc i64 %39 to i32
%41 = trunc i64 %38 to i32
%42 = mul nsw i32 %40, %41
%43 = lshr i32 %42, 1
%44 = getelementptr inbounds i32, i32* %6, i64 %38
store i32 %43, i32* %44
%45 = icmp eq i64 %39, %5
br i1 %45, label %46, label %37
46: ; preds = %37, %33, %4
%47 = load i8, i8* %3
%48 = icmp eq i8 %47, 0
br i1 %48, label %51, label %49
49: ; preds = %46
%50 = tail call i32 @puts(i8* %3)
br label %51
51: ; preds = %49, %46
br i1 %7, label %52, label %87
52: ; preds = %51
%53 = sext i8 %2 to i32
br label %54
54: ; preds = %83, %52
%55 = phi i64 [ 0, %52 ], [ %85, %83 ]
%56 = getelementptr inbounds i32, i32* %6, i64 %55
%57 = trunc i64 %55 to i32
br label %58
58: ; preds = %54, %80
%59 = phi i64 [ 0, %54 ], [ %81, %80 ]
switch i32 %53, label %80 [
i32 85, label %60
i32 76, label %66
]
60: ; preds = %58
%61 = icmp ugt i64 %55, %59
br i1 %61, label %77, label %62
62: ; preds = %60
%63 = getelementptr inbounds i32, i32* %6, i64 %59
%64 = load i32, i32* %63
%65 = add nsw i32 %64, %57
br label %72
66: ; preds = %58
%67 = icmp ult i64 %55, %59
br i1 %67, label %77, label %68
68: ; preds = %66
%69 = load i32, i32* %56
%70 = trunc i64 %59 to i32
%71 = add nsw i32 %69, %70
br label %72
72: ; preds = %62, %68
%73 = phi i32 [ %71, %68 ], [ %65, %62 ]
%74 = sext i32 %73 to i64
%75 = getelementptr inbounds double, double* %0, i64 %74
%76 = load double, double* %75
br label %77
77: ; preds = %72, %66, %60
%78 = phi double [ 0.000000e+00, %60 ], [ 0.000000e+00, %66 ], [ %76, %72 ]
%79 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([9 x i8], [9 x i8]* @.str.1, i64 0, i64 0), double %78)
br label %80
80: ; preds = %77, %58
%81 = add nuw nsw i64 %59, 1
%82 = icmp eq i64 %81, %5
br i1 %82, label %83, label %58
83: ; preds = %80
%84 = tail call i32 @putchar(i32 10)
%85 = add nuw nsw i64 %55, 1
%86 = icmp eq i64 %85, %5
br i1 %86, label %87, label %54
87: ; preds = %83, %51
ret void
}