#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 */
long find_1st_atom(char *, char **, long, long, char *);
void ring_center(long i, long **seidx, char *bseq, char **AtomName,
                 double **xyz, double *xyz_c) {
  long ib, ie, k, j, m, n, natm;
  static char *RingAtom[9] = {" C4 ", " N3 ", " C2 ", " N1 ", " C6 ",
                              " C5 ", " N7 ", " C8 ", " N9 "};
  if (bseq[i] == 'A' || bseq[i] == 'G' || bseq[i] == 'a' || bseq[i] == 'g' ||
      bseq[i] == 'I' || bseq[i] == 'i') {
    natm = 9;
  } else if (bseq[i] == 'U' || bseq[i] == 'u' || bseq[i] == 'C' ||
             bseq[i] == 'c' || bseq[i] == 'T' || bseq[i] == 't' ||
             bseq[i] == 'P' || bseq[i] == 'p') {
    natm = 6;
  }
  n = 0;
  for (k = 1; k <= 3; k++)
    xyz_c[k] = 0.0;
  ib = seidx[i][1];
  ie = seidx[i][2];
  for (m = 0; m < natm; m++) {
    j = find_1st_atom(RingAtom[m], AtomName, ib, ie, "in base ring atoms");
    if (j) {
      n++;
      for (k = 1; k <= 3; k++)
        xyz_c[k] = xyz_c[k] + xyz[j][k];
    }
  }
  for (k = 1; k <= 3; k++)
    xyz_c[k] = xyz_c[k] / n;
}


x86 assembly (clang, -O0):
<ring_center>:
push   %rbp
mov    %rsp,%rbp
sub    $0x70,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8,-0x28(%rbp)
mov    %r9,-0x30(%rbp)
mov    -0x18(%rbp),%rax
mov    -0x8(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x41,%eax
je     11ae <ring_center+0x9e>
mov    -0x18(%rbp),%rax
mov    -0x8(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x47,%eax
je     11ae <ring_center+0x9e>
mov    -0x18(%rbp),%rax
mov    -0x8(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x61,%eax
je     11ae <ring_center+0x9e>
mov    -0x18(%rbp),%rax
mov    -0x8(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x67,%eax
je     11ae <ring_center+0x9e>
mov    -0x18(%rbp),%rax
mov    -0x8(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x49,%eax
je     11ae <ring_center+0x9e>
mov    -0x18(%rbp),%rax
mov    -0x8(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x69,%eax
jne    11bb <ring_center+0xab>
movq   $0x9,-0x68(%rbp)
jmp    1270 <ring_center+0x160>
mov    -0x18(%rbp),%rax
mov    -0x8(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x55,%eax
je     1263 <ring_center+0x153>
mov    -0x18(%rbp),%rax
mov    -0x8(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x75,%eax
je     1263 <ring_center+0x153>
mov    -0x18(%rbp),%rax
mov    -0x8(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x43,%eax
je     1263 <ring_center+0x153>
mov    -0x18(%rbp),%rax
mov    -0x8(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x63,%eax
je     1263 <ring_center+0x153>
mov    -0x18(%rbp),%rax
mov    -0x8(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x54,%eax
je     1263 <ring_center+0x153>
mov    -0x18(%rbp),%rax
mov    -0x8(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x74,%eax
je     1263 <ring_center+0x153>
mov    -0x18(%rbp),%rax
mov    -0x8(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x50,%eax
je     1263 <ring_center+0x153>
mov    -0x18(%rbp),%rax
mov    -0x8(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x70,%eax
jne    126b <ring_center+0x15b>
movq   $0x6,-0x68(%rbp)
jmp    1270 <ring_center+0x160>
movq   $0x0,-0x60(%rbp)
movq   $0x1,-0x48(%rbp)
cmpq   $0x3,-0x48(%rbp)
jg     12ac <ring_center+0x19c>
mov    -0x30(%rbp),%rax
mov    -0x48(%rbp),%rcx
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x48(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x48(%rbp)
jmp    1280 <ring_center+0x170>
mov    -0x10(%rbp),%rax
mov    -0x8(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    0x8(%rax),%rax
mov    %rax,-0x38(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x8(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    0x10(%rax),%rax
mov    %rax,-0x40(%rbp)
movq   $0x0,-0x58(%rbp)
mov    -0x58(%rbp),%rax
cmp    -0x68(%rbp),%rax
jge    139a <ring_center+0x28a>
mov    -0x58(%rbp),%rcx
lea    0x2d3b(%rip),%rax
mov    (%rax,%rcx,8),%rdi
mov    -0x20(%rbp),%rsi
mov    -0x38(%rbp),%rdx
mov    -0x40(%rbp),%rcx
lea    0xd21(%rip),%r8
call   1030 <find_1st_atom@plt>
mov    %rax,-0x50(%rbp)
cmpq   $0x0,-0x50(%rbp)
je     1384 <ring_center+0x274>
mov    -0x60(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x60(%rbp)
movq   $0x1,-0x48(%rbp)
cmpq   $0x3,-0x48(%rbp)
jg     137f <ring_center+0x26f>
mov    -0x30(%rbp),%rax
mov    -0x48(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x28(%rbp),%rax
mov    -0x50(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    -0x48(%rbp),%rcx
addsd  (%rax,%rcx,8),%xmm0
mov    -0x30(%rbp),%rax
mov    -0x48(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x48(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x48(%rbp)
jmp    1334 <ring_center+0x224>
jmp    1384 <ring_center+0x274>
jmp    1389 <ring_center+0x279>
mov    -0x58(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x58(%rbp)
jmp    12dc <ring_center+0x1cc>
movq   $0x1,-0x48(%rbp)
cmpq   $0x3,-0x48(%rbp)
jg     13e2 <ring_center+0x2d2>
mov    -0x30(%rbp),%rax
mov    -0x48(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
cvtsi2sdq -0x60(%rbp),%xmm1
divsd  %xmm1,%xmm0
mov    -0x30(%rbp),%rax
mov    -0x48(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x48(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x48(%rbp)
jmp    13a2 <ring_center+0x292>
add    $0x70,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<ring_center>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x18,%rsp
mov    %r9,%rbx
mov    %r8,0x8(%rsp)
mov    %rcx,0x10(%rsp)
mov    (%rdx,%rdi,1),%al
mov    $0x9,%ecx
mov    %rcx,(%rsp)
add    $0xbd,%al
cmp    $0x32,%al
ja     1159 <ring_center+0x49>
movzbl %al,%eax
movabs $0x6200100062001,%rcx
bt     %rax,%rcx
jae    1159 <ring_center+0x49>
mov    $0x6,%eax
mov    %rax,(%rsp)
xorpd  %xmm0,%xmm0
movupd %xmm0,0x8(%rbx)
movq   $0x0,0x18(%rbx)
mov    (%rsi,%rdi,8),%rax
mov    0x8(%rax),%r12
mov    0x10(%rax),%r13
shlq   $0x2,(%rsp)
xor    %ebp,%ebp
lea    0xe7c(%rip),%r15
xor    %r14d,%r14d
jmp    119a <ring_center+0x8a>
nopl   0x0(%rax)
add    $0x4,%rbp
cmp    %rbp,(%rsp)
je     11fa <ring_center+0xea>
movslq 0x0(%rbp,%r15,1),%rdi
add    %r15,%rdi
mov    0x10(%rsp),%rsi
mov    %r12,%rdx
mov    %r13,%rcx
lea    0xe9d(%rip),%r8
call   1030 <find_1st_atom@plt>
test   %rax,%rax
je     1190 <ring_center+0x80>
mov    0x8(%rsp),%rcx
mov    (%rcx,%rax,8),%rax
movsd  0x8(%rbx),%xmm0
movsd  0x10(%rbx),%xmm1
addsd  0x8(%rax),%xmm0
movsd  %xmm0,0x8(%rbx)
addsd  0x10(%rax),%xmm1
movsd  %xmm1,0x10(%rbx)
movsd  0x18(%rbx),%xmm0
addsd  0x18(%rax),%xmm0
movsd  %xmm0,0x18(%rbx)
add    $0x1,%r14
jmp    1190 <ring_center+0x80>
xorps  %xmm0,%xmm0
cvtsi2sd %r14,%xmm0
movupd 0x8(%rbx),%xmm1
movapd %xmm0,%xmm2
unpcklpd %xmm0,%xmm2
divpd  %xmm2,%xmm1
movupd %xmm1,0x8(%rbx)
movsd  0x18(%rbx),%xmm1
divsd  %xmm0,%xmm1
movsd  %xmm1,0x18(%rbx)
add    $0x18,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@ring_center.RingAtom = internal global [9 x i8*] [i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str, i32 0, i32 0), i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.1, i32 0, i32 0), i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.2, i32 0, i32 0), i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.3, i32 0, i32 0), i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.4, i32 0, i32 0), i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.5, i32 0, i32 0), i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.6, i32 0, i32 0), i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.7, i32 0, i32 0), i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.8, i32 0, i32 0)]
@.str = [5 x i8] c" C4 \00"
@.str.1 = [5 x i8] c" N3 \00"
@.str.2 = [5 x i8] c" C2 \00"
@.str.3 = [5 x i8] c" N1 \00"
@.str.4 = [5 x i8] c" C6 \00"
@.str.5 = [5 x i8] c" C5 \00"
@.str.6 = [5 x i8] c" N7 \00"
@.str.7 = [5 x i8] c" C8 \00"
@.str.8 = [5 x i8] c" N9 \00"
@.str.9 = [19 x i8] c"in base ring atoms\00"
define void @ring_center(i64 %0, i64** %1, i8* %2, i8** %3, double** %4, double* %5) {
%7 = alloca i64
%8 = alloca i64**
%9 = alloca i8*
%10 = alloca i8**
%11 = alloca double**
%12 = alloca double*
%13 = alloca i64
%14 = alloca i64
%15 = alloca i64
%16 = alloca i64
%17 = alloca i64
%18 = alloca i64
%19 = alloca i64
store i64 %0, i64* %7
store i64** %1, i64*** %8
store i8* %2, i8** %9
store i8** %3, i8*** %10
store double** %4, double*** %11
store double* %5, double** %12
%20 = load i8*, i8** %9
%21 = load i64, i64* %7
%22 = getelementptr inbounds i8, i8* %20, i64 %21
%23 = load i8, i8* %22
%24 = sext i8 %23 to i32
%25 = icmp eq i32 %24, 65
br i1 %25, label %61, label %26
26: ; preds = %6
%27 = load i8*, i8** %9
%28 = load i64, i64* %7
%29 = getelementptr inbounds i8, i8* %27, i64 %28
%30 = load i8, i8* %29
%31 = sext i8 %30 to i32
%32 = icmp eq i32 %31, 71
br i1 %32, label %61, label %33
33: ; preds = %26
%34 = load i8*, i8** %9
%35 = load i64, i64* %7
%36 = getelementptr inbounds i8, i8* %34, i64 %35
%37 = load i8, i8* %36
%38 = sext i8 %37 to i32
%39 = icmp eq i32 %38, 97
br i1 %39, label %61, label %40
40: ; preds = %33
%41 = load i8*, i8** %9
%42 = load i64, i64* %7
%43 = getelementptr inbounds i8, i8* %41, i64 %42
%44 = load i8, i8* %43
%45 = sext i8 %44 to i32
%46 = icmp eq i32 %45, 103
br i1 %46, label %61, label %47
47: ; preds = %40
%48 = load i8*, i8** %9
%49 = load i64, i64* %7
%50 = getelementptr inbounds i8, i8* %48, i64 %49
%51 = load i8, i8* %50
%52 = sext i8 %51 to i32
%53 = icmp eq i32 %52, 73
br i1 %53, label %61, label %54
54: ; preds = %47
%55 = load i8*, i8** %9
%56 = load i64, i64* %7
%57 = getelementptr inbounds i8, i8* %55, i64 %56
%58 = load i8, i8* %57
%59 = sext i8 %58 to i32
%60 = icmp eq i32 %59, 105
br i1 %60, label %61, label %62
61: ; preds = %54, %47, %40, %33, %26, %6
store i64 9, i64* %19
br label %120
62: ; preds = %54
%63 = load i8*, i8** %9
%64 = load i64, i64* %7
%65 = getelementptr inbounds i8, i8* %63, i64 %64
%66 = load i8, i8* %65
%67 = sext i8 %66 to i32
%68 = icmp eq i32 %67, 85
br i1 %68, label %118, label %69
69: ; preds = %62
%70 = load i8*, i8** %9
%71 = load i64, i64* %7
%72 = getelementptr inbounds i8, i8* %70, i64 %71
%73 = load i8, i8* %72
%74 = sext i8 %73 to i32
%75 = icmp eq i32 %74, 117
br i1 %75, label %118, label %76
76: ; preds = %69
%77 = load i8*, i8** %9
%78 = load i64, i64* %7
%79 = getelementptr inbounds i8, i8* %77, i64 %78
%80 = load i8, i8* %79
%81 = sext i8 %80 to i32
%82 = icmp eq i32 %81, 67
br i1 %82, label %118, label %83
83: ; preds = %76
%84 = load i8*, i8** %9
%85 = load i64, i64* %7
%86 = getelementptr inbounds i8, i8* %84, i64 %85
%87 = load i8, i8* %86
%88 = sext i8 %87 to i32
%89 = icmp eq i32 %88, 99
br i1 %89, label %118, label %90
90: ; preds = %83
%91 = load i8*, i8** %9
%92 = load i64, i64* %7
%93 = getelementptr inbounds i8, i8* %91, i64 %92
%94 = load i8, i8* %93
%95 = sext i8 %94 to i32
%96 = icmp eq i32 %95, 84
br i1 %96, label %118, label %97
97: ; preds = %90
%98 = load i8*, i8** %9
%99 = load i64, i64* %7
%100 = getelementptr inbounds i8, i8* %98, i64 %99
%101 = load i8, i8* %100
%102 = sext i8 %101 to i32
%103 = icmp eq i32 %102, 116
br i1 %103, label %118, label %104
104: ; preds = %97
%105 = load i8*, i8** %9
%106 = load i64, i64* %7
%107 = getelementptr inbounds i8, i8* %105, i64 %106
%108 = load i8, i8* %107
%109 = sext i8 %108 to i32
%110 = icmp eq i32 %109, 80
br i1 %110, label %118, label %111
111: ; preds = %104
%112 = load i8*, i8** %9
%113 = load i64, i64* %7
%114 = getelementptr inbounds i8, i8* %112, i64 %113
%115 = load i8, i8* %114
%116 = sext i8 %115 to i32
%117 = icmp eq i32 %116, 112
br i1 %117, label %118, label %119
118: ; preds = %111, %104, %97, %90, %83, %76, %69, %62
store i64 6, i64* %19
br label %119
119: ; preds = %118, %111
br label %120
120: ; preds = %119, %61
store i64 0, i64* %18
store i64 1, i64* %15
br label %121
121: ; preds = %128, %120
%122 = load i64, i64* %15
%123 = icmp sle i64 %122, 3
br i1 %123, label %124, label %131
124: ; preds = %121
%125 = load double*, double** %12
%126 = load i64, i64* %15
%127 = getelementptr inbounds double, double* %125, i64 %126
store double 0.000000e+00, double* %127
br label %128
128: ; preds = %124
%129 = load i64, i64* %15
%130 = add nsw i64 %129, 1
store i64 %130, i64* %15
br label %121
131: ; preds = %121
%132 = load i64**, i64*** %8
%133 = load i64, i64* %7
%134 = getelementptr inbounds i64*, i64** %132, i64 %133
%135 = load i64*, i64** %134
%136 = getelementptr inbounds i64, i64* %135, i64 1
%137 = load i64, i64* %136
store i64 %137, i64* %13
%138 = load i64**, i64*** %8
%139 = load i64, i64* %7
%140 = getelementptr inbounds i64*, i64** %138, i64 %139
%141 = load i64*, i64** %140
%142 = getelementptr inbounds i64, i64* %141, i64 2
%143 = load i64, i64* %142
store i64 %143, i64* %14
store i64 0, i64* %17
br label %144
144: ; preds = %185, %131
%145 = load i64, i64* %17
%146 = load i64, i64* %19
%147 = icmp slt i64 %145, %146
br i1 %147, label %148, label %188
148: ; preds = %144
%149 = load i64, i64* %17
%150 = getelementptr inbounds [9 x i8*], [9 x i8*]* @ring_center.RingAtom, i64 0, i64 %149
%151 = load i8*, i8** %150
%152 = load i8**, i8*** %10
%153 = load i64, i64* %13
%154 = load i64, i64* %14
%155 = call i64 @find_1st_atom(i8* %151, i8** %152, i64 %153, i64 %154, i8* getelementptr inbounds ([19 x i8], [19 x i8]* @.str.9, i64 0, i64 0))
store i64 %155, i64* %16
%156 = load i64, i64* %16
%157 = icmp ne i64 %156, 0
br i1 %157, label %158, label %184
158: ; preds = %148
%159 = load i64, i64* %18
%160 = add nsw i64 %159, 1
store i64 %160, i64* %18
store i64 1, i64* %15
br label %161
161: ; preds = %180, %158
%162 = load i64, i64* %15
%163 = icmp sle i64 %162, 3
br i1 %163, label %164, label %183
164: ; preds = %161
%165 = load double*, double** %12
%166 = load i64, i64* %15
%167 = getelementptr inbounds double, double* %165, i64 %166
%168 = load double, double* %167
%169 = load double**, double*** %11
%170 = load i64, i64* %16
%171 = getelementptr inbounds double*, double** %169, i64 %170
%172 = load double*, double** %171
%173 = load i64, i64* %15
%174 = getelementptr inbounds double, double* %172, i64 %173
%175 = load double, double* %174
%176 = fadd double %168, %175
%177 = load double*, double** %12
%178 = load i64, i64* %15
%179 = getelementptr inbounds double, double* %177, i64 %178
store double %176, double* %179
br label %180
180: ; preds = %164
%181 = load i64, i64* %15
%182 = add nsw i64 %181, 1
store i64 %182, i64* %15
br label %161
183: ; preds = %161
br label %184
184: ; preds = %183, %148
br label %185
185: ; preds = %184
%186 = load i64, i64* %17
%187 = add nsw i64 %186, 1
store i64 %187, i64* %17
br label %144
188: ; preds = %144
store i64 1, i64* %15
br label %189
189: ; preds = %203, %188
%190 = load i64, i64* %15
%191 = icmp sle i64 %190, 3
br i1 %191, label %192, label %206
192: ; preds = %189
%193 = load double*, double** %12
%194 = load i64, i64* %15
%195 = getelementptr inbounds double, double* %193, i64 %194
%196 = load double, double* %195
%197 = load i64, i64* %18
%198 = sitofp i64 %197 to double
%199 = fdiv double %196, %198
%200 = load double*, double** %12
%201 = load i64, i64* %15
%202 = getelementptr inbounds double, double* %200, i64 %201
store double %199, double* %202
br label %203
203: ; preds = %192
%204 = load i64, i64* %15
%205 = add nsw i64 %204, 1
store i64 %205, i64* %15
br label %189
206: ; preds = %189
ret void
}

LLVM IR (-O2):
@reltable.ring_center = internal unnamed_addr constant [9 x i32] [i32 trunc (i64 sub (i64 ptrtoint ([5 x i8]* @.str to i64), i64 ptrtoint ([9 x i32]* @reltable.ring_center to i64)) to i32), i32 trunc (i64 sub (i64 ptrtoint ([5 x i8]* @.str.1 to i64), i64 ptrtoint ([9 x i32]* @reltable.ring_center to i64)) to i32), i32 trunc (i64 sub (i64 ptrtoint ([5 x i8]* @.str.2 to i64), i64 ptrtoint ([9 x i32]* @reltable.ring_center to i64)) to i32), i32 trunc (i64 sub (i64 ptrtoint ([5 x i8]* @.str.3 to i64), i64 ptrtoint ([9 x i32]* @reltable.ring_center to i64)) to i32), i32 trunc (i64 sub (i64 ptrtoint ([5 x i8]* @.str.4 to i64), i64 ptrtoint ([9 x i32]* @reltable.ring_center to i64)) to i32), i32 trunc (i64 sub (i64 ptrtoint ([5 x i8]* @.str.5 to i64), i64 ptrtoint ([9 x i32]* @reltable.ring_center to i64)) to i32), i32 trunc (i64 sub (i64 ptrtoint ([5 x i8]* @.str.6 to i64), i64 ptrtoint ([9 x i32]* @reltable.ring_center to i64)) to i32), i32 trunc (i64 sub (i64 ptrtoint ([5 x i8]* @.str.7 to i64), i64 ptrtoint ([9 x i32]* @reltable.ring_center to i64)) to i32), i32 trunc (i64 sub (i64 ptrtoint ([5 x i8]* @.str.8 to i64), i64 ptrtoint ([9 x i32]* @reltable.ring_center to i64)) to i32)]
@.str = [5 x i8] c" C4 \00"
@.str.1 = [5 x i8] c" N3 \00"
@.str.2 = [5 x i8] c" C2 \00"
@.str.3 = [5 x i8] c" N1 \00"
@.str.4 = [5 x i8] c" C6 \00"
@.str.5 = [5 x i8] c" C5 \00"
@.str.6 = [5 x i8] c" N7 \00"
@.str.7 = [5 x i8] c" C8 \00"
@.str.8 = [5 x i8] c" N9 \00"
@.str.9 = [19 x i8] c"in base ring atoms\00"
define void @ring_center(i64 %0, i64** nocapture %1, i8* nocapture %2, i8** %3, double** nocapture %4, double* nocapture %5) {
%7 = getelementptr inbounds i8, i8* %2, i64 %0
%8 = load i8, i8* %7
switch i8 %8, label %10 [
i8 112, label %9
i8 80, label %9
i8 116, label %9
i8 84, label %9
i8 99, label %9
i8 67, label %9
i8 85, label %9
i8 117, label %9
]
9: ; preds = %6, %6, %6, %6, %6, %6, %6, %6
br label %10
10: ; preds = %6, %9
%11 = phi i64 [ 6, %9 ], [ 9, %6 ]
%12 = getelementptr double, double* %5, i64 1
%13 = bitcast double* %12 to i8*
%14 = getelementptr inbounds i64*, i64** %1, i64 %0
%15 = load i64*, i64** %14
%16 = getelementptr inbounds i64, i64* %15, i64 1
%17 = load i64, i64* %16
%18 = getelementptr inbounds i64, i64* %15, i64 2
%19 = load i64, i64* %18
%20 = getelementptr inbounds double, double* %5, i64 2
%21 = getelementptr inbounds double, double* %5, i64 3
br label %33
22: ; preds = %56
%23 = sitofp i64 %57 to double
%24 = bitcast double* %12 to <2 x double>*
%25 = load <2 x double>, <2 x double>* %24
%26 = insertelement <2 x double> poison, double %23, i64 0
%27 = shufflevector <2 x double> %26, <2 x double> poison, <2 x i32> zeroinitializer
%28 = fdiv <2 x double> %25, %27
%29 = bitcast double* %12 to <2 x double>*
store <2 x double> %28, <2 x double>* %29
%30 = getelementptr inbounds double, double* %5, i64 3
%31 = load double, double* %30
%32 = fdiv double %31, %23
store double %32, double* %30
ret void
33: ; preds = %10, %56
%34 = phi i64 [ 0, %10 ], [ %57, %56 ]
%35 = phi i64 [ 0, %10 ], [ %58, %56 ]
%36 = shl i64 %35, 2
%37 = call i8* @llvm.load.relative.i64(i8* bitcast ([9 x i32]* @reltable.ring_center to i8*), i64 %36)
%38 = tail call i64 @find_1st_atom(i8* %37, i8** %3, i64 %17, i64 %19, i8* getelementptr inbounds ([19 x i8], [19 x i8]* @.str.9, i64 0, i64 0))
%39 = icmp eq i64 %38, 0
br i1 %39, label %56, label %40
40: ; preds = %33
%41 = getelementptr inbounds double*, double** %4, i64 %38
%42 = load double*, double** %41
%43 = load double, double* %12
%44 = getelementptr inbounds double, double* %42, i64 1
%45 = load double, double* %44
%46 = fadd double %43, %45
store double %46, double* %12
%47 = load double, double* %20
%48 = getelementptr inbounds double, double* %42, i64 2
%49 = load double, double* %48
%50 = fadd double %47, %49
store double %50, double* %20
%51 = load double, double* %21
%52 = getelementptr inbounds double, double* %42, i64 3
%53 = load double, double* %52
%54 = fadd double %51, %53
store double %54, double* %21
%55 = add nsw i64 %34, 1
br label %56
56: ; preds = %40, %33
%57 = phi i64 [ %34, %33 ], [ %55, %40 ]
%58 = add nuw nsw i64 %35, 1
%59 = icmp eq i64 %58, %11
br i1 %59, label %22, label %33
}