; LLVM IR from niuyishuai/PDCABB :: LAPACK_BLAS/LAPACK (zlatps)

; Unoptimized IR (clang -disable-llvm-passes):
target datalayout = "e-m:e-p270:32:32-p271:32:32-p272:64:64-i64:64-i128:128-f80:128-n8:16:32:64-S128"
target triple = "x86_64-unknown-linux-gnu"

%struct.doublecomplex = type { double, double }

@.str = external hidden unnamed_addr constant [2 x i8], align 1
@.str.1 = external hidden unnamed_addr constant [2 x i8], align 1
@.str.2 = external hidden unnamed_addr constant [2 x i8], align 1
@.str.3 = external hidden unnamed_addr constant [2 x i8], align 1
@.str.4 = external hidden unnamed_addr constant [2 x i8], align 1
@.str.5 = external hidden unnamed_addr constant [2 x i8], align 1
@.str.6 = external hidden unnamed_addr constant [7 x i8], align 1
@.str.7 = external hidden unnamed_addr constant [13 x i8], align 1
@.str.8 = external hidden unnamed_addr constant [10 x i8], align 1
@c__1 = external hidden global i64, align 8
@c_b36 = external hidden global double, align 8

; Function Attrs: nounwind uwtable
define dso_local i32 @zlatps_(ptr noundef %0, ptr noundef %1, ptr noundef %2, ptr noundef %3, ptr noundef %4, ptr noundef %5, ptr noundef %6, ptr noundef %7, ptr noundef %8, ptr noundef %9) #0 {
  %11 = alloca i32, align 4
  %12 = alloca ptr, align 8
  %13 = alloca ptr, align 8
  %14 = alloca ptr, align 8
  %15 = alloca ptr, align 8
  %16 = alloca ptr, align 8
  %17 = alloca ptr, align 8
  %18 = alloca ptr, align 8
  %19 = alloca ptr, align 8
  %20 = alloca ptr, align 8
  %21 = alloca ptr, align 8
  %22 = alloca i64, align 8
  %23 = alloca i64, align 8
  %24 = alloca i64, align 8
  %25 = alloca i64, align 8
  %26 = alloca i64, align 8
  %27 = alloca double, align 8
  %28 = alloca double, align 8
  %29 = alloca double, align 8
  %30 = alloca double, align 8
  %31 = alloca %struct.doublecomplex, align 8
  %32 = alloca %struct.doublecomplex, align 8
  %33 = alloca %struct.doublecomplex, align 8
  %34 = alloca %struct.doublecomplex, align 8
  %35 = alloca i64, align 8
  %36 = alloca i64, align 8
  %37 = alloca i64, align 8
  %38 = alloca double, align 8
  %39 = alloca double, align 8
  %40 = alloca double, align 8
  %41 = alloca i64, align 8
  %42 = alloca i64, align 8
  %43 = alloca double, align 8
  %44 = alloca i64, align 8
  %45 = alloca double, align 8
  %46 = alloca %struct.doublecomplex, align 8
  %47 = alloca double, align 8
  %48 = alloca double, align 8
  %49 = alloca double, align 8
  %50 = alloca %struct.doublecomplex, align 8
  %51 = alloca i64, align 8
  %52 = alloca %struct.doublecomplex, align 8
  %53 = alloca i64, align 8
  %54 = alloca double, align 8
  %55 = alloca i64, align 8
  %56 = alloca i64, align 8
  %57 = alloca double, align 8
  %58 = alloca i64, align 8
  %59 = alloca i32, align 4
  store ptr %0, ptr %12, align 8, !tbaa !5
  store ptr %1, ptr %13, align 8, !tbaa !5
  store ptr %2, ptr %14, align 8, !tbaa !5
  store ptr %3, ptr %15, align 8, !tbaa !5
  store ptr %4, ptr %16, align 8, !tbaa !5
  store ptr %5, ptr %17, align 8, !tbaa !5
  store ptr %6, ptr %18, align 8, !tbaa !5
  store ptr %7, ptr %19, align 8, !tbaa !5
  store ptr %8, ptr %20, align 8, !tbaa !5
  store ptr %9, ptr %21, align 8, !tbaa !5
  call void @llvm.lifetime.start.p0(i64 8, ptr %22) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %23) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %24) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %25) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %26) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %27) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %28) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %29) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %30) #4
  call void @llvm.lifetime.start.p0(i64 16, ptr %31) #4
  call void @llvm.lifetime.start.p0(i64 16, ptr %32) #4
  call void @llvm.lifetime.start.p0(i64 16, ptr %33) #4
  call void @llvm.lifetime.start.p0(i64 16, ptr %34) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %35) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %36) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %37) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %38) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %39) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %40) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %41) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %42) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %43) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %44) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %45) #4
  call void @llvm.lifetime.start.p0(i64 16, ptr %46) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %47) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %48) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %49) #4
  call void @llvm.lifetime.start.p0(i64 16, ptr %50) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %51) #4
  call void @llvm.lifetime.start.p0(i64 16, ptr %52) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %53) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %54) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %55) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %56) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %57) #4
  call void @llvm.lifetime.start.p0(i64 8, ptr %58) #4
  %60 = load ptr, ptr %20, align 8, !tbaa !5
  %61 = getelementptr inbounds double, ptr %60, i32 -1
  store ptr %61, ptr %20, align 8, !tbaa !5
  %62 = load ptr, ptr %18, align 8, !tbaa !5
  %63 = getelementptr inbounds %struct.doublecomplex, ptr %62, i32 -1
  store ptr %63, ptr %18, align 8, !tbaa !5
  %64 = load ptr, ptr %17, align 8, !tbaa !5
  %65 = getelementptr inbounds %struct.doublecomplex, ptr %64, i32 -1
  store ptr %65, ptr %17, align 8, !tbaa !5
  %66 = load ptr, ptr %21, align 8, !tbaa !5
  store i64 0, ptr %66, align 8, !tbaa !9
  %67 = load ptr, ptr %12, align 8, !tbaa !5
  %68 = call i64 @lsame_(ptr noundef %67, ptr noundef @.str)
  store i64 %68, ptr %53, align 8, !tbaa !9
  %69 = load ptr, ptr %13, align 8, !tbaa !5
  %70 = call i64 @lsame_(ptr noundef %69, ptr noundef @.str.1)
  store i64 %70, ptr %55, align 8, !tbaa !9
  %71 = load ptr, ptr %14, align 8, !tbaa !5
  %72 = call i64 @lsame_(ptr noundef %71, ptr noundef @.str.1)
  store i64 %72, ptr %58, align 8, !tbaa !9
  %73 = load i64, ptr %53, align 8, !tbaa !9
  %74 = icmp ne i64 %73, 0
  br i1 %74, label %81, label %75

75:                                               ; preds = %10
  %76 = load ptr, ptr %12, align 8, !tbaa !5
  %77 = call i64 @lsame_(ptr noundef %76, ptr noundef @.str.2)
  %78 = icmp ne i64 %77, 0
  br i1 %78, label %81, label %79

79:                                               ; preds = %75
  %80 = load ptr, ptr %21, align 8, !tbaa !5
  store i64 -1, ptr %80, align 8, !tbaa !9
  br label %123

81:                                               ; preds = %75, %10
  %82 = load i64, ptr %55, align 8, !tbaa !9
  %83 = icmp ne i64 %82, 0
  br i1 %83, label %94, label %84

84:                                               ; preds = %81
  %85 = load ptr, ptr %13, align 8, !tbaa !5
  %86 = call i64 @lsame_(ptr noundef %85, ptr noundef @.str.3)
  %87 = icmp ne i64 %86, 0
  br i1 %87, label %94, label %88

88:                                               ; preds = %84
  %89 = load ptr, ptr %13, align 8, !tbaa !5
  %90 = call i64 @lsame_(ptr noundef %89, ptr noundef @.str.4)
  %91 = icmp ne i64 %90, 0
  br i1 %91, label %94, label %92

92:                                               ; preds = %88
  %93 = load ptr, ptr %21, align 8, !tbaa !5
  store i64 -2, ptr %93, align 8, !tbaa !9
  br label %122

94:                                               ; preds = %88, %84, %81
  %95 = load i64, ptr %58, align 8, !tbaa !9
  %96 = icmp ne i64 %95, 0
  br i1 %96, label %103, label %97

97:                                               ; preds = %94
  %98 = load ptr, ptr %14, align 8, !tbaa !5
  %99 = call i64 @lsame_(ptr noundef %98, ptr noundef @.str)
  %100 = icmp ne i64 %99, 0
  br i1 %100, label %103, label %101

101:                                              ; preds = %97
  %102 = load ptr, ptr %21, align 8, !tbaa !5
  store i64 -3, ptr %102, align 8, !tbaa !9
  br label %121

103:                                              ; preds = %97, %94
  %104 = load ptr, ptr %15, align 8, !tbaa !5
  %105 = call i64 @lsame_(ptr noundef %104, ptr noundef @.str.5)
  %106 = icmp ne i64 %105, 0
  br i1 %106, label %113, label %107

107:                                              ; preds = %103
  %108 = load ptr, ptr %15, align 8, !tbaa !5
  %109 = call i64 @lsame_(ptr noundef %108, ptr noundef @.str.1)
  %110 = icmp ne i64 %109, 0
  br i1 %110, label %113, label %111

111:                                              ; preds = %107
  %112 = load ptr, ptr %21, align 8, !tbaa !5
  store i64 -4, ptr %112, align 8, !tbaa !9
  br label %120

113:                                              ; preds = %107, %103
  %114 = load ptr, ptr %16, align 8, !tbaa !5
  %115 = load i64, ptr %114, align 8, !tbaa !9
  %116 = icmp slt i64 %115, 0
  br i1 %116, label %117, label %119

117:                                              ; preds = %113
  %118 = load ptr, ptr %21, align 8, !tbaa !5
  store i64 -5, ptr %118, align 8, !tbaa !9
  br label %119

119:                                              ; preds = %117, %113
  br label %120

120:                                              ; preds = %119, %111
  br label %121

121:                                              ; preds = %120, %101
  br label %122

122:                                              ; preds = %121, %92
  br label %123

123:                                              ; preds = %122, %79
  %124 = load ptr, ptr %21, align 8, !tbaa !5
  %125 = load i64, ptr %124, align 8, !tbaa !9
  %126 = icmp ne i64 %125, 0
  br i1 %126, label %127, label %132

127:                                              ; preds = %123
  %128 = load ptr, ptr %21, align 8, !tbaa !5
  %129 = load i64, ptr %128, align 8, !tbaa !9
  %130 = sub nsw i64 0, %129
  store i64 %130, ptr %22, align 8, !tbaa !9
  %131 = call i32 @xerbla_(ptr noundef @.str.6, ptr noundef %22)
  store i32 0, ptr %11, align 4
  store i32 1, ptr %59, align 4
  br label %2848

132:                                              ; preds = %123
  %133 = load ptr, ptr %16, align 8, !tbaa !5
  %134 = load i64, ptr %133, align 8, !tbaa !9
  %135 = icmp eq i64 %134, 0
  br i1 %135, label %136, label %137

136:                                              ; preds = %132
  store i32 0, ptr %11, align 4
  store i32 1, ptr %59, align 4
  br label %2848

137:                                              ; preds = %132
  %138 = call double @dlamch_(ptr noundef @.str.7)
  store double %138, ptr %57, align 8, !tbaa !11
  %139 = load double, ptr %57, align 8, !tbaa !11
  %140 = fdiv double 1.000000e+00, %139
  store double %140, ptr %54, align 8, !tbaa !11
  %141 = call i32 @dlabad_(ptr noundef %57, ptr noundef %54)
  %142 = call double @dlamch_(ptr noundef @.str.8)
  %143 = load double, ptr %57, align 8, !tbaa !11
  %144 = fdiv double %143, %142
  store double %144, ptr %57, align 8, !tbaa !11
  %145 = load double, ptr %57, align 8, !tbaa !11
  %146 = fdiv double 1.000000e+00, %145
  store double %146, ptr %54, align 8, !tbaa !11
  %147 = load ptr, ptr %19, align 8, !tbaa !5
  store double 1.000000e+00, ptr %147, align 8, !tbaa !11
  %148 = load ptr, ptr %15, align 8, !tbaa !5
  %149 = call i64 @lsame_(ptr noundef %148, ptr noundef @.str.1)
  %150 = icmp ne i64 %149, 0
  br i1 %150, label %151, label %215

151:                                              ; preds = %137
  %152 = load i64, ptr %53, align 8, !tbaa !9
  %153 = icmp ne i64 %152, 0
  br i1 %153, label %154, label %178

154:                                              ; preds = %151
  store i64 1, ptr %37, align 8, !tbaa !9
  %155 = load ptr, ptr %16, align 8, !tbaa !5
  %156 = load i64, ptr %155, align 8, !tbaa !9
  store i64 %156, ptr %22, align 8, !tbaa !9
  store i64 1, ptr %36, align 8, !tbaa !9
  br label %157

157:                                              ; preds = %174, %154
  %158 = load i64, ptr %36, align 8, !tbaa !9
  %159 = load i64, ptr %22, align 8, !tbaa !9
  %160 = icmp sle i64 %158, %159
  br i1 %160, label %161, label %177

161:                                              ; preds = %157
  %162 = load i64, ptr %36, align 8, !tbaa !9
  %163 = sub nsw i64 %162, 1
  store i64 %163, ptr %23, align 8, !tbaa !9
  %164 = load ptr, ptr %17, align 8, !tbaa !5
  %165 = load i64, ptr %37, align 8, !tbaa !9
  %166 = getelementptr inbounds %struct.doublecomplex, ptr %164, i64 %165
  %167 = call double @f2c_dzasum(ptr noundef %23, ptr noundef %166, ptr noundef @c__1)
  %168 = load ptr, ptr %20, align 8, !tbaa !5
  %169 = load i64, ptr %36, align 8, !tbaa !9
  %170 = getelementptr inbounds double, ptr %168, i64 %169
  store double %167, ptr %170, align 8, !tbaa !11
  %171 = load i64, ptr %36, align 8, !tbaa !9
  %172 = load i64, ptr %37, align 8, !tbaa !9
  %173 = add nsw i64 %172, %171
  store i64 %173, ptr %37, align 8, !tbaa !9
  br label %174

174:                                              ; preds = %161
  %175 = load i64, ptr %36, align 8, !tbaa !9
  %176 = add nsw i64 %175, 1
  store i64 %176, ptr %36, align 8, !tbaa !9
  br label %157, !llvm.loop !13

177:                                              ; preds = %157
  br label %214

178:                                              ; preds = %151
  store i64 1, ptr %37, align 8, !tbaa !9
  %179 = load ptr, ptr %16, align 8, !tbaa !5
  %180 = load i64, ptr %179, align 8, !tbaa !9
  %181 = sub nsw i64 %180, 1
  store i64 %181, ptr %22, align 8, !tbaa !9
  store i64 1, ptr %36, align 8, !tbaa !9
  br label %182

182:                                              ; preds = %206, %178
  %183 = load i64, ptr %36, align 8, !tbaa !9
  %184 = load i64, ptr %22, align 8, !tbaa !9
  %185 = icmp sle i64 %183, %184
  br i1 %185, label %186, label %209

186:                                              ; preds = %182
  %187 = load ptr, ptr %16, align 8, !tbaa !5
  %188 = load i64, ptr %187, align 8, !tbaa !9
  %189 = load i64, ptr %36, align 8, !tbaa !9
  %190 = sub nsw i64 %188, %189
  store i64 %190, ptr %23, align 8, !tbaa !9
  %191 = load ptr, ptr %17, align 8, !tbaa !5
  %192 = load i64, ptr %37, align 8, !tbaa !9
  %193 = add nsw i64 %192, 1
  %194 = getelementptr inbounds %struct.doublecomplex, ptr %191, i64 %193
  %195 = call double @f2c_dzasum(ptr noundef %23, ptr noundef %194, ptr noundef @c__1)
  %196 = load ptr, ptr %20, align 8, !tbaa !5
  %197 = load i64, ptr %36, align 8, !tbaa !9
  %198 = getelementptr inbounds double, ptr %196, i64 %197
  store double %195, ptr %198, align 8, !tbaa !11
  %199 = load i64, ptr %37, align 8, !tbaa !9
  %200 = load ptr, ptr %16, align 8, !tbaa !5
  %201 = load i64, ptr %200, align 8, !tbaa !9
  %202 = add nsw i64 %199, %201
  %203 = load i64, ptr %36, align 8, !tbaa !9
  %204 = sub nsw i64 %202, %203
  %205 = add nsw i64 %204, 1
  store i64 %205, ptr %37, align 8, !tbaa !9
  br label %206

206:                                              ; preds = %186
  %207 = load i64, ptr %36, align 8, !tbaa !9
  %208 = add nsw i64 %207, 1
  store i64 %208, ptr %36, align 8, !tbaa !9
  br label %182, !llvm.loop !15

209:                                              ; preds = %182
  %210 = load ptr, ptr %20, align 8, !tbaa !5
  %211 = load ptr, ptr %16, align 8, !tbaa !5
  %212 = load i64, ptr %211, align 8, !tbaa !9
  %213 = getelementptr inbounds double, ptr %210, i64 %212
  store double 0.000000e+00, ptr %213, align 8, !tbaa !11
  br label %214

214:                                              ; preds = %209, %177
  br label %215

215:                                              ; preds = %214, %137
  %216 = load ptr, ptr %16, align 8, !tbaa !5
  %217 = load ptr, ptr %20, align 8, !tbaa !5
  %218 = getelementptr inbounds double, ptr %217, i64 1
  %219 = call i64 @f2c_idamax(ptr noundef %216, ptr noundef %218, ptr noundef @c__1)
  store i64 %219, ptr %44, align 8, !tbaa !9
  %220 = load ptr, ptr %20, align 8, !tbaa !5
  %221 = load i64, ptr %44, align 8, !tbaa !9
  %222 = getelementptr inbounds double, ptr %220, i64 %221
  %223 = load double, ptr %222, align 8, !tbaa !11
  store double %223, ptr %45, align 8, !tbaa !11
  %224 = load double, ptr %45, align 8, !tbaa !11
  %225 = load double, ptr %54, align 8, !tbaa !11
  %226 = fmul double %225, 5.000000e-01
  %227 = fcmp ole double %224, %226
  br i1 %227, label %228, label %229

228:                                              ; preds = %215
  store double 1.000000e+00, ptr %49, align 8, !tbaa !11
  br label %238

229:                                              ; preds = %215
  %230 = load double, ptr %57, align 8, !tbaa !11
  %231 = load double, ptr %45, align 8, !tbaa !11
  %232 = fmul double %230, %231
  %233 = fdiv double 5.000000e-01, %232
  store double %233, ptr %49, align 8, !tbaa !11
  %234 = load ptr, ptr %16, align 8, !tbaa !5
  %235 = load ptr, ptr %20, align 8, !tbaa !5
  %236 = getelementptr inbounds double, ptr %235, i64 1
  %237 = call i32 @f2c_dscal(ptr noundef %234, ptr noundef %49, ptr noundef %236, ptr noundef @c__1)
  br label %238

238:                                              ; preds = %229, %228
  store double 0.000000e+00, ptr %47, align 8, !tbaa !11
  %239 = load ptr, ptr %16, align 8, !tbaa !5
  %240 = load i64, ptr %239, align 8, !tbaa !9
  store i64 %240, ptr %22, align 8, !tbaa !9
  store i64 1, ptr %36, align 8, !tbaa !9
  br label %241

241:                                              ; preds = %287, %238
  %242 = load i64, ptr %36, align 8, !tbaa !9
  %243 = load i64, ptr %22, align 8, !tbaa !9
  %244 = icmp sle i64 %242, %243
  br i1 %244, label %245, label %290

245:                                              ; preds = %241
  %246 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %246, ptr %23, align 8, !tbaa !9
  %247 = load double, ptr %47, align 8, !tbaa !11
  store double %247, ptr %29, align 8, !tbaa !11
  %248 = load ptr, ptr %18, align 8, !tbaa !5
  %249 = load i64, ptr %23, align 8, !tbaa !9
  %250 = getelementptr inbounds %struct.doublecomplex, ptr %248, i64 %249
  %251 = getelementptr inbounds %struct.doublecomplex, ptr %250, i32 0, i32 0
  %252 = load double, ptr %251, align 8, !tbaa !16
  %253 = fdiv double %252, 2.000000e+00
  store double %253, ptr %27, align 8, !tbaa !11
  %254 = load double, ptr %27, align 8, !tbaa !11
  %255 = fcmp oge double %254, 0.000000e+00
  br i1 %255, label %256, label %258

256:                                              ; preds = %245
  %257 = load double, ptr %27, align 8, !tbaa !11
  br label %261

258:                                              ; preds = %245
  %259 = load double, ptr %27, align 8, !tbaa !11
  %260 = fneg double %259
  br label %261

261:                                              ; preds = %258, %256
  %262 = phi double [ %257, %256 ], [ %260, %258 ]
  %263 = load ptr, ptr %18, align 8, !tbaa !5
  %264 = load i64, ptr %36, align 8, !tbaa !9
  %265 = getelementptr inbounds %struct.doublecomplex, ptr %263, i64 %264
  %266 = call double @d_imag(ptr noundef %265)
  %267 = fdiv double %266, 2.000000e+00
  store double %267, ptr %28, align 8, !tbaa !11
  %268 = load double, ptr %28, align 8, !tbaa !11
  %269 = fcmp oge double %268, 0.000000e+00
  br i1 %269, label %270, label %272

270:                                              ; preds = %261
  %271 = load double, ptr %28, align 8, !tbaa !11
  br label %275

272:                                              ; preds = %261
  %273 = load double, ptr %28, align 8, !tbaa !11
  %274 = fneg double %273
  br label %275

275:                                              ; preds = %272, %270
  %276 = phi double [ %271, %270 ], [ %274, %272 ]
  %277 = fadd double %262, %276
  store double %277, ptr %30, align 8, !tbaa !11
  %278 = load double, ptr %29, align 8, !tbaa !11
  %279 = load double, ptr %30, align 8, !tbaa !11
  %280 = fcmp oge double %278, %279
  br i1 %280, label %281, label %283

281:                                              ; preds = %275
  %282 = load double, ptr %29, align 8, !tbaa !11
  br label %285

283:                                              ; preds = %275
  %284 = load double, ptr %30, align 8, !tbaa !11
  br label %285

285:                                              ; preds = %283, %281
  %286 = phi double [ %282, %281 ], [ %284, %283 ]
  store double %286, ptr %47, align 8, !tbaa !11
  br label %287

287:                                              ; preds = %285
  %288 = load i64, ptr %36, align 8, !tbaa !9
  %289 = add nsw i64 %288, 1
  store i64 %289, ptr %36, align 8, !tbaa !9
  br label %241, !llvm.loop !18

290:                                              ; preds = %241
  %291 = load double, ptr %47, align 8, !tbaa !11
  store double %291, ptr %43, align 8, !tbaa !11
  %292 = load i64, ptr %55, align 8, !tbaa !9
  %293 = icmp ne i64 %292, 0
  br i1 %293, label %294, label %508

294:                                              ; preds = %290
  %295 = load i64, ptr %53, align 8, !tbaa !9
  %296 = icmp ne i64 %295, 0
  br i1 %296, label %297, label %300

297:                                              ; preds = %294
  %298 = load ptr, ptr %16, align 8, !tbaa !5
  %299 = load i64, ptr %298, align 8, !tbaa !9
  store i64 %299, ptr %56, align 8, !tbaa !9
  store i64 1, ptr %51, align 8, !tbaa !9
  store i64 -1, ptr %41, align 8, !tbaa !9
  br label %303

300:                                              ; preds = %294
  store i64 1, ptr %56, align 8, !tbaa !9
  %301 = load ptr, ptr %16, align 8, !tbaa !5
  %302 = load i64, ptr %301, align 8, !tbaa !9
  store i64 %302, ptr %51, align 8, !tbaa !9
  store i64 1, ptr %41, align 8, !tbaa !9
  br label %303

303:                                              ; preds = %300, %297
  %304 = load double, ptr %49, align 8, !tbaa !11
  %305 = fcmp une double %304, 1.000000e+00
  br i1 %305, label %306, label %307

306:                                              ; preds = %303
  store double 0.000000e+00, ptr %48, align 8, !tbaa !11
  br label %507

307:                                              ; preds = %303
  %308 = load i64, ptr %58, align 8, !tbaa !9
  %309 = icmp ne i64 %308, 0
  br i1 %309, label %310, label %448

310:                                              ; preds = %307
  %311 = load double, ptr %43, align 8, !tbaa !11
  %312 = load double, ptr %57, align 8, !tbaa !11
  %313 = fcmp oge double %311, %312
  br i1 %313, label %314, label %316

314:                                              ; preds = %310
  %315 = load double, ptr %43, align 8, !tbaa !11
  br label %318

316:                                              ; preds = %310
  %317 = load double, ptr %57, align 8, !tbaa !11
  br label %318

318:                                              ; preds = %316, %314
  %319 = phi double [ %315, %314 ], [ %317, %316 ]
  %320 = fdiv double 5.000000e-01, %319
  store double %320, ptr %48, align 8, !tbaa !11
  %321 = load double, ptr %48, align 8, !tbaa !11
  store double %321, ptr %43, align 8, !tbaa !11
  %322 = load i64, ptr %56, align 8, !tbaa !9
  %323 = load i64, ptr %56, align 8, !tbaa !9
  %324 = add nsw i64 %323, 1
  %325 = mul nsw i64 %322, %324
  %326 = sdiv i64 %325, 2
  store i64 %326, ptr %37, align 8, !tbaa !9
  %327 = load ptr, ptr %16, align 8, !tbaa !5
  %328 = load i64, ptr %327, align 8, !tbaa !9
  store i64 %328, ptr %42, align 8, !tbaa !9
  %329 = load i64, ptr %51, align 8, !tbaa !9
  store i64 %329, ptr %22, align 8, !tbaa !9
  %330 = load i64, ptr %41, align 8, !tbaa !9
  store i64 %330, ptr %23, align 8, !tbaa !9
  %331 = load i64, ptr %56, align 8, !tbaa !9
  store i64 %331, ptr %36, align 8, !tbaa !9
  br label %332

332:                                              ; preds = %442, %318
  %333 = load i64, ptr %23, align 8, !tbaa !9
  %334 = icmp slt i64 %333, 0
  br i1 %334, label %335, label %340

335:                                              ; preds = %332
  %336 = load i64, ptr %36, align 8, !tbaa !9
  %337 = load i64, ptr %22, align 8, !tbaa !9
  %338 = icmp sge i64 %336, %337
  %339 = zext i1 %338 to i32
  br label %345

340:                                              ; preds = %332
  %341 = load i64, ptr %36, align 8, !tbaa !9
  %342 = load i64, ptr %22, align 8, !tbaa !9
  %343 = icmp sle i64 %341, %342
  %344 = zext i1 %343 to i32
  br label %345

345:                                              ; preds = %340, %335
  %346 = phi i32 [ %339, %335 ], [ %344, %340 ]
  %347 = icmp ne i32 %346, 0
  br i1 %347, label %348, label %446

348:                                              ; preds = %345
  %349 = load double, ptr %48, align 8, !tbaa !11
  %350 = load double, ptr %57, align 8, !tbaa !11
  %351 = fcmp ole double %349, %350
  br i1 %351, label %352, label %353

352:                                              ; preds = %348
  br label %507

353:                                              ; preds = %348
  %354 = load i64, ptr %37, align 8, !tbaa !9
  store i64 %354, ptr %24, align 8, !tbaa !9
  %355 = load ptr, ptr %17, align 8, !tbaa !5
  %356 = load i64, ptr %24, align 8, !tbaa !9
  %357 = getelementptr inbounds %struct.doublecomplex, ptr %355, i64 %356
  %358 = getelementptr inbounds %struct.doublecomplex, ptr %357, i32 0, i32 0
  %359 = load double, ptr %358, align 8, !tbaa !16
  %360 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 0
  store double %359, ptr %360, align 8, !tbaa !16
  %361 = load ptr, ptr %17, align 8, !tbaa !5
  %362 = load i64, ptr %24, align 8, !tbaa !9
  %363 = getelementptr inbounds %struct.doublecomplex, ptr %361, i64 %362
  %364 = getelementptr inbounds %struct.doublecomplex, ptr %363, i32 0, i32 1
  %365 = load double, ptr %364, align 8, !tbaa !19
  %366 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 1
  store double %365, ptr %366, align 8, !tbaa !19
  %367 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 0
  %368 = load double, ptr %367, align 8, !tbaa !16
  store double %368, ptr %27, align 8, !tbaa !11
  %369 = load double, ptr %27, align 8, !tbaa !11
  %370 = fcmp oge double %369, 0.000000e+00
  br i1 %370, label %371, label %373

371:                                              ; preds = %353
  %372 = load double, ptr %27, align 8, !tbaa !11
  br label %376

373:                                              ; preds = %353
  %374 = load double, ptr %27, align 8, !tbaa !11
  %375 = fneg double %374
  br label %376

376:                                              ; preds = %373, %371
  %377 = phi double [ %372, %371 ], [ %375, %373 ]
  %378 = call double @d_imag(ptr noundef %46)
  store double %378, ptr %28, align 8, !tbaa !11
  %379 = load double, ptr %28, align 8, !tbaa !11
  %380 = fcmp oge double %379, 0.000000e+00
  br i1 %380, label %381, label %383

381:                                              ; preds = %376
  %382 = load double, ptr %28, align 8, !tbaa !11
  br label %386

383:                                              ; preds = %376
  %384 = load double, ptr %28, align 8, !tbaa !11
  %385 = fneg double %384
  br label %386

386:                                              ; preds = %383, %381
  %387 = phi double [ %382, %381 ], [ %385, %383 ]
  %388 = fadd double %377, %387
  store double %388, ptr %40, align 8, !tbaa !11
  %389 = load double, ptr %40, align 8, !tbaa !11
  %390 = load double, ptr %57, align 8, !tbaa !11
  %391 = fcmp oge double %389, %390
  br i1 %391, label %392, label %412

392:                                              ; preds = %386
  %393 = load double, ptr %43, align 8, !tbaa !11
  store double %393, ptr %27, align 8, !tbaa !11
  %394 = load double, ptr %40, align 8, !tbaa !11
  %395 = fcmp ole double 1.000000e+00, %394
  br i1 %395, label %396, label %397

396:                                              ; preds = %392
  br label %399

397:                                              ; preds = %392
  %398 = load double, ptr %40, align 8, !tbaa !11
  br label %399

399:                                              ; preds = %397, %396
  %400 = phi double [ 1.000000e+00, %396 ], [ %398, %397 ]
  %401 = load double, ptr %48, align 8, !tbaa !11
  %402 = fmul double %400, %401
  store double %402, ptr %28, align 8, !tbaa !11
  %403 = load double, ptr %27, align 8, !tbaa !11
  %404 = load double, ptr %28, align 8, !tbaa !11
  %405 = fcmp ole double %403, %404
  br i1 %405, label %406, label %408

406:                                              ; preds = %399
  %407 = load double, ptr %27, align 8, !tbaa !11
  br label %410

408:                                              ; preds = %399
  %409 = load double, ptr %28, align 8, !tbaa !11
  br label %410

410:                                              ; preds = %408, %406
  %411 = phi double [ %407, %406 ], [ %409, %408 ]
  store double %411, ptr %43, align 8, !tbaa !11
  br label %413

412:                                              ; preds = %386
  store double 0.000000e+00, ptr %43, align 8, !tbaa !11
  br label %413

413:                                              ; preds = %412, %410
  %414 = load double, ptr %40, align 8, !tbaa !11
  %415 = load ptr, ptr %20, align 8, !tbaa !5
  %416 = load i64, ptr %36, align 8, !tbaa !9
  %417 = getelementptr inbounds double, ptr %415, i64 %416
  %418 = load double, ptr %417, align 8, !tbaa !11
  %419 = fadd double %414, %418
  %420 = load double, ptr %57, align 8, !tbaa !11
  %421 = fcmp oge double %419, %420
  br i1 %421, label %422, label %433

422:                                              ; preds = %413
  %423 = load double, ptr %40, align 8, !tbaa !11
  %424 = load double, ptr %40, align 8, !tbaa !11
  %425 = load ptr, ptr %20, align 8, !tbaa !5
  %426 = load i64, ptr %36, align 8, !tbaa !9
  %427 = getelementptr inbounds double, ptr %425, i64 %426
  %428 = load double, ptr %427, align 8, !tbaa !11
  %429 = fadd double %424, %428
  %430 = fdiv double %423, %429
  %431 = load double, ptr %48, align 8, !tbaa !11
  %432 = fmul double %431, %430
  store double %432, ptr %48, align 8, !tbaa !11
  br label %434

433:                                              ; preds = %413
  store double 0.000000e+00, ptr %48, align 8, !tbaa !11
  br label %434

434:                                              ; preds = %433, %422
  %435 = load i64, ptr %41, align 8, !tbaa !9
  %436 = load i64, ptr %42, align 8, !tbaa !9
  %437 = mul nsw i64 %435, %436
  %438 = load i64, ptr %37, align 8, !tbaa !9
  %439 = add nsw i64 %438, %437
  store i64 %439, ptr %37, align 8, !tbaa !9
  %440 = load i64, ptr %42, align 8, !tbaa !9
  %441 = add nsw i64 %440, -1
  store i64 %441, ptr %42, align 8, !tbaa !9
  br label %442

442:                                              ; preds = %434
  %443 = load i64, ptr %23, align 8, !tbaa !9
  %444 = load i64, ptr %36, align 8, !tbaa !9
  %445 = add nsw i64 %444, %443
  store i64 %445, ptr %36, align 8, !tbaa !9
  br label %332, !llvm.loop !20

446:                                              ; preds = %345
  %447 = load double, ptr %43, align 8, !tbaa !11
  store double %447, ptr %48, align 8, !tbaa !11
  br label %506

448:                                              ; preds = %307
  store double 1.000000e+00, ptr %27, align 8, !tbaa !11
  %449 = load double, ptr %43, align 8, !tbaa !11
  %450 = load double, ptr %57, align 8, !tbaa !11
  %451 = fcmp oge double %449, %450
  br i1 %451, label %452, label %454

452:                                              ; preds = %448
  %453 = load double, ptr %43, align 8, !tbaa !11
  br label %456

454:                                              ; preds = %448
  %455 = load double, ptr %57, align 8, !tbaa !11
  br label %456

456:                                              ; preds = %454, %452
  %457 = phi double [ %453, %452 ], [ %455, %454 ]
  %458 = fdiv double 5.000000e-01, %457
  store double %458, ptr %28, align 8, !tbaa !11
  %459 = load double, ptr %27, align 8, !tbaa !11
  %460 = load double, ptr %28, align 8, !tbaa !11
  %461 = fcmp ole double %459, %460
  br i1 %461, label %462, label %464

462:                                              ; preds = %456
  %463 = load double, ptr %27, align 8, !tbaa !11
  br label %466

464:                                              ; preds = %456
  %465 = load double, ptr %28, align 8, !tbaa !11
  br label %466

466:                                              ; preds = %464, %462
  %467 = phi double [ %463, %462 ], [ %465, %464 ]
  store double %467, ptr %48, align 8, !tbaa !11
  %468 = load i64, ptr %51, align 8, !tbaa !9
  store i64 %468, ptr %23, align 8, !tbaa !9
  %469 = load i64, ptr %41, align 8, !tbaa !9
  store i64 %469, ptr %22, align 8, !tbaa !9
  %470 = load i64, ptr %56, align 8, !tbaa !9
  store i64 %470, ptr %36, align 8, !tbaa !9
  br label %471

471:                                              ; preds = %501, %466
  %472 = load i64, ptr %22, align 8, !tbaa !9
  %473 = icmp slt i64 %472, 0
  br i1 %473, label %474, label %479

474:                                              ; preds = %471
  %475 = load i64, ptr %36, align 8, !tbaa !9
  %476 = load i64, ptr %23, align 8, !tbaa !9
  %477 = icmp sge i64 %475, %476
  %478 = zext i1 %477 to i32
  br label %484

479:                                              ; preds = %471
  %480 = load i64, ptr %36, align 8, !tbaa !9
  %481 = load i64, ptr %23, align 8, !tbaa !9
  %482 = icmp sle i64 %480, %481
  %483 = zext i1 %482 to i32
  br label %484

484:                                              ; preds = %479, %474
  %485 = phi i32 [ %478, %474 ], [ %483, %479 ]
  %486 = icmp ne i32 %485, 0
  br i1 %486, label %487, label %505

487:                                              ; preds = %484
  %488 = load double, ptr %48, align 8, !tbaa !11
  %489 = load double, ptr %57, align 8, !tbaa !11
  %490 = fcmp ole double %488, %489
  br i1 %490, label %491, label %492

491:                                              ; preds = %487
  br label %507

492:                                              ; preds = %487
  %493 = load ptr, ptr %20, align 8, !tbaa !5
  %494 = load i64, ptr %36, align 8, !tbaa !9
  %495 = getelementptr inbounds double, ptr %493, i64 %494
  %496 = load double, ptr %495, align 8, !tbaa !11
  %497 = fadd double %496, 1.000000e+00
  %498 = fdiv double 1.000000e+00, %497
  %499 = load double, ptr %48, align 8, !tbaa !11
  %500 = fmul double %499, %498
  store double %500, ptr %48, align 8, !tbaa !11
  br label %501

501:                                              ; preds = %492
  %502 = load i64, ptr %22, align 8, !tbaa !9
  %503 = load i64, ptr %36, align 8, !tbaa !9
  %504 = add nsw i64 %503, %502
  store i64 %504, ptr %36, align 8, !tbaa !9
  br label %471, !llvm.loop !21

505:                                              ; preds = %484
  br label %506

506:                                              ; preds = %505, %446
  br label %507

507:                                              ; preds = %506, %491, %352, %306
  br label %716

508:                                              ; preds = %290
  %509 = load i64, ptr %53, align 8, !tbaa !9
  %510 = icmp ne i64 %509, 0
  br i1 %510, label %511, label %514

511:                                              ; preds = %508
  store i64 1, ptr %56, align 8, !tbaa !9
  %512 = load ptr, ptr %16, align 8, !tbaa !5
  %513 = load i64, ptr %512, align 8, !tbaa !9
  store i64 %513, ptr %51, align 8, !tbaa !9
  store i64 1, ptr %41, align 8, !tbaa !9
  br label %517

514:                                              ; preds = %508
  %515 = load ptr, ptr %16, align 8, !tbaa !5
  %516 = load i64, ptr %515, align 8, !tbaa !9
  store i64 %516, ptr %56, align 8, !tbaa !9
  store i64 1, ptr %51, align 8, !tbaa !9
  store i64 -1, ptr %41, align 8, !tbaa !9
  br label %517

517:                                              ; preds = %514, %511
  %518 = load double, ptr %49, align 8, !tbaa !11
  %519 = fcmp une double %518, 1.000000e+00
  br i1 %519, label %520, label %521

520:                                              ; preds = %517
  store double 0.000000e+00, ptr %48, align 8, !tbaa !11
  br label %715

521:                                              ; preds = %517
  %522 = load i64, ptr %58, align 8, !tbaa !9
  %523 = icmp ne i64 %522, 0
  br i1 %523, label %524, label %656

524:                                              ; preds = %521
  %525 = load double, ptr %43, align 8, !tbaa !11
  %526 = load double, ptr %57, align 8, !tbaa !11
  %527 = fcmp oge double %525, %526
  br i1 %527, label %528, label %530

528:                                              ; preds = %524
  %529 = load double, ptr %43, align 8, !tbaa !11
  br label %532

530:                                              ; preds = %524
  %531 = load double, ptr %57, align 8, !tbaa !11
  br label %532

532:                                              ; preds = %530, %528
  %533 = phi double [ %529, %528 ], [ %531, %530 ]
  %534 = fdiv double 5.000000e-01, %533
  store double %534, ptr %48, align 8, !tbaa !11
  %535 = load double, ptr %48, align 8, !tbaa !11
  store double %535, ptr %43, align 8, !tbaa !11
  %536 = load i64, ptr %56, align 8, !tbaa !9
  %537 = load i64, ptr %56, align 8, !tbaa !9
  %538 = add nsw i64 %537, 1
  %539 = mul nsw i64 %536, %538
  %540 = sdiv i64 %539, 2
  store i64 %540, ptr %37, align 8, !tbaa !9
  store i64 1, ptr %42, align 8, !tbaa !9
  %541 = load i64, ptr %51, align 8, !tbaa !9
  store i64 %541, ptr %22, align 8, !tbaa !9
  %542 = load i64, ptr %41, align 8, !tbaa !9
  store i64 %542, ptr %23, align 8, !tbaa !9
  %543 = load i64, ptr %56, align 8, !tbaa !9
  store i64 %543, ptr %36, align 8, !tbaa !9
  br label %544

544:                                              ; preds = %642, %532
  %545 = load i64, ptr %23, align 8, !tbaa !9
  %546 = icmp slt i64 %545, 0
  br i1 %546, label %547, label %552

547:                                              ; preds = %544
  %548 = load i64, ptr %36, align 8, !tbaa !9
  %549 = load i64, ptr %22, align 8, !tbaa !9
  %550 = icmp sge i64 %548, %549
  %551 = zext i1 %550 to i32
  br label %557

552:                                              ; preds = %544
  %553 = load i64, ptr %36, align 8, !tbaa !9
  %554 = load i64, ptr %22, align 8, !tbaa !9
  %555 = icmp sle i64 %553, %554
  %556 = zext i1 %555 to i32
  br label %557

557:                                              ; preds = %552, %547
  %558 = phi i32 [ %551, %547 ], [ %556, %552 ]
  %559 = icmp ne i32 %558, 0
  br i1 %559, label %560, label %646

560:                                              ; preds = %557
  %561 = load double, ptr %48, align 8, !tbaa !11
  %562 = load double, ptr %57, align 8, !tbaa !11
  %563 = fcmp ole double %561, %562
  br i1 %563, label %564, label %565

564:                                              ; preds = %560
  br label %715

565:                                              ; preds = %560
  %566 = load ptr, ptr %20, align 8, !tbaa !5
  %567 = load i64, ptr %36, align 8, !tbaa !9
  %568 = getelementptr inbounds double, ptr %566, i64 %567
  %569 = load double, ptr %568, align 8, !tbaa !11
  %570 = fadd double %569, 1.000000e+00
  store double %570, ptr %38, align 8, !tbaa !11
  %571 = load double, ptr %48, align 8, !tbaa !11
  store double %571, ptr %27, align 8, !tbaa !11
  %572 = load double, ptr %43, align 8, !tbaa !11
  %573 = load double, ptr %38, align 8, !tbaa !11
  %574 = fdiv double %572, %573
  store double %574, ptr %28, align 8, !tbaa !11
  %575 = load double, ptr %27, align 8, !tbaa !11
  %576 = load double, ptr %28, align 8, !tbaa !11
  %577 = fcmp ole double %575, %576
  br i1 %577, label %578, label %580

578:                                              ; preds = %565
  %579 = load double, ptr %27, align 8, !tbaa !11
  br label %582

580:                                              ; preds = %565
  %581 = load double, ptr %28, align 8, !tbaa !11
  br label %582

582:                                              ; preds = %580, %578
  %583 = phi double [ %579, %578 ], [ %581, %580 ]
  store double %583, ptr %48, align 8, !tbaa !11
  %584 = load i64, ptr %37, align 8, !tbaa !9
  store i64 %584, ptr %24, align 8, !tbaa !9
  %585 = load ptr, ptr %17, align 8, !tbaa !5
  %586 = load i64, ptr %24, align 8, !tbaa !9
  %587 = getelementptr inbounds %struct.doublecomplex, ptr %585, i64 %586
  %588 = getelementptr inbounds %struct.doublecomplex, ptr %587, i32 0, i32 0
  %589 = load double, ptr %588, align 8, !tbaa !16
  %590 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 0
  store double %589, ptr %590, align 8, !tbaa !16
  %591 = load ptr, ptr %17, align 8, !tbaa !5
  %592 = load i64, ptr %24, align 8, !tbaa !9
  %593 = getelementptr inbounds %struct.doublecomplex, ptr %591, i64 %592
  %594 = getelementptr inbounds %struct.doublecomplex, ptr %593, i32 0, i32 1
  %595 = load double, ptr %594, align 8, !tbaa !19
  %596 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 1
  store double %595, ptr %596, align 8, !tbaa !19
  %597 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 0
  %598 = load double, ptr %597, align 8, !tbaa !16
  store double %598, ptr %27, align 8, !tbaa !11
  %599 = load double, ptr %27, align 8, !tbaa !11
  %600 = fcmp oge double %599, 0.000000e+00
  br i1 %600, label %601, label %603

601:                                              ; preds = %582
  %602 = load double, ptr %27, align 8, !tbaa !11
  br label %606

603:                                              ; preds = %582
  %604 = load double, ptr %27, align 8, !tbaa !11
  %605 = fneg double %604
  br label %606

606:                                              ; preds = %603, %601
  %607 = phi double [ %602, %601 ], [ %605, %603 ]
  %608 = call double @d_imag(ptr noundef %46)
  store double %608, ptr %28, align 8, !tbaa !11
  %609 = load double, ptr %28, align 8, !tbaa !11
  %610 = fcmp oge double %609, 0.000000e+00
  br i1 %610, label %611, label %613

611:                                              ; preds = %606
  %612 = load double, ptr %28, align 8, !tbaa !11
  br label %616

613:                                              ; preds = %606
  %614 = load double, ptr %28, align 8, !tbaa !11
  %615 = fneg double %614
  br label %616

616:                                              ; preds = %613, %611
  %617 = phi double [ %612, %611 ], [ %615, %613 ]
  %618 = fadd double %607, %617
  store double %618, ptr %40, align 8, !tbaa !11
  %619 = load double, ptr %40, align 8, !tbaa !11
  %620 = load double, ptr %57, align 8, !tbaa !11
  %621 = fcmp oge double %619, %620
  br i1 %621, label %622, label %633

622:                                              ; preds = %616
  %623 = load double, ptr %38, align 8, !tbaa !11
  %624 = load double, ptr %40, align 8, !tbaa !11
  %625 = fcmp ogt double %623, %624
  br i1 %625, label %626, label %632

626:                                              ; preds = %622
  %627 = load double, ptr %40, align 8, !tbaa !11
  %628 = load double, ptr %38, align 8, !tbaa !11
  %629 = fdiv double %627, %628
  %630 = load double, ptr %43, align 8, !tbaa !11
  %631 = fmul double %630, %629
  store double %631, ptr %43, align 8, !tbaa !11
  br label %632

632:                                              ; preds = %626, %622
  br label %634

633:                                              ; preds = %616
  store double 0.000000e+00, ptr %43, align 8, !tbaa !11
  br label %634

634:                                              ; preds = %633, %632
  %635 = load i64, ptr %42, align 8, !tbaa !9
  %636 = add nsw i64 %635, 1
  store i64 %636, ptr %42, align 8, !tbaa !9
  %637 = load i64, ptr %41, align 8, !tbaa !9
  %638 = load i64, ptr %42, align 8, !tbaa !9
  %639 = mul nsw i64 %637, %638
  %640 = load i64, ptr %37, align 8, !tbaa !9
  %641 = add nsw i64 %640, %639
  store i64 %641, ptr %37, align 8, !tbaa !9
  br label %642

642:                                              ; preds = %634
  %643 = load i64, ptr %23, align 8, !tbaa !9
  %644 = load i64, ptr %36, align 8, !tbaa !9
  %645 = add nsw i64 %644, %643
  store i64 %645, ptr %36, align 8, !tbaa !9
  br label %544, !llvm.loop !22

646:                                              ; preds = %557
  %647 = load double, ptr %48, align 8, !tbaa !11
  %648 = load double, ptr %43, align 8, !tbaa !11
  %649 = fcmp ole double %647, %648
  br i1 %649, label %650, label %652

650:                                              ; preds = %646
  %651 = load double, ptr %48, align 8, !tbaa !11
  br label %654

652:                                              ; preds = %646
  %653 = load double, ptr %43, align 8, !tbaa !11
  br label %654

654:                                              ; preds = %652, %650
  %655 = phi double [ %651, %650 ], [ %653, %652 ]
  store double %655, ptr %48, align 8, !tbaa !11
  br label %714

656:                                              ; preds = %521
  store double 1.000000e+00, ptr %27, align 8, !tbaa !11
  %657 = load double, ptr %43, align 8, !tbaa !11
  %658 = load double, ptr %57, align 8, !tbaa !11
  %659 = fcmp oge double %657, %658
  br i1 %659, label %660, label %662

660:                                              ; preds = %656
  %661 = load double, ptr %43, align 8, !tbaa !11
  br label %664

662:                                              ; preds = %656
  %663 = load double, ptr %57, align 8, !tbaa !11
  br label %664

664:                                              ; preds = %662, %660
  %665 = phi double [ %661, %660 ], [ %663, %662 ]
  %666 = fdiv double 5.000000e-01, %665
  store double %666, ptr %28, align 8, !tbaa !11
  %667 = load double, ptr %27, align 8, !tbaa !11
  %668 = load double, ptr %28, align 8, !tbaa !11
  %669 = fcmp ole double %667, %668
  br i1 %669, label %670, label %672

670:                                              ; preds = %664
  %671 = load double, ptr %27, align 8, !tbaa !11
  br label %674

672:                                              ; preds = %664
  %673 = load double, ptr %28, align 8, !tbaa !11
  br label %674

674:                                              ; preds = %672, %670
  %675 = phi double [ %671, %670 ], [ %673, %672 ]
  store double %675, ptr %48, align 8, !tbaa !11
  %676 = load i64, ptr %51, align 8, !tbaa !9
  store i64 %676, ptr %23, align 8, !tbaa !9
  %677 = load i64, ptr %41, align 8, !tbaa !9
  store i64 %677, ptr %22, align 8, !tbaa !9
  %678 = load i64, ptr %56, align 8, !tbaa !9
  store i64 %678, ptr %36, align 8, !tbaa !9
  br label %679

679:                                              ; preds = %709, %674
  %680 = load i64, ptr %22, align 8, !tbaa !9
  %681 = icmp slt i64 %680, 0
  br i1 %681, label %682, label %687

682:                                              ; preds = %679
  %683 = load i64, ptr %36, align 8, !tbaa !9
  %684 = load i64, ptr %23, align 8, !tbaa !9
  %685 = icmp sge i64 %683, %684
  %686 = zext i1 %685 to i32
  br label %692

687:                                              ; preds = %679
  %688 = load i64, ptr %36, align 8, !tbaa !9
  %689 = load i64, ptr %23, align 8, !tbaa !9
  %690 = icmp sle i64 %688, %689
  %691 = zext i1 %690 to i32
  br label %692

692:                                              ; preds = %687, %682
  %693 = phi i32 [ %686, %682 ], [ %691, %687 ]
  %694 = icmp ne i32 %693, 0
  br i1 %694, label %695, label %713

695:                                              ; preds = %692
  %696 = load double, ptr %48, align 8, !tbaa !11
  %697 = load double, ptr %57, align 8, !tbaa !11
  %698 = fcmp ole double %696, %697
  br i1 %698, label %699, label %700

699:                                              ; preds = %695
  br label %715

700:                                              ; preds = %695
  %701 = load ptr, ptr %20, align 8, !tbaa !5
  %702 = load i64, ptr %36, align 8, !tbaa !9
  %703 = getelementptr inbounds double, ptr %701, i64 %702
  %704 = load double, ptr %703, align 8, !tbaa !11
  %705 = fadd double %704, 1.000000e+00
  store double %705, ptr %38, align 8, !tbaa !11
  %706 = load double, ptr %38, align 8, !tbaa !11
  %707 = load double, ptr %48, align 8, !tbaa !11
  %708 = fdiv double %707, %706
  store double %708, ptr %48, align 8, !tbaa !11
  br label %709

709:                                              ; preds = %700
  %710 = load i64, ptr %22, align 8, !tbaa !9
  %711 = load i64, ptr %36, align 8, !tbaa !9
  %712 = add nsw i64 %711, %710
  store i64 %712, ptr %36, align 8, !tbaa !9
  br label %679, !llvm.loop !23

713:                                              ; preds = %692
  br label %714

714:                                              ; preds = %713, %654
  br label %715

715:                                              ; preds = %714, %699, %564, %520
  br label %716

716:                                              ; preds = %715, %507
  %717 = load double, ptr %48, align 8, !tbaa !11
  %718 = load double, ptr %49, align 8, !tbaa !11
  %719 = fmul double %717, %718
  %720 = load double, ptr %57, align 8, !tbaa !11
  %721 = fcmp ogt double %719, %720
  br i1 %721, label %722, label %732

722:                                              ; preds = %716
  %723 = load ptr, ptr %12, align 8, !tbaa !5
  %724 = load ptr, ptr %13, align 8, !tbaa !5
  %725 = load ptr, ptr %14, align 8, !tbaa !5
  %726 = load ptr, ptr %16, align 8, !tbaa !5
  %727 = load ptr, ptr %17, align 8, !tbaa !5
  %728 = getelementptr inbounds %struct.doublecomplex, ptr %727, i64 1
  %729 = load ptr, ptr %18, align 8, !tbaa !5
  %730 = getelementptr inbounds %struct.doublecomplex, ptr %729, i64 1
  %731 = call i32 @f2c_ztpsv(ptr noundef %723, ptr noundef %724, ptr noundef %725, ptr noundef %726, ptr noundef %728, ptr noundef %730, ptr noundef @c__1)
  br label %2837

732:                                              ; preds = %716
  %733 = load double, ptr %47, align 8, !tbaa !11
  %734 = load double, ptr %54, align 8, !tbaa !11
  %735 = fmul double %734, 5.000000e-01
  %736 = fcmp ogt double %733, %735
  br i1 %736, label %737, label %749

737:                                              ; preds = %732
  %738 = load double, ptr %54, align 8, !tbaa !11
  %739 = fmul double %738, 5.000000e-01
  %740 = load double, ptr %47, align 8, !tbaa !11
  %741 = fdiv double %739, %740
  %742 = load ptr, ptr %19, align 8, !tbaa !5
  store double %741, ptr %742, align 8, !tbaa !11
  %743 = load ptr, ptr %16, align 8, !tbaa !5
  %744 = load ptr, ptr %19, align 8, !tbaa !5
  %745 = load ptr, ptr %18, align 8, !tbaa !5
  %746 = getelementptr inbounds %struct.doublecomplex, ptr %745, i64 1
  %747 = call i32 @f2c_zdscal(ptr noundef %743, ptr noundef %744, ptr noundef %746, ptr noundef @c__1)
  %748 = load double, ptr %54, align 8, !tbaa !11
  store double %748, ptr %47, align 8, !tbaa !11
  br label %752

749:                                              ; preds = %732
  %750 = load double, ptr %47, align 8, !tbaa !11
  %751 = fmul double %750, 2.000000e+00
  store double %751, ptr %47, align 8, !tbaa !11
  br label %752

752:                                              ; preds = %749, %737
  %753 = load i64, ptr %55, align 8, !tbaa !9
  %754 = icmp ne i64 %753, 0
  br i1 %754, label %755, label %1285

755:                                              ; preds = %752
  %756 = load i64, ptr %56, align 8, !tbaa !9
  %757 = load i64, ptr %56, align 8, !tbaa !9
  %758 = add nsw i64 %757, 1
  %759 = mul nsw i64 %756, %758
  %760 = sdiv i64 %759, 2
  store i64 %760, ptr %37, align 8, !tbaa !9
  %761 = load i64, ptr %51, align 8, !tbaa !9
  store i64 %761, ptr %22, align 8, !tbaa !9
  %762 = load i64, ptr %41, align 8, !tbaa !9
  store i64 %762, ptr %23, align 8, !tbaa !9
  %763 = load i64, ptr %56, align 8, !tbaa !9
  store i64 %763, ptr %36, align 8, !tbaa !9
  br label %764

764:                                              ; preds = %1280, %755
  %765 = load i64, ptr %23, align 8, !tbaa !9
  %766 = icmp slt i64 %765, 0
  br i1 %766, label %767, label %772

767:                                              ; preds = %764
  %768 = load i64, ptr %36, align 8, !tbaa !9
  %769 = load i64, ptr %22, align 8, !tbaa !9
  %770 = icmp sge i64 %768, %769
  %771 = zext i1 %770 to i32
  br label %777

772:                                              ; preds = %764
  %773 = load i64, ptr %36, align 8, !tbaa !9
  %774 = load i64, ptr %22, align 8, !tbaa !9
  %775 = icmp sle i64 %773, %774
  %776 = zext i1 %775 to i32
  br label %777

777:                                              ; preds = %772, %767
  %778 = phi i32 [ %771, %767 ], [ %776, %772 ]
  %779 = icmp ne i32 %778, 0
  br i1 %779, label %780, label %1284

780:                                              ; preds = %777
  %781 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %781, ptr %24, align 8, !tbaa !9
  %782 = load ptr, ptr %18, align 8, !tbaa !5
  %783 = load i64, ptr %24, align 8, !tbaa !9
  %784 = getelementptr inbounds %struct.doublecomplex, ptr %782, i64 %783
  %785 = getelementptr inbounds %struct.doublecomplex, ptr %784, i32 0, i32 0
  %786 = load double, ptr %785, align 8, !tbaa !16
  store double %786, ptr %27, align 8, !tbaa !11
  %787 = load double, ptr %27, align 8, !tbaa !11
  %788 = fcmp oge double %787, 0.000000e+00
  br i1 %788, label %789, label %791

789:                                              ; preds = %780
  %790 = load double, ptr %27, align 8, !tbaa !11
  br label %794

791:                                              ; preds = %780
  %792 = load double, ptr %27, align 8, !tbaa !11
  %793 = fneg double %792
  br label %794

794:                                              ; preds = %791, %789
  %795 = phi double [ %790, %789 ], [ %793, %791 ]
  %796 = load ptr, ptr %18, align 8, !tbaa !5
  %797 = load i64, ptr %36, align 8, !tbaa !9
  %798 = getelementptr inbounds %struct.doublecomplex, ptr %796, i64 %797
  %799 = call double @d_imag(ptr noundef %798)
  store double %799, ptr %28, align 8, !tbaa !11
  %800 = load double, ptr %28, align 8, !tbaa !11
  %801 = fcmp oge double %800, 0.000000e+00
  br i1 %801, label %802, label %804

802:                                              ; preds = %794
  %803 = load double, ptr %28, align 8, !tbaa !11
  br label %807

804:                                              ; preds = %794
  %805 = load double, ptr %28, align 8, !tbaa !11
  %806 = fneg double %805
  br label %807

807:                                              ; preds = %804, %802
  %808 = phi double [ %803, %802 ], [ %806, %804 ]
  %809 = fadd double %795, %808
  store double %809, ptr %38, align 8, !tbaa !11
  %810 = load i64, ptr %58, align 8, !tbaa !9
  %811 = icmp ne i64 %810, 0
  br i1 %811, label %812, label %836

812:                                              ; preds = %807
  %813 = load i64, ptr %37, align 8, !tbaa !9
  store i64 %813, ptr %24, align 8, !tbaa !9
  %814 = load double, ptr %49, align 8, !tbaa !11
  %815 = load ptr, ptr %17, align 8, !tbaa !5
  %816 = load i64, ptr %24, align 8, !tbaa !9
  %817 = getelementptr inbounds %struct.doublecomplex, ptr %815, i64 %816
  %818 = getelementptr inbounds %struct.doublecomplex, ptr %817, i32 0, i32 0
  %819 = load double, ptr %818, align 8, !tbaa !16
  %820 = fmul double %814, %819
  %821 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  store double %820, ptr %821, align 8, !tbaa !16
  %822 = load double, ptr %49, align 8, !tbaa !11
  %823 = load ptr, ptr %17, align 8, !tbaa !5
  %824 = load i64, ptr %24, align 8, !tbaa !9
  %825 = getelementptr inbounds %struct.doublecomplex, ptr %823, i64 %824
  %826 = getelementptr inbounds %struct.doublecomplex, ptr %825, i32 0, i32 1
  %827 = load double, ptr %826, align 8, !tbaa !19
  %828 = fmul double %822, %827
  %829 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  store double %828, ptr %829, align 8, !tbaa !19
  %830 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %831 = load double, ptr %830, align 8, !tbaa !16
  %832 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 0
  store double %831, ptr %832, align 8, !tbaa !16
  %833 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %834 = load double, ptr %833, align 8, !tbaa !19
  %835 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 1
  store double %834, ptr %835, align 8, !tbaa !19
  br label %844

836:                                              ; preds = %807
  %837 = load double, ptr %49, align 8, !tbaa !11
  %838 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 0
  store double %837, ptr %838, align 8, !tbaa !16
  %839 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 1
  store double 0.000000e+00, ptr %839, align 8, !tbaa !19
  %840 = load double, ptr %49, align 8, !tbaa !11
  %841 = fcmp oeq double %840, 1.000000e+00
  br i1 %841, label %842, label %843

842:                                              ; preds = %836
  br label %1058

843:                                              ; preds = %836
  br label %844

844:                                              ; preds = %843, %812
  %845 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 0
  %846 = load double, ptr %845, align 8, !tbaa !16
  store double %846, ptr %27, align 8, !tbaa !11
  %847 = load double, ptr %27, align 8, !tbaa !11
  %848 = fcmp oge double %847, 0.000000e+00
  br i1 %848, label %849, label %851

849:                                              ; preds = %844
  %850 = load double, ptr %27, align 8, !tbaa !11
  br label %854

851:                                              ; preds = %844
  %852 = load double, ptr %27, align 8, !tbaa !11
  %853 = fneg double %852
  br label %854

854:                                              ; preds = %851, %849
  %855 = phi double [ %850, %849 ], [ %853, %851 ]
  %856 = call double @d_imag(ptr noundef %46)
  store double %856, ptr %28, align 8, !tbaa !11
  %857 = load double, ptr %28, align 8, !tbaa !11
  %858 = fcmp oge double %857, 0.000000e+00
  br i1 %858, label %859, label %861

859:                                              ; preds = %854
  %860 = load double, ptr %28, align 8, !tbaa !11
  br label %864

861:                                              ; preds = %854
  %862 = load double, ptr %28, align 8, !tbaa !11
  %863 = fneg double %862
  br label %864

864:                                              ; preds = %861, %859
  %865 = phi double [ %860, %859 ], [ %863, %861 ]
  %866 = fadd double %855, %865
  store double %866, ptr %40, align 8, !tbaa !11
  %867 = load double, ptr %40, align 8, !tbaa !11
  %868 = load double, ptr %57, align 8, !tbaa !11
  %869 = fcmp ogt double %867, %868
  br i1 %869, label %870, label %940

870:                                              ; preds = %864
  %871 = load double, ptr %40, align 8, !tbaa !11
  %872 = fcmp olt double %871, 1.000000e+00
  br i1 %872, label %873, label %894

873:                                              ; preds = %870
  %874 = load double, ptr %38, align 8, !tbaa !11
  %875 = load double, ptr %40, align 8, !tbaa !11
  %876 = load double, ptr %54, align 8, !tbaa !11
  %877 = fmul double %875, %876
  %878 = fcmp ogt double %874, %877
  br i1 %878, label %879, label %893

879:                                              ; preds = %873
  %880 = load double, ptr %38, align 8, !tbaa !11
  %881 = fdiv double 1.000000e+00, %880
  store double %881, ptr %39, align 8, !tbaa !11
  %882 = load ptr, ptr %16, align 8, !tbaa !5
  %883 = load ptr, ptr %18, align 8, !tbaa !5
  %884 = getelementptr inbounds %struct.doublecomplex, ptr %883, i64 1
  %885 = call i32 @f2c_zdscal(ptr noundef %882, ptr noundef %39, ptr noundef %884, ptr noundef @c__1)
  %886 = load double, ptr %39, align 8, !tbaa !11
  %887 = load ptr, ptr %19, align 8, !tbaa !5
  %888 = load double, ptr %887, align 8, !tbaa !11
  %889 = fmul double %888, %886
  store double %889, ptr %887, align 8, !tbaa !11
  %890 = load double, ptr %39, align 8, !tbaa !11
  %891 = load double, ptr %47, align 8, !tbaa !11
  %892 = fmul double %891, %890
  store double %892, ptr %47, align 8, !tbaa !11
  br label %893

893:                                              ; preds = %879, %873
  br label %894

894:                                              ; preds = %893, %870
  %895 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %895, ptr %24, align 8, !tbaa !9
  %896 = load ptr, ptr %18, align 8, !tbaa !5
  %897 = load i64, ptr %36, align 8, !tbaa !9
  %898 = getelementptr inbounds %struct.doublecomplex, ptr %896, i64 %897
  call void @zladiv_(ptr noundef %31, ptr noundef %898, ptr noundef %46)
  %899 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %900 = load double, ptr %899, align 8, !tbaa !16
  %901 = load ptr, ptr %18, align 8, !tbaa !5
  %902 = load i64, ptr %24, align 8, !tbaa !9
  %903 = getelementptr inbounds %struct.doublecomplex, ptr %901, i64 %902
  %904 = getelementptr inbounds %struct.doublecomplex, ptr %903, i32 0, i32 0
  store double %900, ptr %904, align 8, !tbaa !16
  %905 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %906 = load double, ptr %905, align 8, !tbaa !19
  %907 = load ptr, ptr %18, align 8, !tbaa !5
  %908 = load i64, ptr %24, align 8, !tbaa !9
  %909 = getelementptr inbounds %struct.doublecomplex, ptr %907, i64 %908
  %910 = getelementptr inbounds %struct.doublecomplex, ptr %909, i32 0, i32 1
  store double %906, ptr %910, align 8, !tbaa !19
  %911 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %911, ptr %24, align 8, !tbaa !9
  %912 = load ptr, ptr %18, align 8, !tbaa !5
  %913 = load i64, ptr %24, align 8, !tbaa !9
  %914 = getelementptr inbounds %struct.doublecomplex, ptr %912, i64 %913
  %915 = getelementptr inbounds %struct.doublecomplex, ptr %914, i32 0, i32 0
  %916 = load double, ptr %915, align 8, !tbaa !16
  store double %916, ptr %27, align 8, !tbaa !11
  %917 = load double, ptr %27, align 8, !tbaa !11
  %918 = fcmp oge double %917, 0.000000e+00
  br i1 %918, label %919, label %921

919:                                              ; preds = %894
  %920 = load double, ptr %27, align 8, !tbaa !11
  br label %924

921:                                              ; preds = %894
  %922 = load double, ptr %27, align 8, !tbaa !11
  %923 = fneg double %922
  br label %924

924:                                              ; preds = %921, %919
  %925 = phi double [ %920, %919 ], [ %923, %921 ]
  %926 = load ptr, ptr %18, align 8, !tbaa !5
  %927 = load i64, ptr %36, align 8, !tbaa !9
  %928 = getelementptr inbounds %struct.doublecomplex, ptr %926, i64 %927
  %929 = call double @d_imag(ptr noundef %928)
  store double %929, ptr %28, align 8, !tbaa !11
  %930 = load double, ptr %28, align 8, !tbaa !11
  %931 = fcmp oge double %930, 0.000000e+00
  br i1 %931, label %932, label %934

932:                                              ; preds = %924
  %933 = load double, ptr %28, align 8, !tbaa !11
  br label %937

934:                                              ; preds = %924
  %935 = load double, ptr %28, align 8, !tbaa !11
  %936 = fneg double %935
  br label %937

937:                                              ; preds = %934, %932
  %938 = phi double [ %933, %932 ], [ %936, %934 ]
  %939 = fadd double %925, %938
  store double %939, ptr %38, align 8, !tbaa !11
  br label %1057

940:                                              ; preds = %864
  %941 = load double, ptr %40, align 8, !tbaa !11
  %942 = fcmp ogt double %941, 0.000000e+00
  br i1 %942, label %943, label %1025

943:                                              ; preds = %940
  %944 = load double, ptr %38, align 8, !tbaa !11
  %945 = load double, ptr %40, align 8, !tbaa !11
  %946 = load double, ptr %54, align 8, !tbaa !11
  %947 = fmul double %945, %946
  %948 = fcmp ogt double %944, %947
  br i1 %948, label %949, label %979

949:                                              ; preds = %943
  %950 = load double, ptr %40, align 8, !tbaa !11
  %951 = load double, ptr %54, align 8, !tbaa !11
  %952 = fmul double %950, %951
  %953 = load double, ptr %38, align 8, !tbaa !11
  %954 = fdiv double %952, %953
  store double %954, ptr %39, align 8, !tbaa !11
  %955 = load ptr, ptr %20, align 8, !tbaa !5
  %956 = load i64, ptr %36, align 8, !tbaa !9
  %957 = getelementptr inbounds double, ptr %955, i64 %956
  %958 = load double, ptr %957, align 8, !tbaa !11
  %959 = fcmp ogt double %958, 1.000000e+00
  br i1 %959, label %960, label %967

960:                                              ; preds = %949
  %961 = load ptr, ptr %20, align 8, !tbaa !5
  %962 = load i64, ptr %36, align 8, !tbaa !9
  %963 = getelementptr inbounds double, ptr %961, i64 %962
  %964 = load double, ptr %963, align 8, !tbaa !11
  %965 = load double, ptr %39, align 8, !tbaa !11
  %966 = fdiv double %965, %964
  store double %966, ptr %39, align 8, !tbaa !11
  br label %967

967:                                              ; preds = %960, %949
  %968 = load ptr, ptr %16, align 8, !tbaa !5
  %969 = load ptr, ptr %18, align 8, !tbaa !5
  %970 = getelementptr inbounds %struct.doublecomplex, ptr %969, i64 1
  %971 = call i32 @f2c_zdscal(ptr noundef %968, ptr noundef %39, ptr noundef %970, ptr noundef @c__1)
  %972 = load double, ptr %39, align 8, !tbaa !11
  %973 = load ptr, ptr %19, align 8, !tbaa !5
  %974 = load double, ptr %973, align 8, !tbaa !11
  %975 = fmul double %974, %972
  store double %975, ptr %973, align 8, !tbaa !11
  %976 = load double, ptr %39, align 8, !tbaa !11
  %977 = load double, ptr %47, align 8, !tbaa !11
  %978 = fmul double %977, %976
  store double %978, ptr %47, align 8, !tbaa !11
  br label %979

979:                                              ; preds = %967, %943
  %980 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %980, ptr %24, align 8, !tbaa !9
  %981 = load ptr, ptr %18, align 8, !tbaa !5
  %982 = load i64, ptr %36, align 8, !tbaa !9
  %983 = getelementptr inbounds %struct.doublecomplex, ptr %981, i64 %982
  call void @zladiv_(ptr noundef %31, ptr noundef %983, ptr noundef %46)
  %984 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %985 = load double, ptr %984, align 8, !tbaa !16
  %986 = load ptr, ptr %18, align 8, !tbaa !5
  %987 = load i64, ptr %24, align 8, !tbaa !9
  %988 = getelementptr inbounds %struct.doublecomplex, ptr %986, i64 %987
  %989 = getelementptr inbounds %struct.doublecomplex, ptr %988, i32 0, i32 0
  store double %985, ptr %989, align 8, !tbaa !16
  %990 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %991 = load double, ptr %990, align 8, !tbaa !19
  %992 = load ptr, ptr %18, align 8, !tbaa !5
  %993 = load i64, ptr %24, align 8, !tbaa !9
  %994 = getelementptr inbounds %struct.doublecomplex, ptr %992, i64 %993
  %995 = getelementptr inbounds %struct.doublecomplex, ptr %994, i32 0, i32 1
  store double %991, ptr %995, align 8, !tbaa !19
  %996 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %996, ptr %24, align 8, !tbaa !9
  %997 = load ptr, ptr %18, align 8, !tbaa !5
  %998 = load i64, ptr %24, align 8, !tbaa !9
  %999 = getelementptr inbounds %struct.doublecomplex, ptr %997, i64 %998
  %1000 = getelementptr inbounds %struct.doublecomplex, ptr %999, i32 0, i32 0
  %1001 = load double, ptr %1000, align 8, !tbaa !16
  store double %1001, ptr %27, align 8, !tbaa !11
  %1002 = load double, ptr %27, align 8, !tbaa !11
  %1003 = fcmp oge double %1002, 0.000000e+00
  br i1 %1003, label %1004, label %1006

1004:                                             ; preds = %979
  %1005 = load double, ptr %27, align 8, !tbaa !11
  br label %1009

1006:                                             ; preds = %979
  %1007 = load double, ptr %27, align 8, !tbaa !11
  %1008 = fneg double %1007
  br label %1009

1009:                                             ; preds = %1006, %1004
  %1010 = phi double [ %1005, %1004 ], [ %1008, %1006 ]
  %1011 = load ptr, ptr %18, align 8, !tbaa !5
  %1012 = load i64, ptr %36, align 8, !tbaa !9
  %1013 = getelementptr inbounds %struct.doublecomplex, ptr %1011, i64 %1012
  %1014 = call double @d_imag(ptr noundef %1013)
  store double %1014, ptr %28, align 8, !tbaa !11
  %1015 = load double, ptr %28, align 8, !tbaa !11
  %1016 = fcmp oge double %1015, 0.000000e+00
  br i1 %1016, label %1017, label %1019

1017:                                             ; preds = %1009
  %1018 = load double, ptr %28, align 8, !tbaa !11
  br label %1022

1019:                                             ; preds = %1009
  %1020 = load double, ptr %28, align 8, !tbaa !11
  %1021 = fneg double %1020
  br label %1022

1022:                                             ; preds = %1019, %1017
  %1023 = phi double [ %1018, %1017 ], [ %1021, %1019 ]
  %1024 = fadd double %1010, %1023
  store double %1024, ptr %38, align 8, !tbaa !11
  br label %1056

1025:                                             ; preds = %940
  %1026 = load ptr, ptr %16, align 8, !tbaa !5
  %1027 = load i64, ptr %1026, align 8, !tbaa !9
  store i64 %1027, ptr %24, align 8, !tbaa !9
  store i64 1, ptr %35, align 8, !tbaa !9
  br label %1028

1028:                                             ; preds = %1042, %1025
  %1029 = load i64, ptr %35, align 8, !tbaa !9
  %1030 = load i64, ptr %24, align 8, !tbaa !9
  %1031 = icmp sle i64 %1029, %1030
  br i1 %1031, label %1032, label %1045

1032:                                             ; preds = %1028
  %1033 = load i64, ptr %35, align 8, !tbaa !9
  store i64 %1033, ptr %25, align 8, !tbaa !9
  %1034 = load ptr, ptr %18, align 8, !tbaa !5
  %1035 = load i64, ptr %25, align 8, !tbaa !9
  %1036 = getelementptr inbounds %struct.doublecomplex, ptr %1034, i64 %1035
  %1037 = getelementptr inbounds %struct.doublecomplex, ptr %1036, i32 0, i32 0
  store double 0.000000e+00, ptr %1037, align 8, !tbaa !16
  %1038 = load ptr, ptr %18, align 8, !tbaa !5
  %1039 = load i64, ptr %25, align 8, !tbaa !9
  %1040 = getelementptr inbounds %struct.doublecomplex, ptr %1038, i64 %1039
  %1041 = getelementptr inbounds %struct.doublecomplex, ptr %1040, i32 0, i32 1
  store double 0.000000e+00, ptr %1041, align 8, !tbaa !19
  br label %1042

1042:                                             ; preds = %1032
  %1043 = load i64, ptr %35, align 8, !tbaa !9
  %1044 = add nsw i64 %1043, 1
  store i64 %1044, ptr %35, align 8, !tbaa !9
  br label %1028, !llvm.loop !24

1045:                                             ; preds = %1028
  %1046 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %1046, ptr %24, align 8, !tbaa !9
  %1047 = load ptr, ptr %18, align 8, !tbaa !5
  %1048 = load i64, ptr %24, align 8, !tbaa !9
  %1049 = getelementptr inbounds %struct.doublecomplex, ptr %1047, i64 %1048
  %1050 = getelementptr inbounds %struct.doublecomplex, ptr %1049, i32 0, i32 0
  store double 1.000000e+00, ptr %1050, align 8, !tbaa !16
  %1051 = load ptr, ptr %18, align 8, !tbaa !5
  %1052 = load i64, ptr %24, align 8, !tbaa !9
  %1053 = getelementptr inbounds %struct.doublecomplex, ptr %1051, i64 %1052
  %1054 = getelementptr inbounds %struct.doublecomplex, ptr %1053, i32 0, i32 1
  store double 0.000000e+00, ptr %1054, align 8, !tbaa !19
  store double 1.000000e+00, ptr %38, align 8, !tbaa !11
  %1055 = load ptr, ptr %19, align 8, !tbaa !5
  store double 0.000000e+00, ptr %1055, align 8, !tbaa !11
  store double 0.000000e+00, ptr %47, align 8, !tbaa !11
  br label %1056

1056:                                             ; preds = %1045, %1022
  br label %1057

1057:                                             ; preds = %1056, %937
  br label %1058

1058:                                             ; preds = %1057, %842
  %1059 = load double, ptr %38, align 8, !tbaa !11
  %1060 = fcmp ogt double %1059, 1.000000e+00
  br i1 %1060, label %1061, label %1086

1061:                                             ; preds = %1058
  %1062 = load double, ptr %38, align 8, !tbaa !11
  %1063 = fdiv double 1.000000e+00, %1062
  store double %1063, ptr %39, align 8, !tbaa !11
  %1064 = load ptr, ptr %20, align 8, !tbaa !5
  %1065 = load i64, ptr %36, align 8, !tbaa !9
  %1066 = getelementptr inbounds double, ptr %1064, i64 %1065
  %1067 = load double, ptr %1066, align 8, !tbaa !11
  %1068 = load double, ptr %54, align 8, !tbaa !11
  %1069 = load double, ptr %47, align 8, !tbaa !11
  %1070 = fsub double %1068, %1069
  %1071 = load double, ptr %39, align 8, !tbaa !11
  %1072 = fmul double %1070, %1071
  %1073 = fcmp ogt double %1067, %1072
  br i1 %1073, label %1074, label %1085

1074:                                             ; preds = %1061
  %1075 = load double, ptr %39, align 8, !tbaa !11
  %1076 = fmul double %1075, 5.000000e-01
  store double %1076, ptr %39, align 8, !tbaa !11
  %1077 = load ptr, ptr %16, align 8, !tbaa !5
  %1078 = load ptr, ptr %18, align 8, !tbaa !5
  %1079 = getelementptr inbounds %struct.doublecomplex, ptr %1078, i64 1
  %1080 = call i32 @f2c_zdscal(ptr noundef %1077, ptr noundef %39, ptr noundef %1079, ptr noundef @c__1)
  %1081 = load double, ptr %39, align 8, !tbaa !11
  %1082 = load ptr, ptr %19, align 8, !tbaa !5
  %1083 = load double, ptr %1082, align 8, !tbaa !11
  %1084 = fmul double %1083, %1081
  store double %1084, ptr %1082, align 8, !tbaa !11
  br label %1085

1085:                                             ; preds = %1074, %1061
  br label %1106

1086:                                             ; preds = %1058
  %1087 = load double, ptr %38, align 8, !tbaa !11
  %1088 = load ptr, ptr %20, align 8, !tbaa !5
  %1089 = load i64, ptr %36, align 8, !tbaa !9
  %1090 = getelementptr inbounds double, ptr %1088, i64 %1089
  %1091 = load double, ptr %1090, align 8, !tbaa !11
  %1092 = fmul double %1087, %1091
  %1093 = load double, ptr %54, align 8, !tbaa !11
  %1094 = load double, ptr %47, align 8, !tbaa !11
  %1095 = fsub double %1093, %1094
  %1096 = fcmp ogt double %1092, %1095
  br i1 %1096, label %1097, label %1105

1097:                                             ; preds = %1086
  %1098 = load ptr, ptr %16, align 8, !tbaa !5
  %1099 = load ptr, ptr %18, align 8, !tbaa !5
  %1100 = getelementptr inbounds %struct.doublecomplex, ptr %1099, i64 1
  %1101 = call i32 @f2c_zdscal(ptr noundef %1098, ptr noundef @c_b36, ptr noundef %1100, ptr noundef @c__1)
  %1102 = load ptr, ptr %19, align 8, !tbaa !5
  %1103 = load double, ptr %1102, align 8, !tbaa !11
  %1104 = fmul double %1103, 5.000000e-01
  store double %1104, ptr %1102, align 8, !tbaa !11
  br label %1105

1105:                                             ; preds = %1097, %1086
  br label %1106

1106:                                             ; preds = %1105, %1085
  %1107 = load i64, ptr %53, align 8, !tbaa !9
  %1108 = icmp ne i64 %1107, 0
  br i1 %1108, label %1109, label %1187

1109:                                             ; preds = %1106
  %1110 = load i64, ptr %36, align 8, !tbaa !9
  %1111 = icmp sgt i64 %1110, 1
  br i1 %1111, label %1112, label %1183

1112:                                             ; preds = %1109
  %1113 = load i64, ptr %36, align 8, !tbaa !9
  %1114 = sub nsw i64 %1113, 1
  store i64 %1114, ptr %24, align 8, !tbaa !9
  %1115 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %1115, ptr %25, align 8, !tbaa !9
  %1116 = load ptr, ptr %18, align 8, !tbaa !5
  %1117 = load i64, ptr %25, align 8, !tbaa !9
  %1118 = getelementptr inbounds %struct.doublecomplex, ptr %1116, i64 %1117
  %1119 = getelementptr inbounds %struct.doublecomplex, ptr %1118, i32 0, i32 0
  %1120 = load double, ptr %1119, align 8, !tbaa !16
  %1121 = fneg double %1120
  %1122 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 0
  store double %1121, ptr %1122, align 8, !tbaa !16
  %1123 = load ptr, ptr %18, align 8, !tbaa !5
  %1124 = load i64, ptr %25, align 8, !tbaa !9
  %1125 = getelementptr inbounds %struct.doublecomplex, ptr %1123, i64 %1124
  %1126 = getelementptr inbounds %struct.doublecomplex, ptr %1125, i32 0, i32 1
  %1127 = load double, ptr %1126, align 8, !tbaa !19
  %1128 = fneg double %1127
  %1129 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 1
  store double %1128, ptr %1129, align 8, !tbaa !19
  %1130 = load double, ptr %49, align 8, !tbaa !11
  %1131 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 0
  %1132 = load double, ptr %1131, align 8, !tbaa !16
  %1133 = fmul double %1130, %1132
  %1134 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  store double %1133, ptr %1134, align 8, !tbaa !16
  %1135 = load double, ptr %49, align 8, !tbaa !11
  %1136 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 1
  %1137 = load double, ptr %1136, align 8, !tbaa !19
  %1138 = fmul double %1135, %1137
  %1139 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  store double %1138, ptr %1139, align 8, !tbaa !19
  %1140 = load ptr, ptr %17, align 8, !tbaa !5
  %1141 = load i64, ptr %37, align 8, !tbaa !9
  %1142 = load i64, ptr %36, align 8, !tbaa !9
  %1143 = sub nsw i64 %1141, %1142
  %1144 = add nsw i64 %1143, 1
  %1145 = getelementptr inbounds %struct.doublecomplex, ptr %1140, i64 %1144
  %1146 = load ptr, ptr %18, align 8, !tbaa !5
  %1147 = getelementptr inbounds %struct.doublecomplex, ptr %1146, i64 1
  %1148 = call i32 @f2c_zaxpy(ptr noundef %24, ptr noundef %31, ptr noundef %1145, ptr noundef @c__1, ptr noundef %1147, ptr noundef @c__1)
  %1149 = load i64, ptr %36, align 8, !tbaa !9
  %1150 = sub nsw i64 %1149, 1
  store i64 %1150, ptr %24, align 8, !tbaa !9
  %1151 = load ptr, ptr %18, align 8, !tbaa !5
  %1152 = getelementptr inbounds %struct.doublecomplex, ptr %1151, i64 1
  %1153 = call i64 @f2c_izamax(ptr noundef %24, ptr noundef %1152, ptr noundef @c__1)
  store i64 %1153, ptr %35, align 8, !tbaa !9
  %1154 = load i64, ptr %35, align 8, !tbaa !9
  store i64 %1154, ptr %24, align 8, !tbaa !9
  %1155 = load ptr, ptr %18, align 8, !tbaa !5
  %1156 = load i64, ptr %24, align 8, !tbaa !9
  %1157 = getelementptr inbounds %struct.doublecomplex, ptr %1155, i64 %1156
  %1158 = getelementptr inbounds %struct.doublecomplex, ptr %1157, i32 0, i32 0
  %1159 = load double, ptr %1158, align 8, !tbaa !16
  store double %1159, ptr %27, align 8, !tbaa !11
  %1160 = load double, ptr %27, align 8, !tbaa !11
  %1161 = fcmp oge double %1160, 0.000000e+00
  br i1 %1161, label %1162, label %1164

1162:                                             ; preds = %1112
  %1163 = load double, ptr %27, align 8, !tbaa !11
  br label %1167

1164:                                             ; preds = %1112
  %1165 = load double, ptr %27, align 8, !tbaa !11
  %1166 = fneg double %1165
  br label %1167

1167:                                             ; preds = %1164, %1162
  %1168 = phi double [ %1163, %1162 ], [ %1166, %1164 ]
  %1169 = load ptr, ptr %18, align 8, !tbaa !5
  %1170 = load i64, ptr %35, align 8, !tbaa !9
  %1171 = getelementptr inbounds %struct.doublecomplex, ptr %1169, i64 %1170
  %1172 = call double @d_imag(ptr noundef %1171)
  store double %1172, ptr %28, align 8, !tbaa !11
  %1173 = load double, ptr %28, align 8, !tbaa !11
  %1174 = fcmp oge double %1173, 0.000000e+00
  br i1 %1174, label %1175, label %1177

1175:                                             ; preds = %1167
  %1176 = load double, ptr %28, align 8, !tbaa !11
  br label %1180

1177:                                             ; preds = %1167
  %1178 = load double, ptr %28, align 8, !tbaa !11
  %1179 = fneg double %1178
  br label %1180

1180:                                             ; preds = %1177, %1175
  %1181 = phi double [ %1176, %1175 ], [ %1179, %1177 ]
  %1182 = fadd double %1168, %1181
  store double %1182, ptr %47, align 8, !tbaa !11
  br label %1183

1183:                                             ; preds = %1180, %1109
  %1184 = load i64, ptr %36, align 8, !tbaa !9
  %1185 = load i64, ptr %37, align 8, !tbaa !9
  %1186 = sub nsw i64 %1185, %1184
  store i64 %1186, ptr %37, align 8, !tbaa !9
  br label %1279

1187:                                             ; preds = %1106
  %1188 = load i64, ptr %36, align 8, !tbaa !9
  %1189 = load ptr, ptr %16, align 8, !tbaa !5
  %1190 = load i64, ptr %1189, align 8, !tbaa !9
  %1191 = icmp slt i64 %1188, %1190
  br i1 %1191, label %1192, label %1271

1192:                                             ; preds = %1187
  %1193 = load ptr, ptr %16, align 8, !tbaa !5
  %1194 = load i64, ptr %1193, align 8, !tbaa !9
  %1195 = load i64, ptr %36, align 8, !tbaa !9
  %1196 = sub nsw i64 %1194, %1195
  store i64 %1196, ptr %24, align 8, !tbaa !9
  %1197 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %1197, ptr %25, align 8, !tbaa !9
  %1198 = load ptr, ptr %18, align 8, !tbaa !5
  %1199 = load i64, ptr %25, align 8, !tbaa !9
  %1200 = getelementptr inbounds %struct.doublecomplex, ptr %1198, i64 %1199
  %1201 = getelementptr inbounds %struct.doublecomplex, ptr %1200, i32 0, i32 0
  %1202 = load double, ptr %1201, align 8, !tbaa !16
  %1203 = fneg double %1202
  %1204 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 0
  store double %1203, ptr %1204, align 8, !tbaa !16
  %1205 = load ptr, ptr %18, align 8, !tbaa !5
  %1206 = load i64, ptr %25, align 8, !tbaa !9
  %1207 = getelementptr inbounds %struct.doublecomplex, ptr %1205, i64 %1206
  %1208 = getelementptr inbounds %struct.doublecomplex, ptr %1207, i32 0, i32 1
  %1209 = load double, ptr %1208, align 8, !tbaa !19
  %1210 = fneg double %1209
  %1211 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 1
  store double %1210, ptr %1211, align 8, !tbaa !19
  %1212 = load double, ptr %49, align 8, !tbaa !11
  %1213 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 0
  %1214 = load double, ptr %1213, align 8, !tbaa !16
  %1215 = fmul double %1212, %1214
  %1216 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  store double %1215, ptr %1216, align 8, !tbaa !16
  %1217 = load double, ptr %49, align 8, !tbaa !11
  %1218 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 1
  %1219 = load double, ptr %1218, align 8, !tbaa !19
  %1220 = fmul double %1217, %1219
  %1221 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  store double %1220, ptr %1221, align 8, !tbaa !19
  %1222 = load ptr, ptr %17, align 8, !tbaa !5
  %1223 = load i64, ptr %37, align 8, !tbaa !9
  %1224 = add nsw i64 %1223, 1
  %1225 = getelementptr inbounds %struct.doublecomplex, ptr %1222, i64 %1224
  %1226 = load ptr, ptr %18, align 8, !tbaa !5
  %1227 = load i64, ptr %36, align 8, !tbaa !9
  %1228 = add nsw i64 %1227, 1
  %1229 = getelementptr inbounds %struct.doublecomplex, ptr %1226, i64 %1228
  %1230 = call i32 @f2c_zaxpy(ptr noundef %24, ptr noundef %31, ptr noundef %1225, ptr noundef @c__1, ptr noundef %1229, ptr noundef @c__1)
  %1231 = load ptr, ptr %16, align 8, !tbaa !5
  %1232 = load i64, ptr %1231, align 8, !tbaa !9
  %1233 = load i64, ptr %36, align 8, !tbaa !9
  %1234 = sub nsw i64 %1232, %1233
  store i64 %1234, ptr %24, align 8, !tbaa !9
  %1235 = load i64, ptr %36, align 8, !tbaa !9
  %1236 = load ptr, ptr %18, align 8, !tbaa !5
  %1237 = load i64, ptr %36, align 8, !tbaa !9
  %1238 = add nsw i64 %1237, 1
  %1239 = getelementptr inbounds %struct.doublecomplex, ptr %1236, i64 %1238
  %1240 = call i64 @f2c_izamax(ptr noundef %24, ptr noundef %1239, ptr noundef @c__1)
  %1241 = add nsw i64 %1235, %1240
  store i64 %1241, ptr %35, align 8, !tbaa !9
  %1242 = load i64, ptr %35, align 8, !tbaa !9
  store i64 %1242, ptr %24, align 8, !tbaa !9
  %1243 = load ptr, ptr %18, align 8, !tbaa !5
  %1244 = load i64, ptr %24, align 8, !tbaa !9
  %1245 = getelementptr inbounds %struct.doublecomplex, ptr %1243, i64 %1244
  %1246 = getelementptr inbounds %struct.doublecomplex, ptr %1245, i32 0, i32 0
  %1247 = load double, ptr %1246, align 8, !tbaa !16
  store double %1247, ptr %27, align 8, !tbaa !11
  %1248 = load double, ptr %27, align 8, !tbaa !11
  %1249 = fcmp oge double %1248, 0.000000e+00
  br i1 %1249, label %1250, label %1252

1250:                                             ; preds = %1192
  %1251 = load double, ptr %27, align 8, !tbaa !11
  br label %1255

1252:                                             ; preds = %1192
  %1253 = load double, ptr %27, align 8, !tbaa !11
  %1254 = fneg double %1253
  br label %1255

1255:                                             ; preds = %1252, %1250
  %1256 = phi double [ %1251, %1250 ], [ %1254, %1252 ]
  %1257 = load ptr, ptr %18, align 8, !tbaa !5
  %1258 = load i64, ptr %35, align 8, !tbaa !9
  %1259 = getelementptr inbounds %struct.doublecomplex, ptr %1257, i64 %1258
  %1260 = call double @d_imag(ptr noundef %1259)
  store double %1260, ptr %28, align 8, !tbaa !11
  %1261 = load double, ptr %28, align 8, !tbaa !11
  %1262 = fcmp oge double %1261, 0.000000e+00
  br i1 %1262, label %1263, label %1265

1263:                                             ; preds = %1255
  %1264 = load double, ptr %28, align 8, !tbaa !11
  br label %1268

1265:                                             ; preds = %1255
  %1266 = load double, ptr %28, align 8, !tbaa !11
  %1267 = fneg double %1266
  br label %1268

1268:                                             ; preds = %1265, %1263
  %1269 = phi double [ %1264, %1263 ], [ %1267, %1265 ]
  %1270 = fadd double %1256, %1269
  store double %1270, ptr %47, align 8, !tbaa !11
  br label %1271

1271:                                             ; preds = %1268, %1187
  %1272 = load i64, ptr %37, align 8, !tbaa !9
  %1273 = load ptr, ptr %16, align 8, !tbaa !5
  %1274 = load i64, ptr %1273, align 8, !tbaa !9
  %1275 = add nsw i64 %1272, %1274
  %1276 = load i64, ptr %36, align 8, !tbaa !9
  %1277 = sub nsw i64 %1275, %1276
  %1278 = add nsw i64 %1277, 1
  store i64 %1278, ptr %37, align 8, !tbaa !9
  br label %1279

1279:                                             ; preds = %1271, %1183
  br label %1280

1280:                                             ; preds = %1279
  %1281 = load i64, ptr %23, align 8, !tbaa !9
  %1282 = load i64, ptr %36, align 8, !tbaa !9
  %1283 = add nsw i64 %1282, %1281
  store i64 %1283, ptr %36, align 8, !tbaa !9
  br label %764, !llvm.loop !25

1284:                                             ; preds = %777
  br label %2832

1285:                                             ; preds = %752
  %1286 = load ptr, ptr %13, align 8, !tbaa !5
  %1287 = call i64 @lsame_(ptr noundef %1286, ptr noundef @.str.3)
  %1288 = icmp ne i64 %1287, 0
  br i1 %1288, label %1289, label %2074

1289:                                             ; preds = %1285
  %1290 = load i64, ptr %56, align 8, !tbaa !9
  %1291 = load i64, ptr %56, align 8, !tbaa !9
  %1292 = add nsw i64 %1291, 1
  %1293 = mul nsw i64 %1290, %1292
  %1294 = sdiv i64 %1293, 2
  store i64 %1294, ptr %37, align 8, !tbaa !9
  store i64 1, ptr %42, align 8, !tbaa !9
  %1295 = load i64, ptr %51, align 8, !tbaa !9
  store i64 %1295, ptr %23, align 8, !tbaa !9
  %1296 = load i64, ptr %41, align 8, !tbaa !9
  store i64 %1296, ptr %22, align 8, !tbaa !9
  %1297 = load i64, ptr %56, align 8, !tbaa !9
  store i64 %1297, ptr %36, align 8, !tbaa !9
  br label %1298

1298:                                             ; preds = %2069, %1289
  %1299 = load i64, ptr %22, align 8, !tbaa !9
  %1300 = icmp slt i64 %1299, 0
  br i1 %1300, label %1301, label %1306

1301:                                             ; preds = %1298
  %1302 = load i64, ptr %36, align 8, !tbaa !9
  %1303 = load i64, ptr %23, align 8, !tbaa !9
  %1304 = icmp sge i64 %1302, %1303
  %1305 = zext i1 %1304 to i32
  br label %1311

1306:                                             ; preds = %1298
  %1307 = load i64, ptr %36, align 8, !tbaa !9
  %1308 = load i64, ptr %23, align 8, !tbaa !9
  %1309 = icmp sle i64 %1307, %1308
  %1310 = zext i1 %1309 to i32
  br label %1311

1311:                                             ; preds = %1306, %1301
  %1312 = phi i32 [ %1305, %1301 ], [ %1310, %1306 ]
  %1313 = icmp ne i32 %1312, 0
  br i1 %1313, label %1314, label %2073

1314:                                             ; preds = %1311
  %1315 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %1315, ptr %24, align 8, !tbaa !9
  %1316 = load ptr, ptr %18, align 8, !tbaa !5
  %1317 = load i64, ptr %24, align 8, !tbaa !9
  %1318 = getelementptr inbounds %struct.doublecomplex, ptr %1316, i64 %1317
  %1319 = getelementptr inbounds %struct.doublecomplex, ptr %1318, i32 0, i32 0
  %1320 = load double, ptr %1319, align 8, !tbaa !16
  store double %1320, ptr %27, align 8, !tbaa !11
  %1321 = load double, ptr %27, align 8, !tbaa !11
  %1322 = fcmp oge double %1321, 0.000000e+00
  br i1 %1322, label %1323, label %1325

1323:                                             ; preds = %1314
  %1324 = load double, ptr %27, align 8, !tbaa !11
  br label %1328

1325:                                             ; preds = %1314
  %1326 = load double, ptr %27, align 8, !tbaa !11
  %1327 = fneg double %1326
  br label %1328

1328:                                             ; preds = %1325, %1323
  %1329 = phi double [ %1324, %1323 ], [ %1327, %1325 ]
  %1330 = load ptr, ptr %18, align 8, !tbaa !5
  %1331 = load i64, ptr %36, align 8, !tbaa !9
  %1332 = getelementptr inbounds %struct.doublecomplex, ptr %1330, i64 %1331
  %1333 = call double @d_imag(ptr noundef %1332)
  store double %1333, ptr %28, align 8, !tbaa !11
  %1334 = load double, ptr %28, align 8, !tbaa !11
  %1335 = fcmp oge double %1334, 0.000000e+00
  br i1 %1335, label %1336, label %1338

1336:                                             ; preds = %1328
  %1337 = load double, ptr %28, align 8, !tbaa !11
  br label %1341

1338:                                             ; preds = %1328
  %1339 = load double, ptr %28, align 8, !tbaa !11
  %1340 = fneg double %1339
  br label %1341

1341:                                             ; preds = %1338, %1336
  %1342 = phi double [ %1337, %1336 ], [ %1340, %1338 ]
  %1343 = fadd double %1329, %1342
  store double %1343, ptr %38, align 8, !tbaa !11
  %1344 = load double, ptr %49, align 8, !tbaa !11
  %1345 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 0
  store double %1344, ptr %1345, align 8, !tbaa !16
  %1346 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 1
  store double 0.000000e+00, ptr %1346, align 8, !tbaa !19
  %1347 = load double, ptr %47, align 8, !tbaa !11
  %1348 = fcmp oge double %1347, 1.000000e+00
  br i1 %1348, label %1349, label %1351

1349:                                             ; preds = %1341
  %1350 = load double, ptr %47, align 8, !tbaa !11
  br label %1352

1351:                                             ; preds = %1341
  br label %1352

1352:                                             ; preds = %1351, %1349
  %1353 = phi double [ %1350, %1349 ], [ 1.000000e+00, %1351 ]
  %1354 = fdiv double 1.000000e+00, %1353
  store double %1354, ptr %39, align 8, !tbaa !11
  %1355 = load ptr, ptr %20, align 8, !tbaa !5
  %1356 = load i64, ptr %36, align 8, !tbaa !9
  %1357 = getelementptr inbounds double, ptr %1355, i64 %1356
  %1358 = load double, ptr %1357, align 8, !tbaa !11
  %1359 = load double, ptr %54, align 8, !tbaa !11
  %1360 = load double, ptr %38, align 8, !tbaa !11
  %1361 = fsub double %1359, %1360
  %1362 = load double, ptr %39, align 8, !tbaa !11
  %1363 = fmul double %1361, %1362
  %1364 = fcmp ogt double %1358, %1363
  br i1 %1364, label %1365, label %1458

1365:                                             ; preds = %1352
  %1366 = load double, ptr %39, align 8, !tbaa !11
  %1367 = fmul double %1366, 5.000000e-01
  store double %1367, ptr %39, align 8, !tbaa !11
  %1368 = load i64, ptr %58, align 8, !tbaa !9
  %1369 = icmp ne i64 %1368, 0
  br i1 %1369, label %1370, label %1394

1370:                                             ; preds = %1365
  %1371 = load i64, ptr %37, align 8, !tbaa !9
  store i64 %1371, ptr %24, align 8, !tbaa !9
  %1372 = load double, ptr %49, align 8, !tbaa !11
  %1373 = load ptr, ptr %17, align 8, !tbaa !5
  %1374 = load i64, ptr %24, align 8, !tbaa !9
  %1375 = getelementptr inbounds %struct.doublecomplex, ptr %1373, i64 %1374
  %1376 = getelementptr inbounds %struct.doublecomplex, ptr %1375, i32 0, i32 0
  %1377 = load double, ptr %1376, align 8, !tbaa !16
  %1378 = fmul double %1372, %1377
  %1379 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  store double %1378, ptr %1379, align 8, !tbaa !16
  %1380 = load double, ptr %49, align 8, !tbaa !11
  %1381 = load ptr, ptr %17, align 8, !tbaa !5
  %1382 = load i64, ptr %24, align 8, !tbaa !9
  %1383 = getelementptr inbounds %struct.doublecomplex, ptr %1381, i64 %1382
  %1384 = getelementptr inbounds %struct.doublecomplex, ptr %1383, i32 0, i32 1
  %1385 = load double, ptr %1384, align 8, !tbaa !19
  %1386 = fmul double %1380, %1385
  %1387 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  store double %1386, ptr %1387, align 8, !tbaa !19
  %1388 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %1389 = load double, ptr %1388, align 8, !tbaa !16
  %1390 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 0
  store double %1389, ptr %1390, align 8, !tbaa !16
  %1391 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %1392 = load double, ptr %1391, align 8, !tbaa !19
  %1393 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 1
  store double %1392, ptr %1393, align 8, !tbaa !19
  br label %1398

1394:                                             ; preds = %1365
  %1395 = load double, ptr %49, align 8, !tbaa !11
  %1396 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 0
  store double %1395, ptr %1396, align 8, !tbaa !16
  %1397 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 1
  store double 0.000000e+00, ptr %1397, align 8, !tbaa !19
  br label %1398

1398:                                             ; preds = %1394, %1370
  %1399 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 0
  %1400 = load double, ptr %1399, align 8, !tbaa !16
  store double %1400, ptr %27, align 8, !tbaa !11
  %1401 = load double, ptr %27, align 8, !tbaa !11
  %1402 = fcmp oge double %1401, 0.000000e+00
  br i1 %1402, label %1403, label %1405

1403:                                             ; preds = %1398
  %1404 = load double, ptr %27, align 8, !tbaa !11
  br label %1408

1405:                                             ; preds = %1398
  %1406 = load double, ptr %27, align 8, !tbaa !11
  %1407 = fneg double %1406
  br label %1408

1408:                                             ; preds = %1405, %1403
  %1409 = phi double [ %1404, %1403 ], [ %1407, %1405 ]
  %1410 = call double @d_imag(ptr noundef %46)
  store double %1410, ptr %28, align 8, !tbaa !11
  %1411 = load double, ptr %28, align 8, !tbaa !11
  %1412 = fcmp oge double %1411, 0.000000e+00
  br i1 %1412, label %1413, label %1415

1413:                                             ; preds = %1408
  %1414 = load double, ptr %28, align 8, !tbaa !11
  br label %1418

1415:                                             ; preds = %1408
  %1416 = load double, ptr %28, align 8, !tbaa !11
  %1417 = fneg double %1416
  br label %1418

1418:                                             ; preds = %1415, %1413
  %1419 = phi double [ %1414, %1413 ], [ %1417, %1415 ]
  %1420 = fadd double %1409, %1419
  store double %1420, ptr %40, align 8, !tbaa !11
  %1421 = load double, ptr %40, align 8, !tbaa !11
  %1422 = fcmp ogt double %1421, 1.000000e+00
  br i1 %1422, label %1423, label %1442

1423:                                             ; preds = %1418
  store double 1.000000e+00, ptr %27, align 8, !tbaa !11
  %1424 = load double, ptr %39, align 8, !tbaa !11
  %1425 = load double, ptr %40, align 8, !tbaa !11
  %1426 = fmul double %1424, %1425
  store double %1426, ptr %28, align 8, !tbaa !11
  %1427 = load double, ptr %27, align 8, !tbaa !11
  %1428 = load double, ptr %28, align 8, !tbaa !11
  %1429 = fcmp ole double %1427, %1428
  br i1 %1429, label %1430, label %1432

1430:                                             ; preds = %1423
  %1431 = load double, ptr %27, align 8, !tbaa !11
  br label %1434

1432:                                             ; preds = %1423
  %1433 = load double, ptr %28, align 8, !tbaa !11
  br label %1434

1434:                                             ; preds = %1432, %1430
  %1435 = phi double [ %1431, %1430 ], [ %1433, %1432 ]
  store double %1435, ptr %39, align 8, !tbaa !11
  call void @zladiv_(ptr noundef %31, ptr noundef %50, ptr noundef %46)
  %1436 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %1437 = load double, ptr %1436, align 8, !tbaa !16
  %1438 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 0
  store double %1437, ptr %1438, align 8, !tbaa !16
  %1439 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %1440 = load double, ptr %1439, align 8, !tbaa !19
  %1441 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 1
  store double %1440, ptr %1441, align 8, !tbaa !19
  br label %1442

1442:                                             ; preds = %1434, %1418
  %1443 = load double, ptr %39, align 8, !tbaa !11
  %1444 = fcmp olt double %1443, 1.000000e+00
  br i1 %1444, label %1445, label %1457

1445:                                             ; preds = %1442
  %1446 = load ptr, ptr %16, align 8, !tbaa !5
  %1447 = load ptr, ptr %18, align 8, !tbaa !5
  %1448 = getelementptr inbounds %struct.doublecomplex, ptr %1447, i64 1
  %1449 = call i32 @f2c_zdscal(ptr noundef %1446, ptr noundef %39, ptr noundef %1448, ptr noundef @c__1)
  %1450 = load double, ptr %39, align 8, !tbaa !11
  %1451 = load ptr, ptr %19, align 8, !tbaa !5
  %1452 = load double, ptr %1451, align 8, !tbaa !11
  %1453 = fmul double %1452, %1450
  store double %1453, ptr %1451, align 8, !tbaa !11
  %1454 = load double, ptr %39, align 8, !tbaa !11
  %1455 = load double, ptr %47, align 8, !tbaa !11
  %1456 = fmul double %1455, %1454
  store double %1456, ptr %47, align 8, !tbaa !11
  br label %1457

1457:                                             ; preds = %1445, %1442
  br label %1458

1458:                                             ; preds = %1457, %1352
  %1459 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 0
  store double 0.000000e+00, ptr %1459, align 8, !tbaa !16
  %1460 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 1
  store double 0.000000e+00, ptr %1460, align 8, !tbaa !19
  %1461 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 0
  %1462 = load double, ptr %1461, align 8, !tbaa !16
  %1463 = fcmp oeq double %1462, 1.000000e+00
  br i1 %1463, label %1464, label %1514

1464:                                             ; preds = %1458
  %1465 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 1
  %1466 = load double, ptr %1465, align 8, !tbaa !19
  %1467 = fcmp oeq double %1466, 0.000000e+00
  br i1 %1467, label %1468, label %1514

1468:                                             ; preds = %1464
  %1469 = load i64, ptr %53, align 8, !tbaa !9
  %1470 = icmp ne i64 %1469, 0
  br i1 %1470, label %1471, label %1488

1471:                                             ; preds = %1468
  %1472 = load i64, ptr %36, align 8, !tbaa !9
  %1473 = sub nsw i64 %1472, 1
  store i64 %1473, ptr %24, align 8, !tbaa !9
  %1474 = load ptr, ptr %17, align 8, !tbaa !5
  %1475 = load i64, ptr %37, align 8, !tbaa !9
  %1476 = load i64, ptr %36, align 8, !tbaa !9
  %1477 = sub nsw i64 %1475, %1476
  %1478 = add nsw i64 %1477, 1
  %1479 = getelementptr inbounds %struct.doublecomplex, ptr %1474, i64 %1478
  %1480 = load ptr, ptr %18, align 8, !tbaa !5
  %1481 = getelementptr inbounds %struct.doublecomplex, ptr %1480, i64 1
  call void @f2c_zdotu(ptr noundef %31, ptr noundef %24, ptr noundef %1479, ptr noundef @c__1, ptr noundef %1481, ptr noundef @c__1)
  %1482 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %1483 = load double, ptr %1482, align 8, !tbaa !16
  %1484 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 0
  store double %1483, ptr %1484, align 8, !tbaa !16
  %1485 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %1486 = load double, ptr %1485, align 8, !tbaa !19
  %1487 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 1
  store double %1486, ptr %1487, align 8, !tbaa !19
  br label %1513

1488:                                             ; preds = %1468
  %1489 = load i64, ptr %36, align 8, !tbaa !9
  %1490 = load ptr, ptr %16, align 8, !tbaa !5
  %1491 = load i64, ptr %1490, align 8, !tbaa !9
  %1492 = icmp slt i64 %1489, %1491
  br i1 %1492, label %1493, label %1512

1493:                                             ; preds = %1488
  %1494 = load ptr, ptr %16, align 8, !tbaa !5
  %1495 = load i64, ptr %1494, align 8, !tbaa !9
  %1496 = load i64, ptr %36, align 8, !tbaa !9
  %1497 = sub nsw i64 %1495, %1496
  store i64 %1497, ptr %24, align 8, !tbaa !9
  %1498 = load ptr, ptr %17, align 8, !tbaa !5
  %1499 = load i64, ptr %37, align 8, !tbaa !9
  %1500 = add nsw i64 %1499, 1
  %1501 = getelementptr inbounds %struct.doublecomplex, ptr %1498, i64 %1500
  %1502 = load ptr, ptr %18, align 8, !tbaa !5
  %1503 = load i64, ptr %36, align 8, !tbaa !9
  %1504 = add nsw i64 %1503, 1
  %1505 = getelementptr inbounds %struct.doublecomplex, ptr %1502, i64 %1504
  call void @f2c_zdotu(ptr noundef %31, ptr noundef %24, ptr noundef %1501, ptr noundef @c__1, ptr noundef %1505, ptr noundef @c__1)
  %1506 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %1507 = load double, ptr %1506, align 8, !tbaa !16
  %1508 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 0
  store double %1507, ptr %1508, align 8, !tbaa !16
  %1509 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %1510 = load double, ptr %1509, align 8, !tbaa !19
  %1511 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 1
  store double %1510, ptr %1511, align 8, !tbaa !19
  br label %1512

1512:                                             ; preds = %1493, %1488
  br label %1513

1513:                                             ; preds = %1512, %1471
  br label %1738

1514:                                             ; preds = %1464, %1458
  %1515 = load i64, ptr %53, align 8, !tbaa !9
  %1516 = icmp ne i64 %1515, 0
  br i1 %1516, label %1517, label %1623

1517:                                             ; preds = %1514
  %1518 = load i64, ptr %36, align 8, !tbaa !9
  %1519 = sub nsw i64 %1518, 1
  store i64 %1519, ptr %24, align 8, !tbaa !9
  store i64 1, ptr %35, align 8, !tbaa !9
  br label %1520

1520:                                             ; preds = %1619, %1517
  %1521 = load i64, ptr %35, align 8, !tbaa !9
  %1522 = load i64, ptr %24, align 8, !tbaa !9
  %1523 = icmp sle i64 %1521, %1522
  br i1 %1523, label %1524, label %1622

1524:                                             ; preds = %1520
  %1525 = load i64, ptr %37, align 8, !tbaa !9
  %1526 = load i64, ptr %36, align 8, !tbaa !9
  %1527 = sub nsw i64 %1525, %1526
  %1528 = load i64, ptr %35, align 8, !tbaa !9
  %1529 = add nsw i64 %1527, %1528
  store i64 %1529, ptr %25, align 8, !tbaa !9
  %1530 = load ptr, ptr %17, align 8, !tbaa !5
  %1531 = load i64, ptr %25, align 8, !tbaa !9
  %1532 = getelementptr inbounds %struct.doublecomplex, ptr %1530, i64 %1531
  %1533 = getelementptr inbounds %struct.doublecomplex, ptr %1532, i32 0, i32 0
  %1534 = load double, ptr %1533, align 8, !tbaa !16
  %1535 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 0
  %1536 = load double, ptr %1535, align 8, !tbaa !16
  %1537 = load ptr, ptr %17, align 8, !tbaa !5
  %1538 = load i64, ptr %25, align 8, !tbaa !9
  %1539 = getelementptr inbounds %struct.doublecomplex, ptr %1537, i64 %1538
  %1540 = getelementptr inbounds %struct.doublecomplex, ptr %1539, i32 0, i32 1
  %1541 = load double, ptr %1540, align 8, !tbaa !19
  %1542 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 1
  %1543 = load double, ptr %1542, align 8, !tbaa !19
  %1544 = fmul double %1541, %1543
  %1545 = fneg double %1544
  %1546 = call double @llvm.fmuladd.f64(double %1534, double %1536, double %1545)
  %1547 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 0
  store double %1546, ptr %1547, align 8, !tbaa !16
  %1548 = load ptr, ptr %17, align 8, !tbaa !5
  %1549 = load i64, ptr %25, align 8, !tbaa !9
  %1550 = getelementptr inbounds %struct.doublecomplex, ptr %1548, i64 %1549
  %1551 = getelementptr inbounds %struct.doublecomplex, ptr %1550, i32 0, i32 0
  %1552 = load double, ptr %1551, align 8, !tbaa !16
  %1553 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 1
  %1554 = load double, ptr %1553, align 8, !tbaa !19
  %1555 = load ptr, ptr %17, align 8, !tbaa !5
  %1556 = load i64, ptr %25, align 8, !tbaa !9
  %1557 = getelementptr inbounds %struct.doublecomplex, ptr %1555, i64 %1556
  %1558 = getelementptr inbounds %struct.doublecomplex, ptr %1557, i32 0, i32 1
  %1559 = load double, ptr %1558, align 8, !tbaa !19
  %1560 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 0
  %1561 = load double, ptr %1560, align 8, !tbaa !16
  %1562 = fmul double %1559, %1561
  %1563 = call double @llvm.fmuladd.f64(double %1552, double %1554, double %1562)
  %1564 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 1
  store double %1563, ptr %1564, align 8, !tbaa !19
  %1565 = load i64, ptr %35, align 8, !tbaa !9
  store i64 %1565, ptr %26, align 8, !tbaa !9
  %1566 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 0
  %1567 = load double, ptr %1566, align 8, !tbaa !16
  %1568 = load ptr, ptr %18, align 8, !tbaa !5
  %1569 = load i64, ptr %26, align 8, !tbaa !9
  %1570 = getelementptr inbounds %struct.doublecomplex, ptr %1568, i64 %1569
  %1571 = getelementptr inbounds %struct.doublecomplex, ptr %1570, i32 0, i32 0
  %1572 = load double, ptr %1571, align 8, !tbaa !16
  %1573 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 1
  %1574 = load double, ptr %1573, align 8, !tbaa !19
  %1575 = load ptr, ptr %18, align 8, !tbaa !5
  %1576 = load i64, ptr %26, align 8, !tbaa !9
  %1577 = getelementptr inbounds %struct.doublecomplex, ptr %1575, i64 %1576
  %1578 = getelementptr inbounds %struct.doublecomplex, ptr %1577, i32 0, i32 1
  %1579 = load double, ptr %1578, align 8, !tbaa !19
  %1580 = fmul double %1574, %1579
  %1581 = fneg double %1580
  %1582 = call double @llvm.fmuladd.f64(double %1567, double %1572, double %1581)
  %1583 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 0
  store double %1582, ptr %1583, align 8, !tbaa !16
  %1584 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 0
  %1585 = load double, ptr %1584, align 8, !tbaa !16
  %1586 = load ptr, ptr %18, align 8, !tbaa !5
  %1587 = load i64, ptr %26, align 8, !tbaa !9
  %1588 = getelementptr inbounds %struct.doublecomplex, ptr %1586, i64 %1587
  %1589 = getelementptr inbounds %struct.doublecomplex, ptr %1588, i32 0, i32 1
  %1590 = load double, ptr %1589, align 8, !tbaa !19
  %1591 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 1
  %1592 = load double, ptr %1591, align 8, !tbaa !19
  %1593 = load ptr, ptr %18, align 8, !tbaa !5
  %1594 = load i64, ptr %26, align 8, !tbaa !9
  %1595 = getelementptr inbounds %struct.doublecomplex, ptr %1593, i64 %1594
  %1596 = getelementptr inbounds %struct.doublecomplex, ptr %1595, i32 0, i32 0
  %1597 = load double, ptr %1596, align 8, !tbaa !16
  %1598 = fmul double %1592, %1597
  %1599 = call double @llvm.fmuladd.f64(double %1585, double %1590, double %1598)
  %1600 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 1
  store double %1599, ptr %1600, align 8, !tbaa !19
  %1601 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 0
  %1602 = load double, ptr %1601, align 8, !tbaa !16
  %1603 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 0
  %1604 = load double, ptr %1603, align 8, !tbaa !16
  %1605 = fadd double %1602, %1604
  %1606 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  store double %1605, ptr %1606, align 8, !tbaa !16
  %1607 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 1
  %1608 = load double, ptr %1607, align 8, !tbaa !19
  %1609 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 1
  %1610 = load double, ptr %1609, align 8, !tbaa !19
  %1611 = fadd double %1608, %1610
  %1612 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  store double %1611, ptr %1612, align 8, !tbaa !19
  %1613 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %1614 = load double, ptr %1613, align 8, !tbaa !16
  %1615 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 0
  store double %1614, ptr %1615, align 8, !tbaa !16
  %1616 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %1617 = load double, ptr %1616, align 8, !tbaa !19
  %1618 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 1
  store double %1617, ptr %1618, align 8, !tbaa !19
  br label %1619

1619:                                             ; preds = %1524
  %1620 = load i64, ptr %35, align 8, !tbaa !9
  %1621 = add nsw i64 %1620, 1
  store i64 %1621, ptr %35, align 8, !tbaa !9
  br label %1520, !llvm.loop !26

1622:                                             ; preds = %1520
  br label %1737

1623:                                             ; preds = %1514
  %1624 = load i64, ptr %36, align 8, !tbaa !9
  %1625 = load ptr, ptr %16, align 8, !tbaa !5
  %1626 = load i64, ptr %1625, align 8, !tbaa !9
  %1627 = icmp slt i64 %1624, %1626
  br i1 %1627, label %1628, label %1736

1628:                                             ; preds = %1623
  %1629 = load ptr, ptr %16, align 8, !tbaa !5
  %1630 = load i64, ptr %1629, align 8, !tbaa !9
  %1631 = load i64, ptr %36, align 8, !tbaa !9
  %1632 = sub nsw i64 %1630, %1631
  store i64 %1632, ptr %24, align 8, !tbaa !9
  store i64 1, ptr %35, align 8, !tbaa !9
  br label %1633

1633:                                             ; preds = %1732, %1628
  %1634 = load i64, ptr %35, align 8, !tbaa !9
  %1635 = load i64, ptr %24, align 8, !tbaa !9
  %1636 = icmp sle i64 %1634, %1635
  br i1 %1636, label %1637, label %1735

1637:                                             ; preds = %1633
  %1638 = load i64, ptr %37, align 8, !tbaa !9
  %1639 = load i64, ptr %35, align 8, !tbaa !9
  %1640 = add nsw i64 %1638, %1639
  store i64 %1640, ptr %25, align 8, !tbaa !9
  %1641 = load ptr, ptr %17, align 8, !tbaa !5
  %1642 = load i64, ptr %25, align 8, !tbaa !9
  %1643 = getelementptr inbounds %struct.doublecomplex, ptr %1641, i64 %1642
  %1644 = getelementptr inbounds %struct.doublecomplex, ptr %1643, i32 0, i32 0
  %1645 = load double, ptr %1644, align 8, !tbaa !16
  %1646 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 0
  %1647 = load double, ptr %1646, align 8, !tbaa !16
  %1648 = load ptr, ptr %17, align 8, !tbaa !5
  %1649 = load i64, ptr %25, align 8, !tbaa !9
  %1650 = getelementptr inbounds %struct.doublecomplex, ptr %1648, i64 %1649
  %1651 = getelementptr inbounds %struct.doublecomplex, ptr %1650, i32 0, i32 1
  %1652 = load double, ptr %1651, align 8, !tbaa !19
  %1653 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 1
  %1654 = load double, ptr %1653, align 8, !tbaa !19
  %1655 = fmul double %1652, %1654
  %1656 = fneg double %1655
  %1657 = call double @llvm.fmuladd.f64(double %1645, double %1647, double %1656)
  %1658 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 0
  store double %1657, ptr %1658, align 8, !tbaa !16
  %1659 = load ptr, ptr %17, align 8, !tbaa !5
  %1660 = load i64, ptr %25, align 8, !tbaa !9
  %1661 = getelementptr inbounds %struct.doublecomplex, ptr %1659, i64 %1660
  %1662 = getelementptr inbounds %struct.doublecomplex, ptr %1661, i32 0, i32 0
  %1663 = load double, ptr %1662, align 8, !tbaa !16
  %1664 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 1
  %1665 = load double, ptr %1664, align 8, !tbaa !19
  %1666 = load ptr, ptr %17, align 8, !tbaa !5
  %1667 = load i64, ptr %25, align 8, !tbaa !9
  %1668 = getelementptr inbounds %struct.doublecomplex, ptr %1666, i64 %1667
  %1669 = getelementptr inbounds %struct.doublecomplex, ptr %1668, i32 0, i32 1
  %1670 = load double, ptr %1669, align 8, !tbaa !19
  %1671 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 0
  %1672 = load double, ptr %1671, align 8, !tbaa !16
  %1673 = fmul double %1670, %1672
  %1674 = call double @llvm.fmuladd.f64(double %1663, double %1665, double %1673)
  %1675 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 1
  store double %1674, ptr %1675, align 8, !tbaa !19
  %1676 = load i64, ptr %36, align 8, !tbaa !9
  %1677 = load i64, ptr %35, align 8, !tbaa !9
  %1678 = add nsw i64 %1676, %1677
  store i64 %1678, ptr %26, align 8, !tbaa !9
  %1679 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 0
  %1680 = load double, ptr %1679, align 8, !tbaa !16
  %1681 = load ptr, ptr %18, align 8, !tbaa !5
  %1682 = load i64, ptr %26, align 8, !tbaa !9
  %1683 = getelementptr inbounds %struct.doublecomplex, ptr %1681, i64 %1682
  %1684 = getelementptr inbounds %struct.doublecomplex, ptr %1683, i32 0, i32 0
  %1685 = load double, ptr %1684, align 8, !tbaa !16
  %1686 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 1
  %1687 = load double, ptr %1686, align 8, !tbaa !19
  %1688 = load ptr, ptr %18, align 8, !tbaa !5
  %1689 = load i64, ptr %26, align 8, !tbaa !9
  %1690 = getelementptr inbounds %struct.doublecomplex, ptr %1688, i64 %1689
  %1691 = getelementptr inbounds %struct.doublecomplex, ptr %1690, i32 0, i32 1
  %1692 = load double, ptr %1691, align 8, !tbaa !19
  %1693 = fmul double %1687, %1692
  %1694 = fneg double %1693
  %1695 = call double @llvm.fmuladd.f64(double %1680, double %1685, double %1694)
  %1696 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 0
  store double %1695, ptr %1696, align 8, !tbaa !16
  %1697 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 0
  %1698 = load double, ptr %1697, align 8, !tbaa !16
  %1699 = load ptr, ptr %18, align 8, !tbaa !5
  %1700 = load i64, ptr %26, align 8, !tbaa !9
  %1701 = getelementptr inbounds %struct.doublecomplex, ptr %1699, i64 %1700
  %1702 = getelementptr inbounds %struct.doublecomplex, ptr %1701, i32 0, i32 1
  %1703 = load double, ptr %1702, align 8, !tbaa !19
  %1704 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 1
  %1705 = load double, ptr %1704, align 8, !tbaa !19
  %1706 = load ptr, ptr %18, align 8, !tbaa !5
  %1707 = load i64, ptr %26, align 8, !tbaa !9
  %1708 = getelementptr inbounds %struct.doublecomplex, ptr %1706, i64 %1707
  %1709 = getelementptr inbounds %struct.doublecomplex, ptr %1708, i32 0, i32 0
  %1710 = load double, ptr %1709, align 8, !tbaa !16
  %1711 = fmul double %1705, %1710
  %1712 = call double @llvm.fmuladd.f64(double %1698, double %1703, double %1711)
  %1713 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 1
  store double %1712, ptr %1713, align 8, !tbaa !19
  %1714 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 0
  %1715 = load double, ptr %1714, align 8, !tbaa !16
  %1716 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 0
  %1717 = load double, ptr %1716, align 8, !tbaa !16
  %1718 = fadd double %1715, %1717
  %1719 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  store double %1718, ptr %1719, align 8, !tbaa !16
  %1720 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 1
  %1721 = load double, ptr %1720, align 8, !tbaa !19
  %1722 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 1
  %1723 = load double, ptr %1722, align 8, !tbaa !19
  %1724 = fadd double %1721, %1723
  %1725 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  store double %1724, ptr %1725, align 8, !tbaa !19
  %1726 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %1727 = load double, ptr %1726, align 8, !tbaa !16
  %1728 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 0
  store double %1727, ptr %1728, align 8, !tbaa !16
  %1729 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %1730 = load double, ptr %1729, align 8, !tbaa !19
  %1731 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 1
  store double %1730, ptr %1731, align 8, !tbaa !19
  br label %1732

1732:                                             ; preds = %1637
  %1733 = load i64, ptr %35, align 8, !tbaa !9
  %1734 = add nsw i64 %1733, 1
  store i64 %1734, ptr %35, align 8, !tbaa !9
  br label %1633, !llvm.loop !27

1735:                                             ; preds = %1633
  br label %1736

1736:                                             ; preds = %1735, %1623
  br label %1737

1737:                                             ; preds = %1736, %1622
  br label %1738

1738:                                             ; preds = %1737, %1513
  %1739 = load double, ptr %49, align 8, !tbaa !11
  %1740 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  store double %1739, ptr %1740, align 8, !tbaa !16
  %1741 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  store double 0.000000e+00, ptr %1741, align 8, !tbaa !19
  %1742 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 0
  %1743 = load double, ptr %1742, align 8, !tbaa !16
  %1744 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %1745 = load double, ptr %1744, align 8, !tbaa !16
  %1746 = fcmp oeq double %1743, %1745
  br i1 %1746, label %1747, label %1993

1747:                                             ; preds = %1738
  %1748 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 1
  %1749 = load double, ptr %1748, align 8, !tbaa !19
  %1750 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %1751 = load double, ptr %1750, align 8, !tbaa !19
  %1752 = fcmp oeq double %1749, %1751
  br i1 %1752, label %1753, label %1993

1753:                                             ; preds = %1747
  %1754 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %1754, ptr %24, align 8, !tbaa !9
  %1755 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %1755, ptr %25, align 8, !tbaa !9
  %1756 = load ptr, ptr %18, align 8, !tbaa !5
  %1757 = load i64, ptr %25, align 8, !tbaa !9
  %1758 = getelementptr inbounds %struct.doublecomplex, ptr %1756, i64 %1757
  %1759 = getelementptr inbounds %struct.doublecomplex, ptr %1758, i32 0, i32 0
  %1760 = load double, ptr %1759, align 8, !tbaa !16
  %1761 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 0
  %1762 = load double, ptr %1761, align 8, !tbaa !16
  %1763 = fsub double %1760, %1762
  %1764 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  store double %1763, ptr %1764, align 8, !tbaa !16
  %1765 = load ptr, ptr %18, align 8, !tbaa !5
  %1766 = load i64, ptr %25, align 8, !tbaa !9
  %1767 = getelementptr inbounds %struct.doublecomplex, ptr %1765, i64 %1766
  %1768 = getelementptr inbounds %struct.doublecomplex, ptr %1767, i32 0, i32 1
  %1769 = load double, ptr %1768, align 8, !tbaa !19
  %1770 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 1
  %1771 = load double, ptr %1770, align 8, !tbaa !19
  %1772 = fsub double %1769, %1771
  %1773 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  store double %1772, ptr %1773, align 8, !tbaa !19
  %1774 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %1775 = load double, ptr %1774, align 8, !tbaa !16
  %1776 = load ptr, ptr %18, align 8, !tbaa !5
  %1777 = load i64, ptr %24, align 8, !tbaa !9
  %1778 = getelementptr inbounds %struct.doublecomplex, ptr %1776, i64 %1777
  %1779 = getelementptr inbounds %struct.doublecomplex, ptr %1778, i32 0, i32 0
  store double %1775, ptr %1779, align 8, !tbaa !16
  %1780 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %1781 = load double, ptr %1780, align 8, !tbaa !19
  %1782 = load ptr, ptr %18, align 8, !tbaa !5
  %1783 = load i64, ptr %24, align 8, !tbaa !9
  %1784 = getelementptr inbounds %struct.doublecomplex, ptr %1782, i64 %1783
  %1785 = getelementptr inbounds %struct.doublecomplex, ptr %1784, i32 0, i32 1
  store double %1781, ptr %1785, align 8, !tbaa !19
  %1786 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %1786, ptr %24, align 8, !tbaa !9
  %1787 = load ptr, ptr %18, align 8, !tbaa !5
  %1788 = load i64, ptr %24, align 8, !tbaa !9
  %1789 = getelementptr inbounds %struct.doublecomplex, ptr %1787, i64 %1788
  %1790 = getelementptr inbounds %struct.doublecomplex, ptr %1789, i32 0, i32 0
  %1791 = load double, ptr %1790, align 8, !tbaa !16
  store double %1791, ptr %27, align 8, !tbaa !11
  %1792 = load double, ptr %27, align 8, !tbaa !11
  %1793 = fcmp oge double %1792, 0.000000e+00
  br i1 %1793, label %1794, label %1796

1794:                                             ; preds = %1753
  %1795 = load double, ptr %27, align 8, !tbaa !11
  br label %1799

1796:                                             ; preds = %1753
  %1797 = load double, ptr %27, align 8, !tbaa !11
  %1798 = fneg double %1797
  br label %1799

1799:                                             ; preds = %1796, %1794
  %1800 = phi double [ %1795, %1794 ], [ %1798, %1796 ]
  %1801 = load ptr, ptr %18, align 8, !tbaa !5
  %1802 = load i64, ptr %36, align 8, !tbaa !9
  %1803 = getelementptr inbounds %struct.doublecomplex, ptr %1801, i64 %1802
  %1804 = call double @d_imag(ptr noundef %1803)
  store double %1804, ptr %28, align 8, !tbaa !11
  %1805 = load double, ptr %28, align 8, !tbaa !11
  %1806 = fcmp oge double %1805, 0.000000e+00
  br i1 %1806, label %1807, label %1809

1807:                                             ; preds = %1799
  %1808 = load double, ptr %28, align 8, !tbaa !11
  br label %1812

1809:                                             ; preds = %1799
  %1810 = load double, ptr %28, align 8, !tbaa !11
  %1811 = fneg double %1810
  br label %1812

1812:                                             ; preds = %1809, %1807
  %1813 = phi double [ %1808, %1807 ], [ %1811, %1809 ]
  %1814 = fadd double %1800, %1813
  store double %1814, ptr %38, align 8, !tbaa !11
  %1815 = load i64, ptr %58, align 8, !tbaa !9
  %1816 = icmp ne i64 %1815, 0
  br i1 %1816, label %1817, label %1841

1817:                                             ; preds = %1812
  %1818 = load i64, ptr %37, align 8, !tbaa !9
  store i64 %1818, ptr %24, align 8, !tbaa !9
  %1819 = load double, ptr %49, align 8, !tbaa !11
  %1820 = load ptr, ptr %17, align 8, !tbaa !5
  %1821 = load i64, ptr %24, align 8, !tbaa !9
  %1822 = getelementptr inbounds %struct.doublecomplex, ptr %1820, i64 %1821
  %1823 = getelementptr inbounds %struct.doublecomplex, ptr %1822, i32 0, i32 0
  %1824 = load double, ptr %1823, align 8, !tbaa !16
  %1825 = fmul double %1819, %1824
  %1826 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  store double %1825, ptr %1826, align 8, !tbaa !16
  %1827 = load double, ptr %49, align 8, !tbaa !11
  %1828 = load ptr, ptr %17, align 8, !tbaa !5
  %1829 = load i64, ptr %24, align 8, !tbaa !9
  %1830 = getelementptr inbounds %struct.doublecomplex, ptr %1828, i64 %1829
  %1831 = getelementptr inbounds %struct.doublecomplex, ptr %1830, i32 0, i32 1
  %1832 = load double, ptr %1831, align 8, !tbaa !19
  %1833 = fmul double %1827, %1832
  %1834 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  store double %1833, ptr %1834, align 8, !tbaa !19
  %1835 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %1836 = load double, ptr %1835, align 8, !tbaa !16
  %1837 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 0
  store double %1836, ptr %1837, align 8, !tbaa !16
  %1838 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %1839 = load double, ptr %1838, align 8, !tbaa !19
  %1840 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 1
  store double %1839, ptr %1840, align 8, !tbaa !19
  br label %1849

1841:                                             ; preds = %1812
  %1842 = load double, ptr %49, align 8, !tbaa !11
  %1843 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 0
  store double %1842, ptr %1843, align 8, !tbaa !16
  %1844 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 1
  store double 0.000000e+00, ptr %1844, align 8, !tbaa !19
  %1845 = load double, ptr %49, align 8, !tbaa !11
  %1846 = fcmp oeq double %1845, 1.000000e+00
  br i1 %1846, label %1847, label %1848

1847:                                             ; preds = %1841
  br label %1992

1848:                                             ; preds = %1841
  br label %1849

1849:                                             ; preds = %1848, %1817
  %1850 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 0
  %1851 = load double, ptr %1850, align 8, !tbaa !16
  store double %1851, ptr %27, align 8, !tbaa !11
  %1852 = load double, ptr %27, align 8, !tbaa !11
  %1853 = fcmp oge double %1852, 0.000000e+00
  br i1 %1853, label %1854, label %1856

1854:                                             ; preds = %1849
  %1855 = load double, ptr %27, align 8, !tbaa !11
  br label %1859

1856:                                             ; preds = %1849
  %1857 = load double, ptr %27, align 8, !tbaa !11
  %1858 = fneg double %1857
  br label %1859

1859:                                             ; preds = %1856, %1854
  %1860 = phi double [ %1855, %1854 ], [ %1858, %1856 ]
  %1861 = call double @d_imag(ptr noundef %46)
  store double %1861, ptr %28, align 8, !tbaa !11
  %1862 = load double, ptr %28, align 8, !tbaa !11
  %1863 = fcmp oge double %1862, 0.000000e+00
  br i1 %1863, label %1864, label %1866

1864:                                             ; preds = %1859
  %1865 = load double, ptr %28, align 8, !tbaa !11
  br label %1869

1866:                                             ; preds = %1859
  %1867 = load double, ptr %28, align 8, !tbaa !11
  %1868 = fneg double %1867
  br label %1869

1869:                                             ; preds = %1866, %1864
  %1870 = phi double [ %1865, %1864 ], [ %1868, %1866 ]
  %1871 = fadd double %1860, %1870
  store double %1871, ptr %40, align 8, !tbaa !11
  %1872 = load double, ptr %40, align 8, !tbaa !11
  %1873 = load double, ptr %57, align 8, !tbaa !11
  %1874 = fcmp ogt double %1872, %1873
  br i1 %1874, label %1875, label %1916

1875:                                             ; preds = %1869
  %1876 = load double, ptr %40, align 8, !tbaa !11
  %1877 = fcmp olt double %1876, 1.000000e+00
  br i1 %1877, label %1878, label %1899

1878:                                             ; preds = %1875
  %1879 = load double, ptr %38, align 8, !tbaa !11
  %1880 = load double, ptr %40, align 8, !tbaa !11
  %1881 = load double, ptr %54, align 8, !tbaa !11
  %1882 = fmul double %1880, %1881
  %1883 = fcmp ogt double %1879, %1882
  br i1 %1883, label %1884, label %1898

1884:                                             ; preds = %1878
  %1885 = load double, ptr %38, align 8, !tbaa !11
  %1886 = fdiv double 1.000000e+00, %1885
  store double %1886, ptr %39, align 8, !tbaa !11
  %1887 = load ptr, ptr %16, align 8, !tbaa !5
  %1888 = load ptr, ptr %18, align 8, !tbaa !5
  %1889 = getelementptr inbounds %struct.doublecomplex, ptr %1888, i64 1
  %1890 = call i32 @f2c_zdscal(ptr noundef %1887, ptr noundef %39, ptr noundef %1889, ptr noundef @c__1)
  %1891 = load double, ptr %39, align 8, !tbaa !11
  %1892 = load ptr, ptr %19, align 8, !tbaa !5
  %1893 = load double, ptr %1892, align 8, !tbaa !11
  %1894 = fmul double %1893, %1891
  store double %1894, ptr %1892, align 8, !tbaa !11
  %1895 = load double, ptr %39, align 8, !tbaa !11
  %1896 = load double, ptr %47, align 8, !tbaa !11
  %1897 = fmul double %1896, %1895
  store double %1897, ptr %47, align 8, !tbaa !11
  br label %1898

1898:                                             ; preds = %1884, %1878
  br label %1899

1899:                                             ; preds = %1898, %1875
  %1900 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %1900, ptr %24, align 8, !tbaa !9
  %1901 = load ptr, ptr %18, align 8, !tbaa !5
  %1902 = load i64, ptr %36, align 8, !tbaa !9
  %1903 = getelementptr inbounds %struct.doublecomplex, ptr %1901, i64 %1902
  call void @zladiv_(ptr noundef %31, ptr noundef %1903, ptr noundef %46)
  %1904 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %1905 = load double, ptr %1904, align 8, !tbaa !16
  %1906 = load ptr, ptr %18, align 8, !tbaa !5
  %1907 = load i64, ptr %24, align 8, !tbaa !9
  %1908 = getelementptr inbounds %struct.doublecomplex, ptr %1906, i64 %1907
  %1909 = getelementptr inbounds %struct.doublecomplex, ptr %1908, i32 0, i32 0
  store double %1905, ptr %1909, align 8, !tbaa !16
  %1910 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %1911 = load double, ptr %1910, align 8, !tbaa !19
  %1912 = load ptr, ptr %18, align 8, !tbaa !5
  %1913 = load i64, ptr %24, align 8, !tbaa !9
  %1914 = getelementptr inbounds %struct.doublecomplex, ptr %1912, i64 %1913
  %1915 = getelementptr inbounds %struct.doublecomplex, ptr %1914, i32 0, i32 1
  store double %1911, ptr %1915, align 8, !tbaa !19
  br label %1991

1916:                                             ; preds = %1869
  %1917 = load double, ptr %40, align 8, !tbaa !11
  %1918 = fcmp ogt double %1917, 0.000000e+00
  br i1 %1918, label %1919, label %1959

1919:                                             ; preds = %1916
  %1920 = load double, ptr %38, align 8, !tbaa !11
  %1921 = load double, ptr %40, align 8, !tbaa !11
  %1922 = load double, ptr %54, align 8, !tbaa !11
  %1923 = fmul double %1921, %1922
  %1924 = fcmp ogt double %1920, %1923
  br i1 %1924, label %1925, label %1942

1925:                                             ; preds = %1919
  %1926 = load double, ptr %40, align 8, !tbaa !11
  %1927 = load double, ptr %54, align 8, !tbaa !11
  %1928 = fmul double %1926, %1927
  %1929 = load double, ptr %38, align 8, !tbaa !11
  %1930 = fdiv double %1928, %1929
  store double %1930, ptr %39, align 8, !tbaa !11
  %1931 = load ptr, ptr %16, align 8, !tbaa !5
  %1932 = load ptr, ptr %18, align 8, !tbaa !5
  %1933 = getelementptr inbounds %struct.doublecomplex, ptr %1932, i64 1
  %1934 = call i32 @f2c_zdscal(ptr noundef %1931, ptr noundef %39, ptr noundef %1933, ptr noundef @c__1)
  %1935 = load double, ptr %39, align 8, !tbaa !11
  %1936 = load ptr, ptr %19, align 8, !tbaa !5
  %1937 = load double, ptr %1936, align 8, !tbaa !11
  %1938 = fmul double %1937, %1935
  store double %1938, ptr %1936, align 8, !tbaa !11
  %1939 = load double, ptr %39, align 8, !tbaa !11
  %1940 = load double, ptr %47, align 8, !tbaa !11
  %1941 = fmul double %1940, %1939
  store double %1941, ptr %47, align 8, !tbaa !11
  br label %1942

1942:                                             ; preds = %1925, %1919
  %1943 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %1943, ptr %24, align 8, !tbaa !9
  %1944 = load ptr, ptr %18, align 8, !tbaa !5
  %1945 = load i64, ptr %36, align 8, !tbaa !9
  %1946 = getelementptr inbounds %struct.doublecomplex, ptr %1944, i64 %1945
  call void @zladiv_(ptr noundef %31, ptr noundef %1946, ptr noundef %46)
  %1947 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %1948 = load double, ptr %1947, align 8, !tbaa !16
  %1949 = load ptr, ptr %18, align 8, !tbaa !5
  %1950 = load i64, ptr %24, align 8, !tbaa !9
  %1951 = getelementptr inbounds %struct.doublecomplex, ptr %1949, i64 %1950
  %1952 = getelementptr inbounds %struct.doublecomplex, ptr %1951, i32 0, i32 0
  store double %1948, ptr %1952, align 8, !tbaa !16
  %1953 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %1954 = load double, ptr %1953, align 8, !tbaa !19
  %1955 = load ptr, ptr %18, align 8, !tbaa !5
  %1956 = load i64, ptr %24, align 8, !tbaa !9
  %1957 = getelementptr inbounds %struct.doublecomplex, ptr %1955, i64 %1956
  %1958 = getelementptr inbounds %struct.doublecomplex, ptr %1957, i32 0, i32 1
  store double %1954, ptr %1958, align 8, !tbaa !19
  br label %1990

1959:                                             ; preds = %1916
  %1960 = load ptr, ptr %16, align 8, !tbaa !5
  %1961 = load i64, ptr %1960, align 8, !tbaa !9
  store i64 %1961, ptr %24, align 8, !tbaa !9
  store i64 1, ptr %35, align 8, !tbaa !9
  br label %1962

1962:                                             ; preds = %1976, %1959
  %1963 = load i64, ptr %35, align 8, !tbaa !9
  %1964 = load i64, ptr %24, align 8, !tbaa !9
  %1965 = icmp sle i64 %1963, %1964
  br i1 %1965, label %1966, label %1979

1966:                                             ; preds = %1962
  %1967 = load i64, ptr %35, align 8, !tbaa !9
  store i64 %1967, ptr %25, align 8, !tbaa !9
  %1968 = load ptr, ptr %18, align 8, !tbaa !5
  %1969 = load i64, ptr %25, align 8, !tbaa !9
  %1970 = getelementptr inbounds %struct.doublecomplex, ptr %1968, i64 %1969
  %1971 = getelementptr inbounds %struct.doublecomplex, ptr %1970, i32 0, i32 0
  store double 0.000000e+00, ptr %1971, align 8, !tbaa !16
  %1972 = load ptr, ptr %18, align 8, !tbaa !5
  %1973 = load i64, ptr %25, align 8, !tbaa !9
  %1974 = getelementptr inbounds %struct.doublecomplex, ptr %1972, i64 %1973
  %1975 = getelementptr inbounds %struct.doublecomplex, ptr %1974, i32 0, i32 1
  store double 0.000000e+00, ptr %1975, align 8, !tbaa !19
  br label %1976

1976:                                             ; preds = %1966
  %1977 = load i64, ptr %35, align 8, !tbaa !9
  %1978 = add nsw i64 %1977, 1
  store i64 %1978, ptr %35, align 8, !tbaa !9
  br label %1962, !llvm.loop !28

1979:                                             ; preds = %1962
  %1980 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %1980, ptr %24, align 8, !tbaa !9
  %1981 = load ptr, ptr %18, align 8, !tbaa !5
  %1982 = load i64, ptr %24, align 8, !tbaa !9
  %1983 = getelementptr inbounds %struct.doublecomplex, ptr %1981, i64 %1982
  %1984 = getelementptr inbounds %struct.doublecomplex, ptr %1983, i32 0, i32 0
  store double 1.000000e+00, ptr %1984, align 8, !tbaa !16
  %1985 = load ptr, ptr %18, align 8, !tbaa !5
  %1986 = load i64, ptr %24, align 8, !tbaa !9
  %1987 = getelementptr inbounds %struct.doublecomplex, ptr %1985, i64 %1986
  %1988 = getelementptr inbounds %struct.doublecomplex, ptr %1987, i32 0, i32 1
  store double 0.000000e+00, ptr %1988, align 8, !tbaa !19
  %1989 = load ptr, ptr %19, align 8, !tbaa !5
  store double 0.000000e+00, ptr %1989, align 8, !tbaa !11
  store double 0.000000e+00, ptr %47, align 8, !tbaa !11
  br label %1990

1990:                                             ; preds = %1979, %1942
  br label %1991

1991:                                             ; preds = %1990, %1899
  br label %1992

1992:                                             ; preds = %1991, %1847
  br label %2022

1993:                                             ; preds = %1747, %1738
  %1994 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %1994, ptr %24, align 8, !tbaa !9
  %1995 = load ptr, ptr %18, align 8, !tbaa !5
  %1996 = load i64, ptr %36, align 8, !tbaa !9
  %1997 = getelementptr inbounds %struct.doublecomplex, ptr %1995, i64 %1996
  call void @zladiv_(ptr noundef %32, ptr noundef %1997, ptr noundef %46)
  %1998 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 0
  %1999 = load double, ptr %1998, align 8, !tbaa !16
  %2000 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 0
  %2001 = load double, ptr %2000, align 8, !tbaa !16
  %2002 = fsub double %1999, %2001
  %2003 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  store double %2002, ptr %2003, align 8, !tbaa !16
  %2004 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 1
  %2005 = load double, ptr %2004, align 8, !tbaa !19
  %2006 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 1
  %2007 = load double, ptr %2006, align 8, !tbaa !19
  %2008 = fsub double %2005, %2007
  %2009 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  store double %2008, ptr %2009, align 8, !tbaa !19
  %2010 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %2011 = load double, ptr %2010, align 8, !tbaa !16
  %2012 = load ptr, ptr %18, align 8, !tbaa !5
  %2013 = load i64, ptr %24, align 8, !tbaa !9
  %2014 = getelementptr inbounds %struct.doublecomplex, ptr %2012, i64 %2013
  %2015 = getelementptr inbounds %struct.doublecomplex, ptr %2014, i32 0, i32 0
  store double %2011, ptr %2015, align 8, !tbaa !16
  %2016 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %2017 = load double, ptr %2016, align 8, !tbaa !19
  %2018 = load ptr, ptr %18, align 8, !tbaa !5
  %2019 = load i64, ptr %24, align 8, !tbaa !9
  %2020 = getelementptr inbounds %struct.doublecomplex, ptr %2018, i64 %2019
  %2021 = getelementptr inbounds %struct.doublecomplex, ptr %2020, i32 0, i32 1
  store double %2017, ptr %2021, align 8, !tbaa !19
  br label %2022

2022:                                             ; preds = %1993, %1992
  %2023 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %2023, ptr %24, align 8, !tbaa !9
  %2024 = load double, ptr %47, align 8, !tbaa !11
  store double %2024, ptr %29, align 8, !tbaa !11
  %2025 = load ptr, ptr %18, align 8, !tbaa !5
  %2026 = load i64, ptr %24, align 8, !tbaa !9
  %2027 = getelementptr inbounds %struct.doublecomplex, ptr %2025, i64 %2026
  %2028 = getelementptr inbounds %struct.doublecomplex, ptr %2027, i32 0, i32 0
  %2029 = load double, ptr %2028, align 8, !tbaa !16
  store double %2029, ptr %27, align 8, !tbaa !11
  %2030 = load double, ptr %27, align 8, !tbaa !11
  %2031 = fcmp oge double %2030, 0.000000e+00
  br i1 %2031, label %2032, label %2034

2032:                                             ; preds = %2022
  %2033 = load double, ptr %27, align 8, !tbaa !11
  br label %2037

2034:                                             ; preds = %2022
  %2035 = load double, ptr %27, align 8, !tbaa !11
  %2036 = fneg double %2035
  br label %2037

2037:                                             ; preds = %2034, %2032
  %2038 = phi double [ %2033, %2032 ], [ %2036, %2034 ]
  %2039 = load ptr, ptr %18, align 8, !tbaa !5
  %2040 = load i64, ptr %36, align 8, !tbaa !9
  %2041 = getelementptr inbounds %struct.doublecomplex, ptr %2039, i64 %2040
  %2042 = call double @d_imag(ptr noundef %2041)
  store double %2042, ptr %28, align 8, !tbaa !11
  %2043 = load double, ptr %28, align 8, !tbaa !11
  %2044 = fcmp oge double %2043, 0.000000e+00
  br i1 %2044, label %2045, label %2047

2045:                                             ; preds = %2037
  %2046 = load double, ptr %28, align 8, !tbaa !11
  br label %2050

2047:                                             ; preds = %2037
  %2048 = load double, ptr %28, align 8, !tbaa !11
  %2049 = fneg double %2048
  br label %2050

2050:                                             ; preds = %2047, %2045
  %2051 = phi double [ %2046, %2045 ], [ %2049, %2047 ]
  %2052 = fadd double %2038, %2051
  store double %2052, ptr %30, align 8, !tbaa !11
  %2053 = load double, ptr %29, align 8, !tbaa !11
  %2054 = load double, ptr %30, align 8, !tbaa !11
  %2055 = fcmp oge double %2053, %2054
  br i1 %2055, label %2056, label %2058

2056:                                             ; preds = %2050
  %2057 = load double, ptr %29, align 8, !tbaa !11
  br label %2060

2058:                                             ; preds = %2050
  %2059 = load double, ptr %30, align 8, !tbaa !11
  br label %2060

2060:                                             ; preds = %2058, %2056
  %2061 = phi double [ %2057, %2056 ], [ %2059, %2058 ]
  store double %2061, ptr %47, align 8, !tbaa !11
  %2062 = load i64, ptr %42, align 8, !tbaa !9
  %2063 = add nsw i64 %2062, 1
  store i64 %2063, ptr %42, align 8, !tbaa !9
  %2064 = load i64, ptr %41, align 8, !tbaa !9
  %2065 = load i64, ptr %42, align 8, !tbaa !9
  %2066 = mul nsw i64 %2064, %2065
  %2067 = load i64, ptr %37, align 8, !tbaa !9
  %2068 = add nsw i64 %2067, %2066
  store i64 %2068, ptr %37, align 8, !tbaa !9
  br label %2069

2069:                                             ; preds = %2060
  %2070 = load i64, ptr %22, align 8, !tbaa !9
  %2071 = load i64, ptr %36, align 8, !tbaa !9
  %2072 = add nsw i64 %2071, %2070
  store i64 %2072, ptr %36, align 8, !tbaa !9
  br label %1298, !llvm.loop !29

2073:                                             ; preds = %1311
  br label %2831

2074:                                             ; preds = %1285
  %2075 = load i64, ptr %56, align 8, !tbaa !9
  %2076 = load i64, ptr %56, align 8, !tbaa !9
  %2077 = add nsw i64 %2076, 1
  %2078 = mul nsw i64 %2075, %2077
  %2079 = sdiv i64 %2078, 2
  store i64 %2079, ptr %37, align 8, !tbaa !9
  store i64 1, ptr %42, align 8, !tbaa !9
  %2080 = load i64, ptr %51, align 8, !tbaa !9
  store i64 %2080, ptr %22, align 8, !tbaa !9
  %2081 = load i64, ptr %41, align 8, !tbaa !9
  store i64 %2081, ptr %23, align 8, !tbaa !9
  %2082 = load i64, ptr %56, align 8, !tbaa !9
  store i64 %2082, ptr %36, align 8, !tbaa !9
  br label %2083

2083:                                             ; preds = %2826, %2074
  %2084 = load i64, ptr %23, align 8, !tbaa !9
  %2085 = icmp slt i64 %2084, 0
  br i1 %2085, label %2086, label %2091

2086:                                             ; preds = %2083
  %2087 = load i64, ptr %36, align 8, !tbaa !9
  %2088 = load i64, ptr %22, align 8, !tbaa !9
  %2089 = icmp sge i64 %2087, %2088
  %2090 = zext i1 %2089 to i32
  br label %2096

2091:                                             ; preds = %2083
  %2092 = load i64, ptr %36, align 8, !tbaa !9
  %2093 = load i64, ptr %22, align 8, !tbaa !9
  %2094 = icmp sle i64 %2092, %2093
  %2095 = zext i1 %2094 to i32
  br label %2096

2096:                                             ; preds = %2091, %2086
  %2097 = phi i32 [ %2090, %2086 ], [ %2095, %2091 ]
  %2098 = icmp ne i32 %2097, 0
  br i1 %2098, label %2099, label %2830

2099:                                             ; preds = %2096
  %2100 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %2100, ptr %24, align 8, !tbaa !9
  %2101 = load ptr, ptr %18, align 8, !tbaa !5
  %2102 = load i64, ptr %24, align 8, !tbaa !9
  %2103 = getelementptr inbounds %struct.doublecomplex, ptr %2101, i64 %2102
  %2104 = getelementptr inbounds %struct.doublecomplex, ptr %2103, i32 0, i32 0
  %2105 = load double, ptr %2104, align 8, !tbaa !16
  store double %2105, ptr %27, align 8, !tbaa !11
  %2106 = load double, ptr %27, align 8, !tbaa !11
  %2107 = fcmp oge double %2106, 0.000000e+00
  br i1 %2107, label %2108, label %2110

2108:                                             ; preds = %2099
  %2109 = load double, ptr %27, align 8, !tbaa !11
  br label %2113

2110:                                             ; preds = %2099
  %2111 = load double, ptr %27, align 8, !tbaa !11
  %2112 = fneg double %2111
  br label %2113

2113:                                             ; preds = %2110, %2108
  %2114 = phi double [ %2109, %2108 ], [ %2112, %2110 ]
  %2115 = load ptr, ptr %18, align 8, !tbaa !5
  %2116 = load i64, ptr %36, align 8, !tbaa !9
  %2117 = getelementptr inbounds %struct.doublecomplex, ptr %2115, i64 %2116
  %2118 = call double @d_imag(ptr noundef %2117)
  store double %2118, ptr %28, align 8, !tbaa !11
  %2119 = load double, ptr %28, align 8, !tbaa !11
  %2120 = fcmp oge double %2119, 0.000000e+00
  br i1 %2120, label %2121, label %2123

2121:                                             ; preds = %2113
  %2122 = load double, ptr %28, align 8, !tbaa !11
  br label %2126

2123:                                             ; preds = %2113
  %2124 = load double, ptr %28, align 8, !tbaa !11
  %2125 = fneg double %2124
  br label %2126

2126:                                             ; preds = %2123, %2121
  %2127 = phi double [ %2122, %2121 ], [ %2125, %2123 ]
  %2128 = fadd double %2114, %2127
  store double %2128, ptr %38, align 8, !tbaa !11
  %2129 = load double, ptr %49, align 8, !tbaa !11
  %2130 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 0
  store double %2129, ptr %2130, align 8, !tbaa !16
  %2131 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 1
  store double 0.000000e+00, ptr %2131, align 8, !tbaa !19
  %2132 = load double, ptr %47, align 8, !tbaa !11
  %2133 = fcmp oge double %2132, 1.000000e+00
  br i1 %2133, label %2134, label %2136

2134:                                             ; preds = %2126
  %2135 = load double, ptr %47, align 8, !tbaa !11
  br label %2137

2136:                                             ; preds = %2126
  br label %2137

2137:                                             ; preds = %2136, %2134
  %2138 = phi double [ %2135, %2134 ], [ 1.000000e+00, %2136 ]
  %2139 = fdiv double 1.000000e+00, %2138
  store double %2139, ptr %39, align 8, !tbaa !11
  %2140 = load ptr, ptr %20, align 8, !tbaa !5
  %2141 = load i64, ptr %36, align 8, !tbaa !9
  %2142 = getelementptr inbounds double, ptr %2140, i64 %2141
  %2143 = load double, ptr %2142, align 8, !tbaa !11
  %2144 = load double, ptr %54, align 8, !tbaa !11
  %2145 = load double, ptr %38, align 8, !tbaa !11
  %2146 = fsub double %2144, %2145
  %2147 = load double, ptr %39, align 8, !tbaa !11
  %2148 = fmul double %2146, %2147
  %2149 = fcmp ogt double %2143, %2148
  br i1 %2149, label %2150, label %2239

2150:                                             ; preds = %2137
  %2151 = load double, ptr %39, align 8, !tbaa !11
  %2152 = fmul double %2151, 5.000000e-01
  store double %2152, ptr %39, align 8, !tbaa !11
  %2153 = load i64, ptr %58, align 8, !tbaa !9
  %2154 = icmp ne i64 %2153, 0
  br i1 %2154, label %2155, label %2175

2155:                                             ; preds = %2150
  %2156 = load ptr, ptr %17, align 8, !tbaa !5
  %2157 = load i64, ptr %37, align 8, !tbaa !9
  %2158 = getelementptr inbounds %struct.doublecomplex, ptr %2156, i64 %2157
  call void @d_cnjg(ptr noundef %32, ptr noundef %2158)
  %2159 = load double, ptr %49, align 8, !tbaa !11
  %2160 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 0
  %2161 = load double, ptr %2160, align 8, !tbaa !16
  %2162 = fmul double %2159, %2161
  %2163 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  store double %2162, ptr %2163, align 8, !tbaa !16
  %2164 = load double, ptr %49, align 8, !tbaa !11
  %2165 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 1
  %2166 = load double, ptr %2165, align 8, !tbaa !19
  %2167 = fmul double %2164, %2166
  %2168 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  store double %2167, ptr %2168, align 8, !tbaa !19
  %2169 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %2170 = load double, ptr %2169, align 8, !tbaa !16
  %2171 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 0
  store double %2170, ptr %2171, align 8, !tbaa !16
  %2172 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %2173 = load double, ptr %2172, align 8, !tbaa !19
  %2174 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 1
  store double %2173, ptr %2174, align 8, !tbaa !19
  br label %2179

2175:                                             ; preds = %2150
  %2176 = load double, ptr %49, align 8, !tbaa !11
  %2177 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 0
  store double %2176, ptr %2177, align 8, !tbaa !16
  %2178 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 1
  store double 0.000000e+00, ptr %2178, align 8, !tbaa !19
  br label %2179

2179:                                             ; preds = %2175, %2155
  %2180 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 0
  %2181 = load double, ptr %2180, align 8, !tbaa !16
  store double %2181, ptr %27, align 8, !tbaa !11
  %2182 = load double, ptr %27, align 8, !tbaa !11
  %2183 = fcmp oge double %2182, 0.000000e+00
  br i1 %2183, label %2184, label %2186

2184:                                             ; preds = %2179
  %2185 = load double, ptr %27, align 8, !tbaa !11
  br label %2189

2186:                                             ; preds = %2179
  %2187 = load double, ptr %27, align 8, !tbaa !11
  %2188 = fneg double %2187
  br label %2189

2189:                                             ; preds = %2186, %2184
  %2190 = phi double [ %2185, %2184 ], [ %2188, %2186 ]
  %2191 = call double @d_imag(ptr noundef %46)
  store double %2191, ptr %28, align 8, !tbaa !11
  %2192 = load double, ptr %28, align 8, !tbaa !11
  %2193 = fcmp oge double %2192, 0.000000e+00
  br i1 %2193, label %2194, label %2196

2194:                                             ; preds = %2189
  %2195 = load double, ptr %28, align 8, !tbaa !11
  br label %2199

2196:                                             ; preds = %2189
  %2197 = load double, ptr %28, align 8, !tbaa !11
  %2198 = fneg double %2197
  br label %2199

2199:                                             ; preds = %2196, %2194
  %2200 = phi double [ %2195, %2194 ], [ %2198, %2196 ]
  %2201 = fadd double %2190, %2200
  store double %2201, ptr %40, align 8, !tbaa !11
  %2202 = load double, ptr %40, align 8, !tbaa !11
  %2203 = fcmp ogt double %2202, 1.000000e+00
  br i1 %2203, label %2204, label %2223

2204:                                             ; preds = %2199
  store double 1.000000e+00, ptr %27, align 8, !tbaa !11
  %2205 = load double, ptr %39, align 8, !tbaa !11
  %2206 = load double, ptr %40, align 8, !tbaa !11
  %2207 = fmul double %2205, %2206
  store double %2207, ptr %28, align 8, !tbaa !11
  %2208 = load double, ptr %27, align 8, !tbaa !11
  %2209 = load double, ptr %28, align 8, !tbaa !11
  %2210 = fcmp ole double %2208, %2209
  br i1 %2210, label %2211, label %2213

2211:                                             ; preds = %2204
  %2212 = load double, ptr %27, align 8, !tbaa !11
  br label %2215

2213:                                             ; preds = %2204
  %2214 = load double, ptr %28, align 8, !tbaa !11
  br label %2215

2215:                                             ; preds = %2213, %2211
  %2216 = phi double [ %2212, %2211 ], [ %2214, %2213 ]
  store double %2216, ptr %39, align 8, !tbaa !11
  call void @zladiv_(ptr noundef %31, ptr noundef %50, ptr noundef %46)
  %2217 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %2218 = load double, ptr %2217, align 8, !tbaa !16
  %2219 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 0
  store double %2218, ptr %2219, align 8, !tbaa !16
  %2220 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %2221 = load double, ptr %2220, align 8, !tbaa !19
  %2222 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 1
  store double %2221, ptr %2222, align 8, !tbaa !19
  br label %2223

2223:                                             ; preds = %2215, %2199
  %2224 = load double, ptr %39, align 8, !tbaa !11
  %2225 = fcmp olt double %2224, 1.000000e+00
  br i1 %2225, label %2226, label %2238

2226:                                             ; preds = %2223
  %2227 = load ptr, ptr %16, align 8, !tbaa !5
  %2228 = load ptr, ptr %18, align 8, !tbaa !5
  %2229 = getelementptr inbounds %struct.doublecomplex, ptr %2228, i64 1
  %2230 = call i32 @f2c_zdscal(ptr noundef %2227, ptr noundef %39, ptr noundef %2229, ptr noundef @c__1)
  %2231 = load double, ptr %39, align 8, !tbaa !11
  %2232 = load ptr, ptr %19, align 8, !tbaa !5
  %2233 = load double, ptr %2232, align 8, !tbaa !11
  %2234 = fmul double %2233, %2231
  store double %2234, ptr %2232, align 8, !tbaa !11
  %2235 = load double, ptr %39, align 8, !tbaa !11
  %2236 = load double, ptr %47, align 8, !tbaa !11
  %2237 = fmul double %2236, %2235
  store double %2237, ptr %47, align 8, !tbaa !11
  br label %2238

2238:                                             ; preds = %2226, %2223
  br label %2239

2239:                                             ; preds = %2238, %2137
  %2240 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 0
  store double 0.000000e+00, ptr %2240, align 8, !tbaa !16
  %2241 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 1
  store double 0.000000e+00, ptr %2241, align 8, !tbaa !19
  %2242 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 0
  %2243 = load double, ptr %2242, align 8, !tbaa !16
  %2244 = fcmp oeq double %2243, 1.000000e+00
  br i1 %2244, label %2245, label %2295

2245:                                             ; preds = %2239
  %2246 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 1
  %2247 = load double, ptr %2246, align 8, !tbaa !19
  %2248 = fcmp oeq double %2247, 0.000000e+00
  br i1 %2248, label %2249, label %2295

2249:                                             ; preds = %2245
  %2250 = load i64, ptr %53, align 8, !tbaa !9
  %2251 = icmp ne i64 %2250, 0
  br i1 %2251, label %2252, label %2269

2252:                                             ; preds = %2249
  %2253 = load i64, ptr %36, align 8, !tbaa !9
  %2254 = sub nsw i64 %2253, 1
  store i64 %2254, ptr %24, align 8, !tbaa !9
  %2255 = load ptr, ptr %17, align 8, !tbaa !5
  %2256 = load i64, ptr %37, align 8, !tbaa !9
  %2257 = load i64, ptr %36, align 8, !tbaa !9
  %2258 = sub nsw i64 %2256, %2257
  %2259 = add nsw i64 %2258, 1
  %2260 = getelementptr inbounds %struct.doublecomplex, ptr %2255, i64 %2259
  %2261 = load ptr, ptr %18, align 8, !tbaa !5
  %2262 = getelementptr inbounds %struct.doublecomplex, ptr %2261, i64 1
  call void @f2c_zdotc(ptr noundef %31, ptr noundef %24, ptr noundef %2260, ptr noundef @c__1, ptr noundef %2262, ptr noundef @c__1)
  %2263 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %2264 = load double, ptr %2263, align 8, !tbaa !16
  %2265 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 0
  store double %2264, ptr %2265, align 8, !tbaa !16
  %2266 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %2267 = load double, ptr %2266, align 8, !tbaa !19
  %2268 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 1
  store double %2267, ptr %2268, align 8, !tbaa !19
  br label %2294

2269:                                             ; preds = %2249
  %2270 = load i64, ptr %36, align 8, !tbaa !9
  %2271 = load ptr, ptr %16, align 8, !tbaa !5
  %2272 = load i64, ptr %2271, align 8, !tbaa !9
  %2273 = icmp slt i64 %2270, %2272
  br i1 %2273, label %2274, label %2293

2274:                                             ; preds = %2269
  %2275 = load ptr, ptr %16, align 8, !tbaa !5
  %2276 = load i64, ptr %2275, align 8, !tbaa !9
  %2277 = load i64, ptr %36, align 8, !tbaa !9
  %2278 = sub nsw i64 %2276, %2277
  store i64 %2278, ptr %24, align 8, !tbaa !9
  %2279 = load ptr, ptr %17, align 8, !tbaa !5
  %2280 = load i64, ptr %37, align 8, !tbaa !9
  %2281 = add nsw i64 %2280, 1
  %2282 = getelementptr inbounds %struct.doublecomplex, ptr %2279, i64 %2281
  %2283 = load ptr, ptr %18, align 8, !tbaa !5
  %2284 = load i64, ptr %36, align 8, !tbaa !9
  %2285 = add nsw i64 %2284, 1
  %2286 = getelementptr inbounds %struct.doublecomplex, ptr %2283, i64 %2285
  call void @f2c_zdotc(ptr noundef %31, ptr noundef %24, ptr noundef %2282, ptr noundef @c__1, ptr noundef %2286, ptr noundef @c__1)
  %2287 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %2288 = load double, ptr %2287, align 8, !tbaa !16
  %2289 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 0
  store double %2288, ptr %2289, align 8, !tbaa !16
  %2290 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %2291 = load double, ptr %2290, align 8, !tbaa !19
  %2292 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 1
  store double %2291, ptr %2292, align 8, !tbaa !19
  br label %2293

2293:                                             ; preds = %2274, %2269
  br label %2294

2294:                                             ; preds = %2293, %2252
  br label %2499

2295:                                             ; preds = %2245, %2239
  %2296 = load i64, ptr %53, align 8, !tbaa !9
  %2297 = icmp ne i64 %2296, 0
  br i1 %2297, label %2298, label %2394

2298:                                             ; preds = %2295
  %2299 = load i64, ptr %36, align 8, !tbaa !9
  %2300 = sub nsw i64 %2299, 1
  store i64 %2300, ptr %24, align 8, !tbaa !9
  store i64 1, ptr %35, align 8, !tbaa !9
  br label %2301

2301:                                             ; preds = %2390, %2298
  %2302 = load i64, ptr %35, align 8, !tbaa !9
  %2303 = load i64, ptr %24, align 8, !tbaa !9
  %2304 = icmp sle i64 %2302, %2303
  br i1 %2304, label %2305, label %2393

2305:                                             ; preds = %2301
  %2306 = load ptr, ptr %17, align 8, !tbaa !5
  %2307 = load i64, ptr %37, align 8, !tbaa !9
  %2308 = load i64, ptr %36, align 8, !tbaa !9
  %2309 = sub nsw i64 %2307, %2308
  %2310 = load i64, ptr %35, align 8, !tbaa !9
  %2311 = add nsw i64 %2309, %2310
  %2312 = getelementptr inbounds %struct.doublecomplex, ptr %2306, i64 %2311
  call void @d_cnjg(ptr noundef %34, ptr noundef %2312)
  %2313 = getelementptr inbounds %struct.doublecomplex, ptr %34, i32 0, i32 0
  %2314 = load double, ptr %2313, align 8, !tbaa !16
  %2315 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 0
  %2316 = load double, ptr %2315, align 8, !tbaa !16
  %2317 = getelementptr inbounds %struct.doublecomplex, ptr %34, i32 0, i32 1
  %2318 = load double, ptr %2317, align 8, !tbaa !19
  %2319 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 1
  %2320 = load double, ptr %2319, align 8, !tbaa !19
  %2321 = fmul double %2318, %2320
  %2322 = fneg double %2321
  %2323 = call double @llvm.fmuladd.f64(double %2314, double %2316, double %2322)
  %2324 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 0
  store double %2323, ptr %2324, align 8, !tbaa !16
  %2325 = getelementptr inbounds %struct.doublecomplex, ptr %34, i32 0, i32 0
  %2326 = load double, ptr %2325, align 8, !tbaa !16
  %2327 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 1
  %2328 = load double, ptr %2327, align 8, !tbaa !19
  %2329 = getelementptr inbounds %struct.doublecomplex, ptr %34, i32 0, i32 1
  %2330 = load double, ptr %2329, align 8, !tbaa !19
  %2331 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 0
  %2332 = load double, ptr %2331, align 8, !tbaa !16
  %2333 = fmul double %2330, %2332
  %2334 = call double @llvm.fmuladd.f64(double %2326, double %2328, double %2333)
  %2335 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 1
  store double %2334, ptr %2335, align 8, !tbaa !19
  %2336 = load i64, ptr %35, align 8, !tbaa !9
  store i64 %2336, ptr %25, align 8, !tbaa !9
  %2337 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 0
  %2338 = load double, ptr %2337, align 8, !tbaa !16
  %2339 = load ptr, ptr %18, align 8, !tbaa !5
  %2340 = load i64, ptr %25, align 8, !tbaa !9
  %2341 = getelementptr inbounds %struct.doublecomplex, ptr %2339, i64 %2340
  %2342 = getelementptr inbounds %struct.doublecomplex, ptr %2341, i32 0, i32 0
  %2343 = load double, ptr %2342, align 8, !tbaa !16
  %2344 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 1
  %2345 = load double, ptr %2344, align 8, !tbaa !19
  %2346 = load ptr, ptr %18, align 8, !tbaa !5
  %2347 = load i64, ptr %25, align 8, !tbaa !9
  %2348 = getelementptr inbounds %struct.doublecomplex, ptr %2346, i64 %2347
  %2349 = getelementptr inbounds %struct.doublecomplex, ptr %2348, i32 0, i32 1
  %2350 = load double, ptr %2349, align 8, !tbaa !19
  %2351 = fmul double %2345, %2350
  %2352 = fneg double %2351
  %2353 = call double @llvm.fmuladd.f64(double %2338, double %2343, double %2352)
  %2354 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 0
  store double %2353, ptr %2354, align 8, !tbaa !16
  %2355 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 0
  %2356 = load double, ptr %2355, align 8, !tbaa !16
  %2357 = load ptr, ptr %18, align 8, !tbaa !5
  %2358 = load i64, ptr %25, align 8, !tbaa !9
  %2359 = getelementptr inbounds %struct.doublecomplex, ptr %2357, i64 %2358
  %2360 = getelementptr inbounds %struct.doublecomplex, ptr %2359, i32 0, i32 1
  %2361 = load double, ptr %2360, align 8, !tbaa !19
  %2362 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 1
  %2363 = load double, ptr %2362, align 8, !tbaa !19
  %2364 = load ptr, ptr %18, align 8, !tbaa !5
  %2365 = load i64, ptr %25, align 8, !tbaa !9
  %2366 = getelementptr inbounds %struct.doublecomplex, ptr %2364, i64 %2365
  %2367 = getelementptr inbounds %struct.doublecomplex, ptr %2366, i32 0, i32 0
  %2368 = load double, ptr %2367, align 8, !tbaa !16
  %2369 = fmul double %2363, %2368
  %2370 = call double @llvm.fmuladd.f64(double %2356, double %2361, double %2369)
  %2371 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 1
  store double %2370, ptr %2371, align 8, !tbaa !19
  %2372 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 0
  %2373 = load double, ptr %2372, align 8, !tbaa !16
  %2374 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 0
  %2375 = load double, ptr %2374, align 8, !tbaa !16
  %2376 = fadd double %2373, %2375
  %2377 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  store double %2376, ptr %2377, align 8, !tbaa !16
  %2378 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 1
  %2379 = load double, ptr %2378, align 8, !tbaa !19
  %2380 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 1
  %2381 = load double, ptr %2380, align 8, !tbaa !19
  %2382 = fadd double %2379, %2381
  %2383 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  store double %2382, ptr %2383, align 8, !tbaa !19
  %2384 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %2385 = load double, ptr %2384, align 8, !tbaa !16
  %2386 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 0
  store double %2385, ptr %2386, align 8, !tbaa !16
  %2387 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %2388 = load double, ptr %2387, align 8, !tbaa !19
  %2389 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 1
  store double %2388, ptr %2389, align 8, !tbaa !19
  br label %2390

2390:                                             ; preds = %2305
  %2391 = load i64, ptr %35, align 8, !tbaa !9
  %2392 = add nsw i64 %2391, 1
  store i64 %2392, ptr %35, align 8, !tbaa !9
  br label %2301, !llvm.loop !30

2393:                                             ; preds = %2301
  br label %2498

2394:                                             ; preds = %2295
  %2395 = load i64, ptr %36, align 8, !tbaa !9
  %2396 = load ptr, ptr %16, align 8, !tbaa !5
  %2397 = load i64, ptr %2396, align 8, !tbaa !9
  %2398 = icmp slt i64 %2395, %2397
  br i1 %2398, label %2399, label %2497

2399:                                             ; preds = %2394
  %2400 = load ptr, ptr %16, align 8, !tbaa !5
  %2401 = load i64, ptr %2400, align 8, !tbaa !9
  %2402 = load i64, ptr %36, align 8, !tbaa !9
  %2403 = sub nsw i64 %2401, %2402
  store i64 %2403, ptr %24, align 8, !tbaa !9
  store i64 1, ptr %35, align 8, !tbaa !9
  br label %2404

2404:                                             ; preds = %2493, %2399
  %2405 = load i64, ptr %35, align 8, !tbaa !9
  %2406 = load i64, ptr %24, align 8, !tbaa !9
  %2407 = icmp sle i64 %2405, %2406
  br i1 %2407, label %2408, label %2496

2408:                                             ; preds = %2404
  %2409 = load ptr, ptr %17, align 8, !tbaa !5
  %2410 = load i64, ptr %37, align 8, !tbaa !9
  %2411 = load i64, ptr %35, align 8, !tbaa !9
  %2412 = add nsw i64 %2410, %2411
  %2413 = getelementptr inbounds %struct.doublecomplex, ptr %2409, i64 %2412
  call void @d_cnjg(ptr noundef %34, ptr noundef %2413)
  %2414 = getelementptr inbounds %struct.doublecomplex, ptr %34, i32 0, i32 0
  %2415 = load double, ptr %2414, align 8, !tbaa !16
  %2416 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 0
  %2417 = load double, ptr %2416, align 8, !tbaa !16
  %2418 = getelementptr inbounds %struct.doublecomplex, ptr %34, i32 0, i32 1
  %2419 = load double, ptr %2418, align 8, !tbaa !19
  %2420 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 1
  %2421 = load double, ptr %2420, align 8, !tbaa !19
  %2422 = fmul double %2419, %2421
  %2423 = fneg double %2422
  %2424 = call double @llvm.fmuladd.f64(double %2415, double %2417, double %2423)
  %2425 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 0
  store double %2424, ptr %2425, align 8, !tbaa !16
  %2426 = getelementptr inbounds %struct.doublecomplex, ptr %34, i32 0, i32 0
  %2427 = load double, ptr %2426, align 8, !tbaa !16
  %2428 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 1
  %2429 = load double, ptr %2428, align 8, !tbaa !19
  %2430 = getelementptr inbounds %struct.doublecomplex, ptr %34, i32 0, i32 1
  %2431 = load double, ptr %2430, align 8, !tbaa !19
  %2432 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 0
  %2433 = load double, ptr %2432, align 8, !tbaa !16
  %2434 = fmul double %2431, %2433
  %2435 = call double @llvm.fmuladd.f64(double %2427, double %2429, double %2434)
  %2436 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 1
  store double %2435, ptr %2436, align 8, !tbaa !19
  %2437 = load i64, ptr %36, align 8, !tbaa !9
  %2438 = load i64, ptr %35, align 8, !tbaa !9
  %2439 = add nsw i64 %2437, %2438
  store i64 %2439, ptr %25, align 8, !tbaa !9
  %2440 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 0
  %2441 = load double, ptr %2440, align 8, !tbaa !16
  %2442 = load ptr, ptr %18, align 8, !tbaa !5
  %2443 = load i64, ptr %25, align 8, !tbaa !9
  %2444 = getelementptr inbounds %struct.doublecomplex, ptr %2442, i64 %2443
  %2445 = getelementptr inbounds %struct.doublecomplex, ptr %2444, i32 0, i32 0
  %2446 = load double, ptr %2445, align 8, !tbaa !16
  %2447 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 1
  %2448 = load double, ptr %2447, align 8, !tbaa !19
  %2449 = load ptr, ptr %18, align 8, !tbaa !5
  %2450 = load i64, ptr %25, align 8, !tbaa !9
  %2451 = getelementptr inbounds %struct.doublecomplex, ptr %2449, i64 %2450
  %2452 = getelementptr inbounds %struct.doublecomplex, ptr %2451, i32 0, i32 1
  %2453 = load double, ptr %2452, align 8, !tbaa !19
  %2454 = fmul double %2448, %2453
  %2455 = fneg double %2454
  %2456 = call double @llvm.fmuladd.f64(double %2441, double %2446, double %2455)
  %2457 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 0
  store double %2456, ptr %2457, align 8, !tbaa !16
  %2458 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 0
  %2459 = load double, ptr %2458, align 8, !tbaa !16
  %2460 = load ptr, ptr %18, align 8, !tbaa !5
  %2461 = load i64, ptr %25, align 8, !tbaa !9
  %2462 = getelementptr inbounds %struct.doublecomplex, ptr %2460, i64 %2461
  %2463 = getelementptr inbounds %struct.doublecomplex, ptr %2462, i32 0, i32 1
  %2464 = load double, ptr %2463, align 8, !tbaa !19
  %2465 = getelementptr inbounds %struct.doublecomplex, ptr %33, i32 0, i32 1
  %2466 = load double, ptr %2465, align 8, !tbaa !19
  %2467 = load ptr, ptr %18, align 8, !tbaa !5
  %2468 = load i64, ptr %25, align 8, !tbaa !9
  %2469 = getelementptr inbounds %struct.doublecomplex, ptr %2467, i64 %2468
  %2470 = getelementptr inbounds %struct.doublecomplex, ptr %2469, i32 0, i32 0
  %2471 = load double, ptr %2470, align 8, !tbaa !16
  %2472 = fmul double %2466, %2471
  %2473 = call double @llvm.fmuladd.f64(double %2459, double %2464, double %2472)
  %2474 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 1
  store double %2473, ptr %2474, align 8, !tbaa !19
  %2475 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 0
  %2476 = load double, ptr %2475, align 8, !tbaa !16
  %2477 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 0
  %2478 = load double, ptr %2477, align 8, !tbaa !16
  %2479 = fadd double %2476, %2478
  %2480 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  store double %2479, ptr %2480, align 8, !tbaa !16
  %2481 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 1
  %2482 = load double, ptr %2481, align 8, !tbaa !19
  %2483 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 1
  %2484 = load double, ptr %2483, align 8, !tbaa !19
  %2485 = fadd double %2482, %2484
  %2486 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  store double %2485, ptr %2486, align 8, !tbaa !19
  %2487 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %2488 = load double, ptr %2487, align 8, !tbaa !16
  %2489 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 0
  store double %2488, ptr %2489, align 8, !tbaa !16
  %2490 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %2491 = load double, ptr %2490, align 8, !tbaa !19
  %2492 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 1
  store double %2491, ptr %2492, align 8, !tbaa !19
  br label %2493

2493:                                             ; preds = %2408
  %2494 = load i64, ptr %35, align 8, !tbaa !9
  %2495 = add nsw i64 %2494, 1
  store i64 %2495, ptr %35, align 8, !tbaa !9
  br label %2404, !llvm.loop !31

2496:                                             ; preds = %2404
  br label %2497

2497:                                             ; preds = %2496, %2394
  br label %2498

2498:                                             ; preds = %2497, %2393
  br label %2499

2499:                                             ; preds = %2498, %2294
  %2500 = load double, ptr %49, align 8, !tbaa !11
  %2501 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  store double %2500, ptr %2501, align 8, !tbaa !16
  %2502 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  store double 0.000000e+00, ptr %2502, align 8, !tbaa !19
  %2503 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 0
  %2504 = load double, ptr %2503, align 8, !tbaa !16
  %2505 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %2506 = load double, ptr %2505, align 8, !tbaa !16
  %2507 = fcmp oeq double %2504, %2506
  br i1 %2507, label %2508, label %2750

2508:                                             ; preds = %2499
  %2509 = getelementptr inbounds %struct.doublecomplex, ptr %50, i32 0, i32 1
  %2510 = load double, ptr %2509, align 8, !tbaa !19
  %2511 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %2512 = load double, ptr %2511, align 8, !tbaa !19
  %2513 = fcmp oeq double %2510, %2512
  br i1 %2513, label %2514, label %2750

2514:                                             ; preds = %2508
  %2515 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %2515, ptr %24, align 8, !tbaa !9
  %2516 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %2516, ptr %25, align 8, !tbaa !9
  %2517 = load ptr, ptr %18, align 8, !tbaa !5
  %2518 = load i64, ptr %25, align 8, !tbaa !9
  %2519 = getelementptr inbounds %struct.doublecomplex, ptr %2517, i64 %2518
  %2520 = getelementptr inbounds %struct.doublecomplex, ptr %2519, i32 0, i32 0
  %2521 = load double, ptr %2520, align 8, !tbaa !16
  %2522 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 0
  %2523 = load double, ptr %2522, align 8, !tbaa !16
  %2524 = fsub double %2521, %2523
  %2525 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  store double %2524, ptr %2525, align 8, !tbaa !16
  %2526 = load ptr, ptr %18, align 8, !tbaa !5
  %2527 = load i64, ptr %25, align 8, !tbaa !9
  %2528 = getelementptr inbounds %struct.doublecomplex, ptr %2526, i64 %2527
  %2529 = getelementptr inbounds %struct.doublecomplex, ptr %2528, i32 0, i32 1
  %2530 = load double, ptr %2529, align 8, !tbaa !19
  %2531 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 1
  %2532 = load double, ptr %2531, align 8, !tbaa !19
  %2533 = fsub double %2530, %2532
  %2534 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  store double %2533, ptr %2534, align 8, !tbaa !19
  %2535 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %2536 = load double, ptr %2535, align 8, !tbaa !16
  %2537 = load ptr, ptr %18, align 8, !tbaa !5
  %2538 = load i64, ptr %24, align 8, !tbaa !9
  %2539 = getelementptr inbounds %struct.doublecomplex, ptr %2537, i64 %2538
  %2540 = getelementptr inbounds %struct.doublecomplex, ptr %2539, i32 0, i32 0
  store double %2536, ptr %2540, align 8, !tbaa !16
  %2541 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %2542 = load double, ptr %2541, align 8, !tbaa !19
  %2543 = load ptr, ptr %18, align 8, !tbaa !5
  %2544 = load i64, ptr %24, align 8, !tbaa !9
  %2545 = getelementptr inbounds %struct.doublecomplex, ptr %2543, i64 %2544
  %2546 = getelementptr inbounds %struct.doublecomplex, ptr %2545, i32 0, i32 1
  store double %2542, ptr %2546, align 8, !tbaa !19
  %2547 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %2547, ptr %24, align 8, !tbaa !9
  %2548 = load ptr, ptr %18, align 8, !tbaa !5
  %2549 = load i64, ptr %24, align 8, !tbaa !9
  %2550 = getelementptr inbounds %struct.doublecomplex, ptr %2548, i64 %2549
  %2551 = getelementptr inbounds %struct.doublecomplex, ptr %2550, i32 0, i32 0
  %2552 = load double, ptr %2551, align 8, !tbaa !16
  store double %2552, ptr %27, align 8, !tbaa !11
  %2553 = load double, ptr %27, align 8, !tbaa !11
  %2554 = fcmp oge double %2553, 0.000000e+00
  br i1 %2554, label %2555, label %2557

2555:                                             ; preds = %2514
  %2556 = load double, ptr %27, align 8, !tbaa !11
  br label %2560

2557:                                             ; preds = %2514
  %2558 = load double, ptr %27, align 8, !tbaa !11
  %2559 = fneg double %2558
  br label %2560

2560:                                             ; preds = %2557, %2555
  %2561 = phi double [ %2556, %2555 ], [ %2559, %2557 ]
  %2562 = load ptr, ptr %18, align 8, !tbaa !5
  %2563 = load i64, ptr %36, align 8, !tbaa !9
  %2564 = getelementptr inbounds %struct.doublecomplex, ptr %2562, i64 %2563
  %2565 = call double @d_imag(ptr noundef %2564)
  store double %2565, ptr %28, align 8, !tbaa !11
  %2566 = load double, ptr %28, align 8, !tbaa !11
  %2567 = fcmp oge double %2566, 0.000000e+00
  br i1 %2567, label %2568, label %2570

2568:                                             ; preds = %2560
  %2569 = load double, ptr %28, align 8, !tbaa !11
  br label %2573

2570:                                             ; preds = %2560
  %2571 = load double, ptr %28, align 8, !tbaa !11
  %2572 = fneg double %2571
  br label %2573

2573:                                             ; preds = %2570, %2568
  %2574 = phi double [ %2569, %2568 ], [ %2572, %2570 ]
  %2575 = fadd double %2561, %2574
  store double %2575, ptr %38, align 8, !tbaa !11
  %2576 = load i64, ptr %58, align 8, !tbaa !9
  %2577 = icmp ne i64 %2576, 0
  br i1 %2577, label %2578, label %2598

2578:                                             ; preds = %2573
  %2579 = load ptr, ptr %17, align 8, !tbaa !5
  %2580 = load i64, ptr %37, align 8, !tbaa !9
  %2581 = getelementptr inbounds %struct.doublecomplex, ptr %2579, i64 %2580
  call void @d_cnjg(ptr noundef %32, ptr noundef %2581)
  %2582 = load double, ptr %49, align 8, !tbaa !11
  %2583 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 0
  %2584 = load double, ptr %2583, align 8, !tbaa !16
  %2585 = fmul double %2582, %2584
  %2586 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  store double %2585, ptr %2586, align 8, !tbaa !16
  %2587 = load double, ptr %49, align 8, !tbaa !11
  %2588 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 1
  %2589 = load double, ptr %2588, align 8, !tbaa !19
  %2590 = fmul double %2587, %2589
  %2591 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  store double %2590, ptr %2591, align 8, !tbaa !19
  %2592 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %2593 = load double, ptr %2592, align 8, !tbaa !16
  %2594 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 0
  store double %2593, ptr %2594, align 8, !tbaa !16
  %2595 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %2596 = load double, ptr %2595, align 8, !tbaa !19
  %2597 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 1
  store double %2596, ptr %2597, align 8, !tbaa !19
  br label %2606

2598:                                             ; preds = %2573
  %2599 = load double, ptr %49, align 8, !tbaa !11
  %2600 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 0
  store double %2599, ptr %2600, align 8, !tbaa !16
  %2601 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 1
  store double 0.000000e+00, ptr %2601, align 8, !tbaa !19
  %2602 = load double, ptr %49, align 8, !tbaa !11
  %2603 = fcmp oeq double %2602, 1.000000e+00
  br i1 %2603, label %2604, label %2605

2604:                                             ; preds = %2598
  br label %2749

2605:                                             ; preds = %2598
  br label %2606

2606:                                             ; preds = %2605, %2578
  %2607 = getelementptr inbounds %struct.doublecomplex, ptr %46, i32 0, i32 0
  %2608 = load double, ptr %2607, align 8, !tbaa !16
  store double %2608, ptr %27, align 8, !tbaa !11
  %2609 = load double, ptr %27, align 8, !tbaa !11
  %2610 = fcmp oge double %2609, 0.000000e+00
  br i1 %2610, label %2611, label %2613

2611:                                             ; preds = %2606
  %2612 = load double, ptr %27, align 8, !tbaa !11
  br label %2616

2613:                                             ; preds = %2606
  %2614 = load double, ptr %27, align 8, !tbaa !11
  %2615 = fneg double %2614
  br label %2616

2616:                                             ; preds = %2613, %2611
  %2617 = phi double [ %2612, %2611 ], [ %2615, %2613 ]
  %2618 = call double @d_imag(ptr noundef %46)
  store double %2618, ptr %28, align 8, !tbaa !11
  %2619 = load double, ptr %28, align 8, !tbaa !11
  %2620 = fcmp oge double %2619, 0.000000e+00
  br i1 %2620, label %2621, label %2623

2621:                                             ; preds = %2616
  %2622 = load double, ptr %28, align 8, !tbaa !11
  br label %2626

2623:                                             ; preds = %2616
  %2624 = load double, ptr %28, align 8, !tbaa !11
  %2625 = fneg double %2624
  br label %2626

2626:                                             ; preds = %2623, %2621
  %2627 = phi double [ %2622, %2621 ], [ %2625, %2623 ]
  %2628 = fadd double %2617, %2627
  store double %2628, ptr %40, align 8, !tbaa !11
  %2629 = load double, ptr %40, align 8, !tbaa !11
  %2630 = load double, ptr %57, align 8, !tbaa !11
  %2631 = fcmp ogt double %2629, %2630
  br i1 %2631, label %2632, label %2673

2632:                                             ; preds = %2626
  %2633 = load double, ptr %40, align 8, !tbaa !11
  %2634 = fcmp olt double %2633, 1.000000e+00
  br i1 %2634, label %2635, label %2656

2635:                                             ; preds = %2632
  %2636 = load double, ptr %38, align 8, !tbaa !11
  %2637 = load double, ptr %40, align 8, !tbaa !11
  %2638 = load double, ptr %54, align 8, !tbaa !11
  %2639 = fmul double %2637, %2638
  %2640 = fcmp ogt double %2636, %2639
  br i1 %2640, label %2641, label %2655

2641:                                             ; preds = %2635
  %2642 = load double, ptr %38, align 8, !tbaa !11
  %2643 = fdiv double 1.000000e+00, %2642
  store double %2643, ptr %39, align 8, !tbaa !11
  %2644 = load ptr, ptr %16, align 8, !tbaa !5
  %2645 = load ptr, ptr %18, align 8, !tbaa !5
  %2646 = getelementptr inbounds %struct.doublecomplex, ptr %2645, i64 1
  %2647 = call i32 @f2c_zdscal(ptr noundef %2644, ptr noundef %39, ptr noundef %2646, ptr noundef @c__1)
  %2648 = load double, ptr %39, align 8, !tbaa !11
  %2649 = load ptr, ptr %19, align 8, !tbaa !5
  %2650 = load double, ptr %2649, align 8, !tbaa !11
  %2651 = fmul double %2650, %2648
  store double %2651, ptr %2649, align 8, !tbaa !11
  %2652 = load double, ptr %39, align 8, !tbaa !11
  %2653 = load double, ptr %47, align 8, !tbaa !11
  %2654 = fmul double %2653, %2652
  store double %2654, ptr %47, align 8, !tbaa !11
  br label %2655

2655:                                             ; preds = %2641, %2635
  br label %2656

2656:                                             ; preds = %2655, %2632
  %2657 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %2657, ptr %24, align 8, !tbaa !9
  %2658 = load ptr, ptr %18, align 8, !tbaa !5
  %2659 = load i64, ptr %36, align 8, !tbaa !9
  %2660 = getelementptr inbounds %struct.doublecomplex, ptr %2658, i64 %2659
  call void @zladiv_(ptr noundef %31, ptr noundef %2660, ptr noundef %46)
  %2661 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %2662 = load double, ptr %2661, align 8, !tbaa !16
  %2663 = load ptr, ptr %18, align 8, !tbaa !5
  %2664 = load i64, ptr %24, align 8, !tbaa !9
  %2665 = getelementptr inbounds %struct.doublecomplex, ptr %2663, i64 %2664
  %2666 = getelementptr inbounds %struct.doublecomplex, ptr %2665, i32 0, i32 0
  store double %2662, ptr %2666, align 8, !tbaa !16
  %2667 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %2668 = load double, ptr %2667, align 8, !tbaa !19
  %2669 = load ptr, ptr %18, align 8, !tbaa !5
  %2670 = load i64, ptr %24, align 8, !tbaa !9
  %2671 = getelementptr inbounds %struct.doublecomplex, ptr %2669, i64 %2670
  %2672 = getelementptr inbounds %struct.doublecomplex, ptr %2671, i32 0, i32 1
  store double %2668, ptr %2672, align 8, !tbaa !19
  br label %2748

2673:                                             ; preds = %2626
  %2674 = load double, ptr %40, align 8, !tbaa !11
  %2675 = fcmp ogt double %2674, 0.000000e+00
  br i1 %2675, label %2676, label %2716

2676:                                             ; preds = %2673
  %2677 = load double, ptr %38, align 8, !tbaa !11
  %2678 = load double, ptr %40, align 8, !tbaa !11
  %2679 = load double, ptr %54, align 8, !tbaa !11
  %2680 = fmul double %2678, %2679
  %2681 = fcmp ogt double %2677, %2680
  br i1 %2681, label %2682, label %2699

2682:                                             ; preds = %2676
  %2683 = load double, ptr %40, align 8, !tbaa !11
  %2684 = load double, ptr %54, align 8, !tbaa !11
  %2685 = fmul double %2683, %2684
  %2686 = load double, ptr %38, align 8, !tbaa !11
  %2687 = fdiv double %2685, %2686
  store double %2687, ptr %39, align 8, !tbaa !11
  %2688 = load ptr, ptr %16, align 8, !tbaa !5
  %2689 = load ptr, ptr %18, align 8, !tbaa !5
  %2690 = getelementptr inbounds %struct.doublecomplex, ptr %2689, i64 1
  %2691 = call i32 @f2c_zdscal(ptr noundef %2688, ptr noundef %39, ptr noundef %2690, ptr noundef @c__1)
  %2692 = load double, ptr %39, align 8, !tbaa !11
  %2693 = load ptr, ptr %19, align 8, !tbaa !5
  %2694 = load double, ptr %2693, align 8, !tbaa !11
  %2695 = fmul double %2694, %2692
  store double %2695, ptr %2693, align 8, !tbaa !11
  %2696 = load double, ptr %39, align 8, !tbaa !11
  %2697 = load double, ptr %47, align 8, !tbaa !11
  %2698 = fmul double %2697, %2696
  store double %2698, ptr %47, align 8, !tbaa !11
  br label %2699

2699:                                             ; preds = %2682, %2676
  %2700 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %2700, ptr %24, align 8, !tbaa !9
  %2701 = load ptr, ptr %18, align 8, !tbaa !5
  %2702 = load i64, ptr %36, align 8, !tbaa !9
  %2703 = getelementptr inbounds %struct.doublecomplex, ptr %2701, i64 %2702
  call void @zladiv_(ptr noundef %31, ptr noundef %2703, ptr noundef %46)
  %2704 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %2705 = load double, ptr %2704, align 8, !tbaa !16
  %2706 = load ptr, ptr %18, align 8, !tbaa !5
  %2707 = load i64, ptr %24, align 8, !tbaa !9
  %2708 = getelementptr inbounds %struct.doublecomplex, ptr %2706, i64 %2707
  %2709 = getelementptr inbounds %struct.doublecomplex, ptr %2708, i32 0, i32 0
  store double %2705, ptr %2709, align 8, !tbaa !16
  %2710 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %2711 = load double, ptr %2710, align 8, !tbaa !19
  %2712 = load ptr, ptr %18, align 8, !tbaa !5
  %2713 = load i64, ptr %24, align 8, !tbaa !9
  %2714 = getelementptr inbounds %struct.doublecomplex, ptr %2712, i64 %2713
  %2715 = getelementptr inbounds %struct.doublecomplex, ptr %2714, i32 0, i32 1
  store double %2711, ptr %2715, align 8, !tbaa !19
  br label %2747

2716:                                             ; preds = %2673
  %2717 = load ptr, ptr %16, align 8, !tbaa !5
  %2718 = load i64, ptr %2717, align 8, !tbaa !9
  store i64 %2718, ptr %24, align 8, !tbaa !9
  store i64 1, ptr %35, align 8, !tbaa !9
  br label %2719

2719:                                             ; preds = %2733, %2716
  %2720 = load i64, ptr %35, align 8, !tbaa !9
  %2721 = load i64, ptr %24, align 8, !tbaa !9
  %2722 = icmp sle i64 %2720, %2721
  br i1 %2722, label %2723, label %2736

2723:                                             ; preds = %2719
  %2724 = load i64, ptr %35, align 8, !tbaa !9
  store i64 %2724, ptr %25, align 8, !tbaa !9
  %2725 = load ptr, ptr %18, align 8, !tbaa !5
  %2726 = load i64, ptr %25, align 8, !tbaa !9
  %2727 = getelementptr inbounds %struct.doublecomplex, ptr %2725, i64 %2726
  %2728 = getelementptr inbounds %struct.doublecomplex, ptr %2727, i32 0, i32 0
  store double 0.000000e+00, ptr %2728, align 8, !tbaa !16
  %2729 = load ptr, ptr %18, align 8, !tbaa !5
  %2730 = load i64, ptr %25, align 8, !tbaa !9
  %2731 = getelementptr inbounds %struct.doublecomplex, ptr %2729, i64 %2730
  %2732 = getelementptr inbounds %struct.doublecomplex, ptr %2731, i32 0, i32 1
  store double 0.000000e+00, ptr %2732, align 8, !tbaa !19
  br label %2733

2733:                                             ; preds = %2723
  %2734 = load i64, ptr %35, align 8, !tbaa !9
  %2735 = add nsw i64 %2734, 1
  store i64 %2735, ptr %35, align 8, !tbaa !9
  br label %2719, !llvm.loop !32

2736:                                             ; preds = %2719
  %2737 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %2737, ptr %24, align 8, !tbaa !9
  %2738 = load ptr, ptr %18, align 8, !tbaa !5
  %2739 = load i64, ptr %24, align 8, !tbaa !9
  %2740 = getelementptr inbounds %struct.doublecomplex, ptr %2738, i64 %2739
  %2741 = getelementptr inbounds %struct.doublecomplex, ptr %2740, i32 0, i32 0
  store double 1.000000e+00, ptr %2741, align 8, !tbaa !16
  %2742 = load ptr, ptr %18, align 8, !tbaa !5
  %2743 = load i64, ptr %24, align 8, !tbaa !9
  %2744 = getelementptr inbounds %struct.doublecomplex, ptr %2742, i64 %2743
  %2745 = getelementptr inbounds %struct.doublecomplex, ptr %2744, i32 0, i32 1
  store double 0.000000e+00, ptr %2745, align 8, !tbaa !19
  %2746 = load ptr, ptr %19, align 8, !tbaa !5
  store double 0.000000e+00, ptr %2746, align 8, !tbaa !11
  store double 0.000000e+00, ptr %47, align 8, !tbaa !11
  br label %2747

2747:                                             ; preds = %2736, %2699
  br label %2748

2748:                                             ; preds = %2747, %2656
  br label %2749

2749:                                             ; preds = %2748, %2604
  br label %2779

2750:                                             ; preds = %2508, %2499
  %2751 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %2751, ptr %24, align 8, !tbaa !9
  %2752 = load ptr, ptr %18, align 8, !tbaa !5
  %2753 = load i64, ptr %36, align 8, !tbaa !9
  %2754 = getelementptr inbounds %struct.doublecomplex, ptr %2752, i64 %2753
  call void @zladiv_(ptr noundef %32, ptr noundef %2754, ptr noundef %46)
  %2755 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 0
  %2756 = load double, ptr %2755, align 8, !tbaa !16
  %2757 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 0
  %2758 = load double, ptr %2757, align 8, !tbaa !16
  %2759 = fsub double %2756, %2758
  %2760 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  store double %2759, ptr %2760, align 8, !tbaa !16
  %2761 = getelementptr inbounds %struct.doublecomplex, ptr %32, i32 0, i32 1
  %2762 = load double, ptr %2761, align 8, !tbaa !19
  %2763 = getelementptr inbounds %struct.doublecomplex, ptr %52, i32 0, i32 1
  %2764 = load double, ptr %2763, align 8, !tbaa !19
  %2765 = fsub double %2762, %2764
  %2766 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  store double %2765, ptr %2766, align 8, !tbaa !19
  %2767 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 0
  %2768 = load double, ptr %2767, align 8, !tbaa !16
  %2769 = load ptr, ptr %18, align 8, !tbaa !5
  %2770 = load i64, ptr %24, align 8, !tbaa !9
  %2771 = getelementptr inbounds %struct.doublecomplex, ptr %2769, i64 %2770
  %2772 = getelementptr inbounds %struct.doublecomplex, ptr %2771, i32 0, i32 0
  store double %2768, ptr %2772, align 8, !tbaa !16
  %2773 = getelementptr inbounds %struct.doublecomplex, ptr %31, i32 0, i32 1
  %2774 = load double, ptr %2773, align 8, !tbaa !19
  %2775 = load ptr, ptr %18, align 8, !tbaa !5
  %2776 = load i64, ptr %24, align 8, !tbaa !9
  %2777 = getelementptr inbounds %struct.doublecomplex, ptr %2775, i64 %2776
  %2778 = getelementptr inbounds %struct.doublecomplex, ptr %2777, i32 0, i32 1
  store double %2774, ptr %2778, align 8, !tbaa !19
  br label %2779

2779:                                             ; preds = %2750, %2749
  %2780 = load i64, ptr %36, align 8, !tbaa !9
  store i64 %2780, ptr %24, align 8, !tbaa !9
  %2781 = load double, ptr %47, align 8, !tbaa !11
  store double %2781, ptr %29, align 8, !tbaa !11
  %2782 = load ptr, ptr %18, align 8, !tbaa !5
  %2783 = load i64, ptr %24, align 8, !tbaa !9
  %2784 = getelementptr inbounds %struct.doublecomplex, ptr %2782, i64 %2783
  %2785 = getelementptr inbounds %struct.doublecomplex, ptr %2784, i32 0, i32 0
  %2786 = load double, ptr %2785, align 8, !tbaa !16
  store double %2786, ptr %27, align 8, !tbaa !11
  %2787 = load double, ptr %27, align 8, !tbaa !11
  %2788 = fcmp oge double %2787, 0.000000e+00
  br i1 %2788, label %2789, label %2791

2789:                                             ; preds = %2779
  %2790 = load double, ptr %27, align 8, !tbaa !11
  br label %2794

2791:                                             ; preds = %2779
  %2792 = load double, ptr %27, align 8, !tbaa !11
  %2793 = fneg double %2792
  br label %2794

2794:                                             ; preds = %2791, %2789
  %2795 = phi double [ %2790, %2789 ], [ %2793, %2791 ]
  %2796 = load ptr, ptr %18, align 8, !tbaa !5
  %2797 = load i64, ptr %36, align 8, !tbaa !9
  %2798 = getelementptr inbounds %struct.doublecomplex, ptr %2796, i64 %2797
  %2799 = call double @d_imag(ptr noundef %2798)
  store double %2799, ptr %28, align 8, !tbaa !11
  %2800 = load double, ptr %28, align 8, !tbaa !11
  %2801 = fcmp oge double %2800, 0.000000e+00
  br i1 %2801, label %2802, label %2804

2802:                                             ; preds = %2794
  %2803 = load double, ptr %28, align 8, !tbaa !11
  br label %2807

2804:                                             ; preds = %2794
  %2805 = load double, ptr %28, align 8, !tbaa !11
  %2806 = fneg double %2805
  br label %2807

2807:                                             ; preds = %2804, %2802
  %2808 = phi double [ %2803, %2802 ], [ %2806, %2804 ]
  %2809 = fadd double %2795, %2808
  store double %2809, ptr %30, align 8, !tbaa !11
  %2810 = load double, ptr %29, align 8, !tbaa !11
  %2811 = load double, ptr %30, align 8, !tbaa !11
  %2812 = fcmp oge double %2810, %2811
  br i1 %2812, label %2813, label %2815

2813:                                             ; preds = %2807
  %2814 = load double, ptr %29, align 8, !tbaa !11
  br label %2817

2815:                                             ; preds = %2807
  %2816 = load double, ptr %30, align 8, !tbaa !11
  br label %2817

2817:                                             ; preds = %2815, %2813
  %2818 = phi double [ %2814, %2813 ], [ %2816, %2815 ]
  store double %2818, ptr %47, align 8, !tbaa !11
  %2819 = load i64, ptr %42, align 8, !tbaa !9
  %2820 = add nsw i64 %2819, 1
  store i64 %2820, ptr %42, align 8, !tbaa !9
  %2821 = load i64, ptr %41, align 8, !tbaa !9
  %2822 = load i64, ptr %42, align 8, !tbaa !9
  %2823 = mul nsw i64 %2821, %2822
  %2824 = load i64, ptr %37, align 8, !tbaa !9
  %2825 = add nsw i64 %2824, %2823
  store i64 %2825, ptr %37, align 8, !tbaa !9
  br label %2826

2826:                                             ; preds = %2817
  %2827 = load i64, ptr %23, align 8, !tbaa !9
  %2828 = load i64, ptr %36, align 8, !tbaa !9
  %2829 = add nsw i64 %2828, %2827
  store i64 %2829, ptr %36, align 8, !tbaa !9
  br label %2083, !llvm.loop !33

2830:                                             ; preds = %2096
  br label %2831

2831:                                             ; preds = %2830, %2073
  br label %2832

2832:                                             ; preds = %2831, %1284
  %2833 = load double, ptr %49, align 8, !tbaa !11
  %2834 = load ptr, ptr %19, align 8, !tbaa !5
  %2835 = load double, ptr %2834, align 8, !tbaa !11
  %2836 = fdiv double %2835, %2833
  store double %2836, ptr %2834, align 8, !tbaa !11
  br label %2837

2837:                                             ; preds = %2832, %722
  %2838 = load double, ptr %49, align 8, !tbaa !11
  %2839 = fcmp une double %2838, 1.000000e+00
  br i1 %2839, label %2840, label %2847

2840:                                             ; preds = %2837
  %2841 = load double, ptr %49, align 8, !tbaa !11
  %2842 = fdiv double 1.000000e+00, %2841
  store double %2842, ptr %27, align 8, !tbaa !11
  %2843 = load ptr, ptr %16, align 8, !tbaa !5
  %2844 = load ptr, ptr %20, align 8, !tbaa !5
  %2845 = getelementptr inbounds double, ptr %2844, i64 1
  %2846 = call i32 @f2c_dscal(ptr noundef %2843, ptr noundef %27, ptr noundef %2845, ptr noundef @c__1)
  br label %2847

2847:                                             ; preds = %2840, %2837
  store i32 0, ptr %11, align 4
  store i32 1, ptr %59, align 4
  br label %2848

2848:                                             ; preds = %2847, %136, %127
  call void @llvm.lifetime.end.p0(i64 8, ptr %58) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %57) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %56) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %55) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %54) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %53) #4
  call void @llvm.lifetime.end.p0(i64 16, ptr %52) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %51) #4
  call void @llvm.lifetime.end.p0(i64 16, ptr %50) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %49) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %48) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %47) #4
  call void @llvm.lifetime.end.p0(i64 16, ptr %46) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %45) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %44) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %43) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %42) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %41) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %40) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %39) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %38) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %37) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %36) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %35) #4
  call void @llvm.lifetime.end.p0(i64 16, ptr %34) #4
  call void @llvm.lifetime.end.p0(i64 16, ptr %33) #4
  call void @llvm.lifetime.end.p0(i64 16, ptr %32) #4
  call void @llvm.lifetime.end.p0(i64 16, ptr %31) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %30) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %29) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %28) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %27) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %26) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %25) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %24) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %23) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %22) #4
  %2849 = load i32, ptr %11, align 4
  ret i32 %2849
}

; Function Attrs: nocallback nofree nosync nounwind willreturn memory(argmem: readwrite)
declare void @llvm.lifetime.start.p0(i64 immarg, ptr nocapture) #1

declare i64 @lsame_(ptr noundef, ptr noundef) #2

declare i32 @xerbla_(ptr noundef, ptr noundef) #2

declare double @dlamch_(ptr noundef) #2

declare i32 @dlabad_(ptr noundef, ptr noundef) #2

declare double @f2c_dzasum(ptr noundef, ptr noundef, ptr noundef) #2

declare i64 @f2c_idamax(ptr noundef, ptr noundef, ptr noundef) #2

declare i32 @f2c_dscal(ptr noundef, ptr noundef, ptr noundef, ptr noundef) #2

declare double @d_imag(ptr noundef) #2

declare i32 @f2c_ztpsv(ptr noundef, ptr noundef, ptr noundef, ptr noundef, ptr noundef, ptr noundef, ptr noundef) #2

declare i32 @f2c_zdscal(ptr noundef, ptr noundef, ptr noundef, ptr noundef) #2

declare void @zladiv_(ptr noundef, ptr noundef, ptr noundef) #2

declare i32 @f2c_zaxpy(ptr noundef, ptr noundef, ptr noundef, ptr noundef, ptr noundef, ptr noundef) #2

declare i64 @f2c_izamax(ptr noundef, ptr noundef, ptr noundef) #2

declare void @f2c_zdotu(ptr noundef, ptr noundef, ptr noundef, ptr noundef, ptr noundef, ptr noundef) #2

; Function Attrs: nocallback nofree nosync nounwind speculatable willreturn memory(none)
declare double @llvm.fmuladd.f64(double, double, double) #3

declare void @d_cnjg(ptr noundef, ptr noundef) #2

declare void @f2c_zdotc(ptr noundef, ptr noundef, ptr noundef, ptr noundef, ptr noundef, ptr noundef) #2

; Function Attrs: nocallback nofree nosync nounwind willreturn memory(argmem: readwrite)
declare void @llvm.lifetime.end.p0(i64 immarg, ptr nocapture) #1

attributes #0 = { nounwind uwtable "min-legal-vector-width"="0" "no-trapping-math"="true" "stack-protector-buffer-size"="8" "target-cpu"="x86-64" "target-features"="+cmov,+cx8,+fxsr,+mmx,+sse,+sse2,+x87" "tune-cpu"="generic" }
attributes #1 = { nocallback nofree nosync nounwind willreturn memory(argmem: readwrite) }
attributes #2 = { "no-trapping-math"="true" "stack-protector-buffer-size"="8" "target-cpu"="x86-64" "target-features"="+cmov,+cx8,+fxsr,+mmx,+sse,+sse2,+x87" "tune-cpu"="generic" }
attributes #3 = { nocallback nofree nosync nounwind speculatable willreturn memory(none) }
attributes #4 = { nounwind }

!llvm.module.flags = !{!0, !1, !2, !3}
!llvm.ident = !{!4}

!0 = !{i32 1, !"wchar_size", i32 4}
!1 = !{i32 8, !"PIC Level", i32 2}
!2 = !{i32 7, !"PIE Level", i32 2}
!3 = !{i32 7, !"uwtable", i32 2}
!4 = !{!"clang version 19.1.0 (git@github.com:llvm/llvm-project.git a4bf6cd7cfb1a1421ba92bca9d017b49936c55e4)"}
!5 = !{!6, !6, i64 0}
!6 = !{!"any pointer", !7, i64 0}
!7 = !{!"omnipotent char", !8, i64 0}
!8 = !{!"Simple C/C++ TBAA"}
!9 = !{!10, !10, i64 0}
!10 = !{!"long", !7, i64 0}
!11 = !{!12, !12, i64 0}
!12 = !{!"double", !7, i64 0}
!13 = distinct !{!13, !14}
!14 = !{!"llvm.loop.mustprogress"}
!15 = distinct !{!15, !14}
!16 = !{!17, !12, i64 0}
!17 = !{!"", !12, i64 0, !12, i64 8}
!18 = distinct !{!18, !14}
!19 = !{!17, !12, i64 8}
!20 = distinct !{!20, !14}
!21 = distinct !{!21, !14}
!22 = distinct !{!22, !14}
!23 = distinct !{!23, !14}
!24 = distinct !{!24, !14}
!25 = distinct !{!25, !14}
!26 = distinct !{!26, !14}
!27 = distinct !{!27, !14}
!28 = distinct !{!28, !14}
!29 = distinct !{!29, !14}
!30 = distinct !{!30, !14}
!31 = distinct !{!31, !14}
!32 = distinct !{!32, !14}
!33 = distinct !{!33, !14}


; Optimized IR (opt -passes='default<O3>'):
target datalayout = "e-m:e-p270:32:32-p271:32:32-p272:64:64-i64:64-i128:128-f80:128-n8:16:32:64-S128"
target triple = "x86_64-unknown-linux-gnu"

%struct.doublecomplex = type { double, double }

@.str = external hidden unnamed_addr constant [2 x i8], align 1
@.str.1 = external hidden unnamed_addr constant [2 x i8], align 1
@.str.2 = external hidden unnamed_addr constant [2 x i8], align 1
@.str.3 = external hidden unnamed_addr constant [2 x i8], align 1
@.str.4 = external hidden unnamed_addr constant [2 x i8], align 1
@.str.5 = external hidden unnamed_addr constant [2 x i8], align 1
@.str.6 = external hidden unnamed_addr constant [7 x i8], align 1
@.str.7 = external hidden unnamed_addr constant [13 x i8], align 1
@.str.8 = external hidden unnamed_addr constant [10 x i8], align 1
@c__1 = external hidden global i64, align 8
@c_b36 = external hidden global double, align 8

; Function Attrs: nounwind uwtable
define dso_local noundef i32 @zlatps_(ptr noundef %0, ptr noundef %1, ptr noundef %2, ptr noundef %3, ptr noundef %4, ptr noundef %5, ptr noundef %6, ptr noundef %7, ptr noundef %8, ptr nocapture noundef %9) local_unnamed_addr #0 {
  %11 = alloca i64, align 8
  %12 = alloca i64, align 8
  %13 = alloca i64, align 8
  %14 = alloca double, align 8
  %15 = alloca %struct.doublecomplex, align 16
  %16 = alloca %struct.doublecomplex, align 16
  %17 = alloca %struct.doublecomplex, align 8
  %18 = alloca double, align 8
  %19 = alloca %struct.doublecomplex, align 16
  %20 = alloca double, align 8
  %21 = alloca %struct.doublecomplex, align 16
  %22 = alloca double, align 8
  %23 = alloca double, align 8
  call void @llvm.lifetime.start.p0(i64 8, ptr nonnull %11) #6
  call void @llvm.lifetime.start.p0(i64 8, ptr nonnull %12) #6
  call void @llvm.lifetime.start.p0(i64 8, ptr nonnull %13) #6
  call void @llvm.lifetime.start.p0(i64 8, ptr nonnull %14) #6
  call void @llvm.lifetime.start.p0(i64 16, ptr nonnull %15) #6
  call void @llvm.lifetime.start.p0(i64 16, ptr nonnull %16) #6
  call void @llvm.lifetime.start.p0(i64 16, ptr nonnull %17) #6
  call void @llvm.lifetime.start.p0(i64 8, ptr nonnull %18) #6
  call void @llvm.lifetime.start.p0(i64 16, ptr nonnull %19) #6
  call void @llvm.lifetime.start.p0(i64 8, ptr nonnull %20) #6
  call void @llvm.lifetime.start.p0(i64 16, ptr nonnull %21) #6
  call void @llvm.lifetime.start.p0(i64 8, ptr nonnull %22) #6
  call void @llvm.lifetime.start.p0(i64 8, ptr nonnull %23) #6
  %24 = getelementptr inbounds i8, ptr %8, i64 -8
  %25 = getelementptr inbounds i8, ptr %6, i64 -16
  %26 = getelementptr inbounds i8, ptr %5, i64 -16
  store i64 0, ptr %9, align 8, !tbaa !5
  %27 = tail call i64 @lsame_(ptr noundef %0, ptr noundef nonnull @.str) #6
  %28 = tail call i64 @lsame_(ptr noundef %1, ptr noundef nonnull @.str.1) #6
  %29 = tail call i64 @lsame_(ptr noundef %2, ptr noundef nonnull @.str.1) #6
  %.not.not.not = icmp eq i64 %27, 0
  br i1 %.not.not.not, label %30, label %32

30:                                               ; preds = %10
  %31 = tail call i64 @lsame_(ptr noundef %0, ptr noundef nonnull @.str.2) #6
  %.not819 = icmp eq i64 %31, 0
  br i1 %.not819, label %.thread.sink.split, label %32

32:                                               ; preds = %30, %10
  %.not820 = icmp eq i64 %28, 0
  br i1 %.not820, label %33, label %37

33:                                               ; preds = %32
  %34 = tail call i64 @lsame_(ptr noundef %1, ptr noundef nonnull @.str.3) #6
  %.not821 = icmp eq i64 %34, 0
  br i1 %.not821, label %35, label %37

35:                                               ; preds = %33
  %36 = tail call i64 @lsame_(ptr noundef %1, ptr noundef nonnull @.str.4) #6
  %.not822 = icmp eq i64 %36, 0
  br i1 %.not822, label %.thread.sink.split, label %37

37:                                               ; preds = %35, %33, %32
  %.not823 = icmp eq i64 %29, 0
  br i1 %.not823, label %38, label %40

38:                                               ; preds = %37
  %39 = tail call i64 @lsame_(ptr noundef %2, ptr noundef nonnull @.str) #6
  %.not824 = icmp eq i64 %39, 0
  br i1 %.not824, label %.thread.sink.split, label %40

40:                                               ; preds = %38, %37
  %41 = tail call i64 @lsame_(ptr noundef %3, ptr noundef nonnull @.str.5) #6
  %.not825 = icmp eq i64 %41, 0
  br i1 %.not825, label %42, label %44

42:                                               ; preds = %40
  %43 = tail call i64 @lsame_(ptr noundef %3, ptr noundef nonnull @.str.1) #6
  %.not826 = icmp eq i64 %43, 0
  br i1 %.not826, label %.thread.sink.split, label %44

44:                                               ; preds = %42, %40
  %45 = load i64, ptr %4, align 8, !tbaa !5
  %46 = icmp slt i64 %45, 0
  br i1 %46, label %.thread.sink.split, label %47

47:                                               ; preds = %44
  %.pr = load i64, ptr %9, align 8, !tbaa !5
  %.not827 = icmp eq i64 %.pr, 0
  br i1 %.not827, label %51, label %.thread

.thread.sink.split:                               ; preds = %44, %42, %38, %35, %30
  %.sink = phi i64 [ -1, %30 ], [ -2, %35 ], [ -3, %38 ], [ -4, %42 ], [ -5, %44 ]
  store i64 %.sink, ptr %9, align 8, !tbaa !5
  br label %.thread

.thread:                                          ; preds = %.thread.sink.split, %47
  %48 = phi i64 [ %.pr, %47 ], [ %.sink, %.thread.sink.split ]
  %49 = sub nsw i64 0, %48
  store i64 %49, ptr %11, align 8, !tbaa !5
  %50 = call i32 @xerbla_(ptr noundef nonnull @.str.6, ptr noundef nonnull %11) #6
  br label %948

51:                                               ; preds = %47
  %52 = icmp eq i64 %45, 0
  br i1 %52, label %948, label %53

53:                                               ; preds = %51
  %54 = tail call double @dlamch_(ptr noundef nonnull @.str.7) #6
  store double %54, ptr %23, align 8, !tbaa !9
  %55 = fdiv double 1.000000e+00, %54
  store double %55, ptr %22, align 8, !tbaa !9
  %56 = call i32 @dlabad_(ptr noundef nonnull %23, ptr noundef nonnull %22) #6
  %57 = call double @dlamch_(ptr noundef nonnull @.str.8) #6
  %58 = load double, ptr %23, align 8, !tbaa !9
  %59 = fdiv double %58, %57
  store double %59, ptr %23, align 8, !tbaa !9
  %60 = fdiv double 1.000000e+00, %59
  store double %60, ptr %22, align 8, !tbaa !9
  store double 1.000000e+00, ptr %7, align 8, !tbaa !9
  %61 = call i64 @lsame_(ptr noundef %3, ptr noundef nonnull @.str.1) #6
  %.not828 = icmp eq i64 %61, 0
  br i1 %.not828, label %.loopexit880, label %62

62:                                               ; preds = %53
  %63 = load i64, ptr %4, align 8, !tbaa !5
  br i1 %.not.not.not, label %71, label %64

64:                                               ; preds = %62
  store i64 %63, ptr %11, align 8, !tbaa !5
  %.not830883 = icmp slt i64 %63, 1
  br i1 %.not830883, label %.loopexit880, label %.lr.ph

.lr.ph:                                           ; preds = %64, %.lr.ph
  %.0764885 = phi i64 [ %69, %.lr.ph ], [ 1, %64 ]
  %.0772884 = phi i64 [ %70, %.lr.ph ], [ 1, %64 ]
  %65 = add nsw i64 %.0772884, -1
  store i64 %65, ptr %12, align 8, !tbaa !5
  %66 = getelementptr inbounds %struct.doublecomplex, ptr %26, i64 %.0764885
  %67 = call double @f2c_dzasum(ptr noundef nonnull %12, ptr noundef nonnull %66, ptr noundef nonnull @c__1) #6
  %68 = getelementptr inbounds double, ptr %24, i64 %.0772884
  store double %67, ptr %68, align 8, !tbaa !9
  %69 = add nuw nsw i64 %.0764885, %.0772884
  %70 = add nuw nsw i64 %.0772884, 1
  %.not830.not = icmp slt i64 %.0772884, %63
  br i1 %.not830.not, label %.lr.ph, label %.loopexit880, !llvm.loop !11

71:                                               ; preds = %62
  %72 = add nsw i64 %63, -1
  store i64 %72, ptr %11, align 8, !tbaa !5
  %.not829886 = icmp slt i64 %63, 2
  br i1 %.not829886, label %._crit_edge, label %.lr.ph889

.lr.ph889:                                        ; preds = %71, %.lr.ph889
  %73 = phi i64 [ %78, %.lr.ph889 ], [ %63, %71 ]
  %.1765888 = phi i64 [ %80, %.lr.ph889 ], [ 1, %71 ]
  %.1773887 = phi i64 [ %81, %.lr.ph889 ], [ 1, %71 ]
  %74 = sub nsw i64 %73, %.1773887
  store i64 %74, ptr %12, align 8, !tbaa !5
  %75 = getelementptr %struct.doublecomplex, ptr %5, i64 %.1765888
  %76 = call double @f2c_dzasum(ptr noundef nonnull %12, ptr noundef %75, ptr noundef nonnull @c__1) #6
  %77 = getelementptr inbounds double, ptr %24, i64 %.1773887
  store double %76, ptr %77, align 8, !tbaa !9
  %78 = load i64, ptr %4, align 8, !tbaa !5
  %reass.sub = sub i64 %.1765888, %.1773887
  %79 = add i64 %reass.sub, 1
  %80 = add i64 %79, %78
  %81 = add nuw nsw i64 %.1773887, 1
  %.not829.not = icmp slt i64 %.1773887, %72
  br i1 %.not829.not, label %.lr.ph889, label %._crit_edge, !llvm.loop !13

._crit_edge:                                      ; preds = %.lr.ph889, %71
  %82 = phi i64 [ %63, %71 ], [ %78, %.lr.ph889 ]
  %83 = getelementptr inbounds double, ptr %24, i64 %82
  store double 0.000000e+00, ptr %83, align 8, !tbaa !9
  br label %.loopexit880

.loopexit880:                                     ; preds = %.lr.ph, %64, %._crit_edge, %53
  %84 = call i64 @f2c_idamax(ptr noundef nonnull %4, ptr noundef %8, ptr noundef nonnull @c__1) #6
  %85 = getelementptr inbounds double, ptr %24, i64 %84
  %86 = load double, ptr %85, align 8, !tbaa !9
  %87 = load double, ptr %22, align 8, !tbaa !9
  %88 = fmul double %87, 5.000000e-01
  %89 = fcmp ugt double %86, %88
  br i1 %89, label %91, label %90

90:                                               ; preds = %.loopexit880
  store double 1.000000e+00, ptr %20, align 8, !tbaa !9
  br label %96

91:                                               ; preds = %.loopexit880
  %92 = load double, ptr %23, align 8, !tbaa !9
  %93 = fmul double %86, %92
  %94 = fdiv double 5.000000e-01, %93
  store double %94, ptr %20, align 8, !tbaa !9
  %95 = call i32 @f2c_dscal(ptr noundef nonnull %4, ptr noundef nonnull %20, ptr noundef nonnull %8, ptr noundef nonnull @c__1) #6
  br label %96

96:                                               ; preds = %91, %90
  %97 = load i64, ptr %4, align 8, !tbaa !5
  %.not831890 = icmp slt i64 %97, 1
  br i1 %.not831890, label %._crit_edge895, label %.lr.ph894

.lr.ph894:                                        ; preds = %96, %.lr.ph894
  %.0746892 = phi double [ %111, %.lr.ph894 ], [ 0.000000e+00, %96 ]
  %.2774891 = phi i64 [ %112, %.lr.ph894 ], [ 1, %96 ]
  store i64 %.2774891, ptr %12, align 8, !tbaa !5
  %98 = getelementptr inbounds %struct.doublecomplex, ptr %25, i64 %.2774891
  %99 = load double, ptr %98, align 8, !tbaa !14
  %100 = fmul double %99, 5.000000e-01
  store double %100, ptr %14, align 8, !tbaa !9
  %101 = call double @d_imag(ptr noundef nonnull %98) #6
  %102 = fmul double %101, 5.000000e-01
  %103 = insertelement <2 x double> poison, double %100, i64 0
  %104 = insertelement <2 x double> %103, double %102, i64 1
  %105 = fcmp oge <2 x double> %104, zeroinitializer
  %106 = fneg <2 x double> %104
  %107 = select <2 x i1> %105, <2 x double> %104, <2 x double> %106
  %shift = shufflevector <2 x double> %107, <2 x double> poison, <2 x i32> <i32 1, i32 poison>
  %108 = fadd <2 x double> %107, %shift
  %109 = extractelement <2 x double> %108, i64 0
  %110 = fcmp oge double %.0746892, %109
  %111 = select i1 %110, double %.0746892, double %109
  %112 = add nuw nsw i64 %.2774891, 1
  %.not831.not = icmp slt i64 %.2774891, %97
  br i1 %.not831.not, label %.lr.ph894, label %._crit_edge895, !llvm.loop !16

._crit_edge895:                                   ; preds = %.lr.ph894, %96
  %.0746.lcssa = phi double [ 0.000000e+00, %96 ], [ %111, %.lr.ph894 ]
  %113 = load i64, ptr %4, align 8, !tbaa !5
  %114 = load double, ptr %20, align 8, !tbaa !9
  %115 = fcmp une double %114, 1.000000e+00
  br i1 %.not820, label %181, label %116

116:                                              ; preds = %._crit_edge895
  %. = select i1 %.not.not.not, i64 1, i64 -1
  %.1061 = select i1 %.not.not.not, i64 %113, i64 1
  %.1062 = select i1 %.not.not.not, i64 1, i64 %113
  br i1 %115, label %.loopexit876, label %117

117:                                              ; preds = %116
  %118 = load double, ptr %23, align 8
  %119 = fcmp oge double %.0746.lcssa, %118
  %120 = select i1 %119, double %.0746.lcssa, double %118
  %121 = fdiv double 5.000000e-01, %120
  br i1 %.not823, label %166, label %122

122:                                              ; preds = %117
  store i64 %., ptr %12, align 8, !tbaa !5
  %123 = icmp sge i64 %.1062, %.1061
  %124 = icmp sle i64 %.1062, %.1061
  %.in837896 = select i1 %.not.not.not, i1 %124, i1 %123
  br i1 %.in837896, label %.lr.ph903, label %.loopexit876

.lr.ph903:                                        ; preds = %122
  %125 = add nsw i64 %.1062, 1
  %126 = mul nsw i64 %125, %.1062
  %127 = sdiv i64 %126, 2
  br label %128

128:                                              ; preds = %.lr.ph903, %151
  %129 = phi double [ %118, %.lr.ph903 ], [ %143, %151 ]
  %.0743901 = phi double [ %121, %.lr.ph903 ], [ %.1744, %151 ]
  %.0752900 = phi double [ %121, %.lr.ph903 ], [ %.1753, %151 ]
  %.0756899 = phi i64 [ %113, %.lr.ph903 ], [ %160, %151 ]
  %.2766898 = phi i64 [ %127, %.lr.ph903 ], [ %159, %151 ]
  %.3775897 = phi i64 [ %.1062, %.lr.ph903 ], [ %162, %151 ]
  %130 = fcmp ugt double %.0743901, %129
  br i1 %130, label %131, label %.loopexit876

131:                                              ; preds = %128
  store i64 %.2766898, ptr %13, align 8, !tbaa !5
  %132 = getelementptr inbounds %struct.doublecomplex, ptr %26, i64 %.2766898
  %133 = load <2 x double>, ptr %132, align 8, !tbaa !9
  store <2 x double> %133, ptr %19, align 16, !tbaa !9
  %134 = extractelement <2 x double> %133, i64 0
  store double %134, ptr %14, align 8, !tbaa !9
  %135 = fcmp oge double %134, 0.000000e+00
  %136 = fneg double %134
  %137 = select i1 %135, double %134, double %136
  %138 = call double @d_imag(ptr noundef nonnull %19) #6
  %139 = fcmp oge double %138, 0.000000e+00
  %140 = fneg double %138
  %141 = select i1 %139, double %138, double %140
  %142 = fadd double %137, %141
  %143 = load double, ptr %23, align 8, !tbaa !9
  %144 = fcmp ult double %142, %143
  br i1 %144, label %151, label %145

145:                                              ; preds = %131
  store double %.0752900, ptr %14, align 8, !tbaa !9
  %146 = fcmp oge double %142, 1.000000e+00
  %147 = select i1 %146, double 1.000000e+00, double %142
  %148 = fmul double %.0743901, %147
  %149 = fcmp ole double %.0752900, %148
  %150 = select i1 %149, double %.0752900, double %148
  br label %151

151:                                              ; preds = %131, %145
  %.1753 = phi double [ %150, %145 ], [ 0.000000e+00, %131 ]
  %152 = getelementptr inbounds double, ptr %24, i64 %.3775897
  %153 = load double, ptr %152, align 8, !tbaa !9
  %154 = fadd double %142, %153
  %155 = fcmp ult double %154, %143
  %156 = fdiv double %142, %154
  %157 = fmul double %.0743901, %156
  %.1744 = select i1 %155, double 0.000000e+00, double %157
  %158 = mul nsw i64 %.0756899, %.
  %159 = add nsw i64 %158, %.2766898
  %160 = add nsw i64 %.0756899, -1
  %161 = load i64, ptr %12, align 8, !tbaa !5
  %162 = add nsw i64 %161, %.3775897
  %163 = icmp slt i64 %161, 0
  %164 = icmp sge i64 %162, %.1061
  %165 = icmp sle i64 %162, %.1061
  %.in837 = select i1 %163, i1 %164, i1 %165
  br i1 %.in837, label %128, label %.loopexit876, !llvm.loop !17

166:                                              ; preds = %117
  %167 = fcmp oge double %121, 1.000000e+00
  %168 = select i1 %167, double 1.000000e+00, double %121
  store i64 %.1061, ptr %12, align 8, !tbaa !5
  %169 = icmp sge i64 %.1062, %.1061
  %170 = icmp sle i64 %.1062, %.1061
  %.in836907 = select i1 %.not.not.not, i1 %170, i1 %169
  %171 = fcmp ugt double %168, %118
  %or.cond855908 = select i1 %.in836907, i1 %171, i1 false
  br i1 %or.cond855908, label %.lr.ph912, label %.loopexit876

.lr.ph912:                                        ; preds = %166, %.lr.ph912
  %.2745910 = phi double [ %176, %.lr.ph912 ], [ %168, %166 ]
  %.4776909 = phi i64 [ %177, %.lr.ph912 ], [ %.1062, %166 ]
  %172 = getelementptr inbounds double, ptr %24, i64 %.4776909
  %173 = load double, ptr %172, align 8, !tbaa !9
  %174 = fadd double %173, 1.000000e+00
  %175 = fdiv double 1.000000e+00, %174
  %176 = fmul double %.2745910, %175
  %177 = add nsw i64 %.4776909, %.
  %178 = icmp sge i64 %177, %.1061
  %179 = icmp sle i64 %177, %.1061
  %.in836 = select i1 %.not.not.not, i1 %179, i1 %178
  %180 = fcmp ugt double %176, %118
  %or.cond855 = select i1 %.in836, i1 %180, i1 false
  br i1 %or.cond855, label %.lr.ph912, label %.loopexit876, !llvm.loop !18

181:                                              ; preds = %._crit_edge895
  %.1063 = select i1 %.not.not.not, i64 -1, i64 1
  %.1064 = select i1 %.not.not.not, i64 1, i64 %113
  %.1065 = select i1 %.not.not.not, i64 %113, i64 1
  br i1 %115, label %.loopexit876, label %182

182:                                              ; preds = %181
  %183 = load double, ptr %23, align 8
  %184 = fcmp oge double %.0746.lcssa, %183
  %185 = select i1 %184, double %.0746.lcssa, double %183
  %186 = fdiv double 5.000000e-01, %185
  br i1 %.not823, label %232, label %187

187:                                              ; preds = %182
  store i64 %.1064, ptr %11, align 8, !tbaa !5
  store i64 %.1063, ptr %12, align 8, !tbaa !5
  %188 = icmp sge i64 %.1065, %.1064
  %189 = icmp sle i64 %.1065, %.1064
  %.in834914 = select i1 %.not.not.not, i1 %188, i1 %189
  br i1 %.in834914, label %.lr.ph921, label %._crit_edge922

.lr.ph921:                                        ; preds = %187
  %190 = add nsw i64 %.1065, 1
  %191 = mul nsw i64 %190, %.1065
  %192 = sdiv i64 %191, 2
  br label %193

193:                                              ; preds = %.lr.ph921, %221
  %194 = phi double [ %183, %.lr.ph921 ], [ %214, %221 ]
  %.3919 = phi double [ %186, %.lr.ph921 ], [ %202, %221 ]
  %.2754918 = phi double [ %186, %.lr.ph921 ], [ %.3755, %221 ]
  %.1757917 = phi i64 [ 1, %.lr.ph921 ], [ %222, %221 ]
  %.3767916 = phi i64 [ %192, %.lr.ph921 ], [ %224, %221 ]
  %.5777915 = phi i64 [ %.1065, %.lr.ph921 ], [ %226, %221 ]
  %195 = fcmp ugt double %.3919, %194
  br i1 %195, label %196, label %.loopexit876

196:                                              ; preds = %193
  %197 = getelementptr inbounds double, ptr %24, i64 %.5777915
  %198 = load double, ptr %197, align 8, !tbaa !9
  %199 = fadd double %198, 1.000000e+00
  %200 = fdiv double %.2754918, %199
  %201 = fcmp ole double %.3919, %200
  %202 = select i1 %201, double %.3919, double %200
  store i64 %.3767916, ptr %13, align 8, !tbaa !5
  %203 = getelementptr inbounds %struct.doublecomplex, ptr %26, i64 %.3767916
  %204 = load <2 x double>, ptr %203, align 8, !tbaa !9
  store <2 x double> %204, ptr %19, align 16, !tbaa !9
  %205 = extractelement <2 x double> %204, i64 0
  store double %205, ptr %14, align 8, !tbaa !9
  %206 = fcmp oge double %205, 0.000000e+00
  %207 = fneg double %205
  %208 = select i1 %206, double %205, double %207
  %209 = call double @d_imag(ptr noundef nonnull %19) #6
  %210 = fcmp oge double %209, 0.000000e+00
  %211 = fneg double %209
  %212 = select i1 %210, double %209, double %211
  %213 = fadd double %208, %212
  %214 = load double, ptr %23, align 8, !tbaa !9
  %215 = fcmp ult double %213, %214
  br i1 %215, label %221, label %216

216:                                              ; preds = %196
  %217 = fcmp ogt double %199, %213
  br i1 %217, label %218, label %221

218:                                              ; preds = %216
  %219 = fdiv double %213, %199
  %220 = fmul double %.2754918, %219
  br label %221

221:                                              ; preds = %196, %216, %218
  %.3755 = phi double [ %220, %218 ], [ %.2754918, %216 ], [ 0.000000e+00, %196 ]
  %222 = add nuw nsw i64 %.1757917, 1
  %223 = mul nsw i64 %222, %.1063
  %224 = add nsw i64 %223, %.3767916
  %225 = load i64, ptr %12, align 8, !tbaa !5
  %226 = add nsw i64 %225, %.5777915
  %227 = icmp slt i64 %225, 0
  %228 = icmp sge i64 %226, %.1064
  %229 = icmp sle i64 %226, %.1064
  %.in834 = select i1 %227, i1 %228, i1 %229
  br i1 %.in834, label %193, label %._crit_edge922, !llvm.loop !19

._crit_edge922:                                   ; preds = %221, %187
  %.2754.lcssa = phi double [ %186, %187 ], [ %.3755, %221 ]
  %.3.lcssa = phi double [ %186, %187 ], [ %202, %221 ]
  %230 = fcmp ole double %.3.lcssa, %.2754.lcssa
  %231 = select i1 %230, double %.3.lcssa, double %.2754.lcssa
  br label %.loopexit876

232:                                              ; preds = %182
  %233 = fcmp oge double %186, 1.000000e+00
  %234 = select i1 %233, double 1.000000e+00, double %186
  store i64 %.1064, ptr %12, align 8, !tbaa !5
  %235 = icmp sge i64 %.1065, %.1064
  %236 = icmp sle i64 %.1065, %.1064
  %.in925 = select i1 %.not.not.not, i1 %235, i1 %236
  %237 = fcmp ugt double %234, %183
  %or.cond857926 = select i1 %.in925, i1 %237, i1 false
  br i1 %or.cond857926, label %.lr.ph930, label %.loopexit876

.lr.ph930:                                        ; preds = %232, %.lr.ph930
  %.4928 = phi double [ %241, %.lr.ph930 ], [ %234, %232 ]
  %.6778927 = phi i64 [ %242, %.lr.ph930 ], [ %.1065, %232 ]
  %238 = getelementptr inbounds double, ptr %24, i64 %.6778927
  %239 = load double, ptr %238, align 8, !tbaa !9
  %240 = fadd double %239, 1.000000e+00
  %241 = fdiv double %.4928, %240
  %242 = add nsw i64 %.6778927, %.1063
  %243 = icmp sge i64 %242, %.1064
  %244 = icmp sle i64 %242, %.1064
  %.in = select i1 %.not.not.not, i1 %243, i1 %244
  %245 = fcmp ugt double %241, %183
  %or.cond857 = select i1 %.in, i1 %245, i1 false
  br i1 %or.cond857, label %.lr.ph930, label %.loopexit876, !llvm.loop !20

.loopexit876:                                     ; preds = %128, %151, %.lr.ph912, %193, %.lr.ph930, %122, %166, %232, %181, %116, %._crit_edge922
  %246 = phi i64 [ %.1063, %._crit_edge922 ], [ %., %116 ], [ %.1063, %181 ], [ %.1063, %232 ], [ %., %166 ], [ %., %122 ], [ %.1063, %.lr.ph930 ], [ %.1063, %193 ], [ %., %.lr.ph912 ], [ %., %151 ], [ %., %128 ]
  %.5 = phi double [ %231, %._crit_edge922 ], [ 0.000000e+00, %116 ], [ 0.000000e+00, %181 ], [ %234, %232 ], [ %168, %166 ], [ %121, %122 ], [ %241, %.lr.ph930 ], [ %.3919, %193 ], [ %176, %.lr.ph912 ], [ %.0743901, %128 ], [ %.1753, %151 ]
  %247 = phi i64 [ %.1064, %._crit_edge922 ], [ %.1061, %116 ], [ %.1064, %181 ], [ %.1064, %232 ], [ %.1061, %166 ], [ %.1061, %122 ], [ %.1064, %.lr.ph930 ], [ %.1064, %193 ], [ %.1061, %.lr.ph912 ], [ %.1061, %151 ], [ %.1061, %128 ]
  %.2 = phi i64 [ %.1065, %._crit_edge922 ], [ %.1062, %116 ], [ %.1065, %181 ], [ %.1065, %232 ], [ %.1062, %166 ], [ %.1062, %122 ], [ %.1065, %.lr.ph930 ], [ %.1065, %193 ], [ %.1062, %.lr.ph912 ], [ %.1062, %151 ], [ %.1062, %128 ]
  %248 = load double, ptr %20, align 8, !tbaa !9
  %249 = fmul double %.5, %248
  %250 = load double, ptr %23, align 8, !tbaa !9
  %251 = fcmp ogt double %249, %250
  br i1 %251, label %252, label %254

252:                                              ; preds = %.loopexit876
  %253 = call i32 @f2c_ztpsv(ptr noundef %0, ptr noundef %1, ptr noundef %2, ptr noundef nonnull %4, ptr noundef %5, ptr noundef %6, ptr noundef nonnull @c__1) #6
  %.pr869 = load double, ptr %20, align 8, !tbaa !9
  br label %942

254:                                              ; preds = %.loopexit876
  %255 = load double, ptr %22, align 8, !tbaa !9
  %256 = fmul double %255, 5.000000e-01
  %257 = fcmp ogt double %.0746.lcssa, %256
  br i1 %257, label %258, label %262

258:                                              ; preds = %254
  %259 = fdiv double %256, %.0746.lcssa
  store double %259, ptr %7, align 8, !tbaa !9
  %260 = call i32 @f2c_zdscal(ptr noundef nonnull %4, ptr noundef nonnull %7, ptr noundef %6, ptr noundef nonnull @c__1) #6
  %261 = load double, ptr %22, align 8, !tbaa !9
  br label %264

262:                                              ; preds = %254
  %263 = fmul double %.0746.lcssa, 2.000000e+00
  br label %264

264:                                              ; preds = %262, %258
  %.1747 = phi double [ %261, %258 ], [ %263, %262 ]
  br i1 %.not820, label %446, label %265

265:                                              ; preds = %264
  store i64 %246, ptr %12, align 8, !tbaa !5
  %266 = icmp slt i64 %246, 0
  %267 = icmp sge i64 %.2, %247
  %268 = icmp sle i64 %.2, %247
  %.in851936 = select i1 %266, i1 %267, i1 %268
  br i1 %.in851936, label %.lr.ph942, label %.loopexit871

.lr.ph942:                                        ; preds = %265
  %269 = add nsw i64 %.2, 1
  %270 = mul nsw i64 %269, %.2
  %271 = sdiv i64 %270, 2
  %272 = getelementptr inbounds i8, ptr %15, i64 8
  %273 = getelementptr inbounds i8, ptr %19, i64 8
  br label %274

274:                                              ; preds = %.lr.ph942, %440
  %.2748940 = phi double [ %.1747, %.lr.ph942 ], [ %.8, %440 ]
  %.4768939 = phi i64 [ %271, %.lr.ph942 ], [ %.5769, %440 ]
  %.7779937 = phi i64 [ %.2, %.lr.ph942 ], [ %442, %440 ]
  store i64 %.7779937, ptr %13, align 8, !tbaa !5
  %275 = getelementptr inbounds %struct.doublecomplex, ptr %25, i64 %.7779937
  %276 = load double, ptr %275, align 8, !tbaa !14
  %277 = fcmp oge double %276, 0.000000e+00
  %278 = fneg double %276
  %279 = select i1 %277, double %276, double %278
  %280 = call double @d_imag(ptr noundef nonnull %275) #6
  %281 = fcmp oge double %280, 0.000000e+00
  %282 = fneg double %280
  %283 = select i1 %281, double %280, double %282
  %284 = fadd double %279, %283
  br i1 %.not823, label %293, label %285

285:                                              ; preds = %274
  store i64 %.4768939, ptr %13, align 8, !tbaa !5
  %286 = load double, ptr %20, align 8, !tbaa !9
  %287 = getelementptr inbounds %struct.doublecomplex, ptr %26, i64 %.4768939
  %288 = load <2 x double>, ptr %287, align 8, !tbaa !9
  %289 = insertelement <2 x double> poison, double %286, i64 0
  %290 = shufflevector <2 x double> %289, <2 x double> poison, <2 x i32> zeroinitializer
  %291 = fmul <2 x double> %290, %288
  store <2 x double> %291, ptr %15, align 16, !tbaa !9
  store <2 x double> %291, ptr %19, align 16, !tbaa !9
  %292 = extractelement <2 x double> %291, i64 0
  br label %296

293:                                              ; preds = %274
  %294 = load double, ptr %20, align 8, !tbaa !9
  store double %294, ptr %19, align 16, !tbaa !14
  store double 0.000000e+00, ptr %273, align 8, !tbaa !21
  %295 = fcmp oeq double %294, 1.000000e+00
  br i1 %295, label %356, label %296

296:                                              ; preds = %293, %285
  %297 = phi double [ %294, %293 ], [ %292, %285 ]
  %298 = call double @d_imag(ptr noundef nonnull %19) #6
  %299 = insertelement <2 x double> poison, double %297, i64 0
  %300 = insertelement <2 x double> %299, double %298, i64 1
  %301 = fcmp oge <2 x double> %300, zeroinitializer
  %302 = fneg <2 x double> %300
  %303 = select <2 x i1> %301, <2 x double> %300, <2 x double> %302
  %shift1111 = shufflevector <2 x double> %303, <2 x double> poison, <2 x i32> <i32 1, i32 poison>
  %304 = fadd <2 x double> %303, %shift1111
  %305 = extractelement <2 x double> %304, i64 0
  %306 = load double, ptr %23, align 8, !tbaa !9
  %307 = fcmp ogt double %305, %306
  br i1 %307, label %308, label %322

308:                                              ; preds = %296
  %309 = fcmp olt double %305, 1.000000e+00
  br i1 %309, label %310, label %321

310:                                              ; preds = %308
  %311 = load double, ptr %22, align 8, !tbaa !9
  %312 = fmul double %305, %311
  %313 = fcmp ogt double %284, %312
  br i1 %313, label %314, label %321

314:                                              ; preds = %310
  %315 = fdiv double 1.000000e+00, %284
  store double %315, ptr %18, align 8, !tbaa !9
  %316 = call i32 @f2c_zdscal(ptr noundef nonnull %4, ptr noundef nonnull %18, ptr noundef nonnull %6, ptr noundef nonnull @c__1) #6
  %317 = load double, ptr %18, align 8, !tbaa !9
  %318 = load double, ptr %7, align 8, !tbaa !9
  %319 = fmul double %317, %318
  store double %319, ptr %7, align 8, !tbaa !9
  %320 = fmul double %.2748940, %317
  br label %321

321:                                              ; preds = %310, %314, %308
  %.3749 = phi double [ %320, %314 ], [ %.2748940, %310 ], [ %.2748940, %308 ]
  store i64 %.7779937, ptr %13, align 8, !tbaa !5
  call void @zladiv_(ptr noundef nonnull %15, ptr noundef nonnull %275, ptr noundef nonnull %19) #6
  br label %.sink.split

322:                                              ; preds = %296
  %323 = fcmp ogt double %305, 0.000000e+00
  br i1 %323, label %324, label %342

324:                                              ; preds = %322
  %325 = load double, ptr %22, align 8, !tbaa !9
  %326 = fmul double %305, %325
  %327 = fcmp ogt double %284, %326
  br i1 %327, label %328, label %341

328:                                              ; preds = %324
  %329 = fdiv double %326, %284
  store double %329, ptr %18, align 8, !tbaa !9
  %330 = getelementptr inbounds double, ptr %24, i64 %.7779937
  %331 = load double, ptr %330, align 8, !tbaa !9
  %332 = fcmp ogt double %331, 1.000000e+00
  br i1 %332, label %333, label %335

333:                                              ; preds = %328
  %334 = fdiv double %329, %331
  store double %334, ptr %18, align 8, !tbaa !9
  br label %335

335:                                              ; preds = %333, %328
  %336 = call i32 @f2c_zdscal(ptr noundef nonnull %4, ptr noundef nonnull %18, ptr noundef nonnull %6, ptr noundef nonnull @c__1) #6
  %337 = load double, ptr %18, align 8, !tbaa !9
  %338 = load double, ptr %7, align 8, !tbaa !9
  %339 = fmul double %337, %338
  store double %339, ptr %7, align 8, !tbaa !9
  %340 = fmul double %.2748940, %337
  br label %341

341:                                              ; preds = %335, %324
  %.4750 = phi double [ %340, %335 ], [ %.2748940, %324 ]
  store i64 %.7779937, ptr %13, align 8, !tbaa !5
  call void @zladiv_(ptr noundef nonnull %15, ptr noundef nonnull %275, ptr noundef nonnull %19) #6
  br label %.sink.split

342:                                              ; preds = %322
  %343 = load i64, ptr %4, align 8, !tbaa !5
  %.not853932 = icmp slt i64 %343, 1
  br i1 %.not853932, label %.thread863, label %.lr.ph935.preheader

.lr.ph935.preheader:                              ; preds = %342
  %344 = shl nuw i64 %343, 4
  call void @llvm.memset.p0.i64(ptr nonnull align 8 %6, i8 0, i64 %344, i1 false), !tbaa !9
  br label %.thread863

.thread863:                                       ; preds = %.lr.ph935.preheader, %342
  store i64 %.7779937, ptr %13, align 8, !tbaa !5
  store <2 x double> <double 1.000000e+00, double 0.000000e+00>, ptr %275, align 8, !tbaa !9
  store double 0.000000e+00, ptr %7, align 8, !tbaa !9
  br label %372

.sink.split:                                      ; preds = %341, %321
  %.5751.ph = phi double [ %.4750, %341 ], [ %.3749, %321 ]
  %.sink1108 = load double, ptr %15, align 16, !tbaa !14
  %.sink1110 = load i64, ptr %13, align 8, !tbaa !5
  %345 = getelementptr inbounds %struct.doublecomplex, ptr %25, i64 %.sink1110
  store double %.sink1108, ptr %345, align 8, !tbaa !14
  %346 = load double, ptr %272, align 8, !tbaa !21
  %347 = getelementptr inbounds %struct.doublecomplex, ptr %25, i64 %.sink1110, i32 1
  store double %346, ptr %347, align 8, !tbaa !21
  store i64 %.7779937, ptr %13, align 8, !tbaa !5
  %storemerge1081 = load double, ptr %275, align 8, !tbaa !14
  store double %storemerge1081, ptr %14, align 8, !tbaa !9
  %348 = call double @d_imag(ptr noundef nonnull %275) #6
  %349 = insertelement <2 x double> poison, double %storemerge1081, i64 0
  %350 = insertelement <2 x double> %349, double %348, i64 1
  %351 = fcmp oge <2 x double> %350, zeroinitializer
  %352 = fneg <2 x double> %350
  %353 = select <2 x i1> %351, <2 x double> %350, <2 x double> %352
  %shift1112 = shufflevector <2 x double> %353, <2 x double> poison, <2 x i32> <i32 1, i32 poison>
  %354 = fadd <2 x double> %353, %shift1112
  %355 = extractelement <2 x double> %354, i64 0
  br label %356

356:                                              ; preds = %.sink.split, %293
  %.0763 = phi double [ %284, %293 ], [ %355, %.sink.split ]
  %.5751 = phi double [ %.2748940, %293 ], [ %.5751.ph, %.sink.split ]
  %357 = fcmp ogt double %.0763, 1.000000e+00
  br i1 %357, label %358, label %372

358:                                              ; preds = %356
  %359 = fdiv double 1.000000e+00, %.0763
  store double %359, ptr %18, align 8, !tbaa !9
  %360 = getelementptr inbounds double, ptr %24, i64 %.7779937
  %361 = load double, ptr %360, align 8, !tbaa !9
  %362 = load double, ptr %22, align 8, !tbaa !9
  %363 = fsub double %362, %.5751
  %364 = fmul double %359, %363
  %365 = fcmp ogt double %361, %364
  br i1 %365, label %366, label %383

366:                                              ; preds = %358
  %367 = fmul double %359, 5.000000e-01
  store double %367, ptr %18, align 8, !tbaa !9
  %368 = call i32 @f2c_zdscal(ptr noundef nonnull %4, ptr noundef nonnull %18, ptr noundef nonnull %6, ptr noundef nonnull @c__1) #6
  %369 = load double, ptr %18, align 8, !tbaa !9
  %370 = load double, ptr %7, align 8, !tbaa !9
  %371 = fmul double %369, %370
  br label %.sink.split1078

372:                                              ; preds = %.thread863, %356
  %.5751868 = phi double [ 0.000000e+00, %.thread863 ], [ %.5751, %356 ]
  %.0763866 = phi double [ 1.000000e+00, %.thread863 ], [ %.0763, %356 ]
  %373 = getelementptr inbounds double, ptr %24, i64 %.7779937
  %374 = load double, ptr %373, align 8, !tbaa !9
  %375 = fmul double %.0763866, %374
  %376 = load double, ptr %22, align 8, !tbaa !9
  %377 = fsub double %376, %.5751868
  %378 = fcmp ogt double %375, %377
  br i1 %378, label %379, label %383

379:                                              ; preds = %372
  %380 = call i32 @f2c_zdscal(ptr noundef nonnull %4, ptr noundef nonnull @c_b36, ptr noundef nonnull %6, ptr noundef nonnull @c__1) #6
  %381 = load double, ptr %7, align 8, !tbaa !9
  %382 = fmul double %381, 5.000000e-01
  br label %.sink.split1078

.sink.split1078:                                  ; preds = %366, %379
  %.sink1079 = phi double [ %382, %379 ], [ %371, %366 ]
  %.5751867.ph = phi double [ %.5751868, %379 ], [ %.5751, %366 ]
  store double %.sink1079, ptr %7, align 8, !tbaa !9
  br label %383

383:                                              ; preds = %.sink.split1078, %372, %358
  %.5751867 = phi double [ %.5751868, %372 ], [ %.5751, %358 ], [ %.5751867.ph, %.sink.split1078 ]
  br i1 %.not.not.not, label %408, label %384

384:                                              ; preds = %383
  %385 = icmp sgt i64 %.7779937, 1
  br i1 %385, label %386, label %._crit_edge1033

._crit_edge1033:                                  ; preds = %384
  %.pre1034 = sub nsw i64 %.4768939, %.7779937
  br label %440

386:                                              ; preds = %384
  %387 = add nsw i64 %.7779937, -1
  store i64 %387, ptr %13, align 8, !tbaa !5
  %388 = load <2 x double>, ptr %275, align 8, !tbaa !9
  %389 = fneg <2 x double> %388
  store <2 x double> %389, ptr %16, align 16, !tbaa !9
  %390 = load double, ptr %20, align 8, !tbaa !9
  %391 = insertelement <2 x double> poison, double %390, i64 0
  %392 = shufflevector <2 x double> %391, <2 x double> poison, <2 x i32> zeroinitializer
  %393 = fmul <2 x double> %392, %389
  store <2 x double> %393, ptr %15, align 16, !tbaa !9
  %394 = sub nsw i64 %.4768939, %.7779937
  %395 = getelementptr %struct.doublecomplex, ptr %5, i64 %394
  %396 = call i32 @f2c_zaxpy(ptr noundef nonnull %13, ptr noundef nonnull %15, ptr noundef %395, ptr noundef nonnull @c__1, ptr noundef nonnull %6, ptr noundef nonnull @c__1) #6
  store i64 %387, ptr %13, align 8, !tbaa !5
  %397 = call i64 @f2c_izamax(ptr noundef nonnull %13, ptr noundef nonnull %6, ptr noundef nonnull @c__1) #6
  store i64 %397, ptr %13, align 8, !tbaa !5
  %398 = getelementptr inbounds %struct.doublecomplex, ptr %25, i64 %397
  %399 = load double, ptr %398, align 8, !tbaa !14
  store double %399, ptr %14, align 8, !tbaa !9
  %400 = call double @d_imag(ptr noundef nonnull %398) #6
  %401 = insertelement <2 x double> poison, double %399, i64 0
  %402 = insertelement <2 x double> %401, double %400, i64 1
  %403 = fcmp oge <2 x double> %402, zeroinitializer
  %404 = fneg <2 x double> %402
  %405 = select <2 x i1> %403, <2 x double> %402, <2 x double> %404
  %shift1113 = shufflevector <2 x double> %405, <2 x double> poison, <2 x i32> <i32 1, i32 poison>
  %406 = fadd <2 x double> %405, %shift1113
  %407 = extractelement <2 x double> %406, i64 0
  br label %440

408:                                              ; preds = %383
  %409 = load i64, ptr %4, align 8, !tbaa !5
  %410 = icmp slt i64 %.7779937, %409
  br i1 %410, label %411, label %436

411:                                              ; preds = %408
  %412 = sub nsw i64 %409, %.7779937
  store i64 %412, ptr %13, align 8, !tbaa !5
  %413 = load <2 x double>, ptr %275, align 8, !tbaa !9
  %414 = fneg <2 x double> %413
  store <2 x double> %414, ptr %16, align 16, !tbaa !9
  %415 = load double, ptr %20, align 8, !tbaa !9
  %416 = insertelement <2 x double> poison, double %415, i64 0
  %417 = shufflevector <2 x double> %416, <2 x double> poison, <2 x i32> zeroinitializer
  %418 = fmul <2 x double> %417, %414
  store <2 x double> %418, ptr %15, align 16, !tbaa !9
  %419 = getelementptr %struct.doublecomplex, ptr %5, i64 %.4768939
  %420 = getelementptr %struct.doublecomplex, ptr %6, i64 %.7779937
  %421 = call i32 @f2c_zaxpy(ptr noundef nonnull %13, ptr noundef nonnull %15, ptr noundef %419, ptr noundef nonnull @c__1, ptr noundef %420, ptr noundef nonnull @c__1) #6
  %422 = load i64, ptr %4, align 8, !tbaa !5
  %423 = sub nsw i64 %422, %.7779937
  store i64 %423, ptr %13, align 8, !tbaa !5
  %424 = call i64 @f2c_izamax(ptr noundef nonnull %13, ptr noundef %420, ptr noundef nonnull @c__1) #6
  %425 = add nsw i64 %424, %.7779937
  store i64 %425, ptr %13, align 8, !tbaa !5
  %426 = getelementptr inbounds %struct.doublecomplex, ptr %25, i64 %425
  %427 = load double, ptr %426, align 8, !tbaa !14
  store double %427, ptr %14, align 8, !tbaa !9
  %428 = call double @d_imag(ptr noundef nonnull %426) #6
  %429 = insertelement <2 x double> poison, double %427, i64 0
  %430 = insertelement <2 x double> %429, double %428, i64 1
  %431 = fcmp oge <2 x double> %430, zeroinitializer
  %432 = fneg <2 x double> %430
  %433 = select <2 x i1> %431, <2 x double> %430, <2 x double> %432
  %shift1114 = shufflevector <2 x double> %433, <2 x double> poison, <2 x i32> <i32 1, i32 poison>
  %434 = fadd <2 x double> %433, %shift1114
  %435 = extractelement <2 x double> %434, i64 0
  %.pre = load i64, ptr %4, align 8, !tbaa !5
  br label %436

436:                                              ; preds = %411, %408
  %437 = phi i64 [ %.pre, %411 ], [ %409, %408 ]
  %.7 = phi double [ %435, %411 ], [ %.5751867, %408 ]
  %reass.sub1009 = sub i64 %.4768939, %.7779937
  %438 = add i64 %reass.sub1009, 1
  %439 = add i64 %438, %437
  br label %440

440:                                              ; preds = %386, %._crit_edge1033, %436
  %.5769 = phi i64 [ %439, %436 ], [ %.pre1034, %._crit_edge1033 ], [ %394, %386 ]
  %.8 = phi double [ %.7, %436 ], [ %.5751867, %._crit_edge1033 ], [ %407, %386 ]
  %441 = load i64, ptr %12, align 8, !tbaa !5
  %442 = add nsw i64 %441, %.7779937
  %443 = icmp slt i64 %441, 0
  %444 = icmp sge i64 %442, %247
  %445 = icmp sle i64 %442, %247
  %.in851 = select i1 %443, i1 %444, i1 %445
  br i1 %.in851, label %274, label %.loopexit871, !llvm.loop !22

446:                                              ; preds = %264
  %447 = call i64 @lsame_(ptr noundef %1, ptr noundef nonnull @.str.3) #6
  %.not838 = icmp eq i64 %447, 0
  %448 = icmp slt i64 %246, 0
  %449 = icmp sge i64 %.2, %247
  %450 = icmp sle i64 %.2, %247
  %.in8391001 = select i1 %448, i1 %449, i1 %450
  br i1 %.not838, label %690, label %451

451:                                              ; preds = %446
  store i64 %247, ptr %12, align 8, !tbaa !5
  store i64 %246, ptr %11, align 8, !tbaa !5
  br i1 %.in8391001, label %.lr.ph979, label %.loopexit871

.lr.ph979:                                        ; preds = %451
  %452 = add nsw i64 %.2, 1
  %453 = mul nsw i64 %452, %.2
  %454 = sdiv i64 %453, 2
  %455 = getelementptr inbounds i8, ptr %21, i64 8
  %456 = getelementptr inbounds i8, ptr %15, i64 8
  %457 = getelementptr inbounds i8, ptr %19, i64 8
  br label %458

458:                                              ; preds = %.lr.ph979, %671
  %.9977 = phi double [ %.1747, %.lr.ph979 ], [ %682, %671 ]
  %.2758976 = phi i64 [ 1, %.lr.ph979 ], [ %683, %671 ]
  %.6770974 = phi i64 [ %454, %.lr.ph979 ], [ %685, %671 ]
  %.8780972 = phi i64 [ %.2, %.lr.ph979 ], [ %686, %671 ]
  store i64 %.8780972, ptr %13, align 8, !tbaa !5
  %459 = getelementptr inbounds %struct.doublecomplex, ptr %25, i64 %.8780972
  %460 = load double, ptr %459, align 8, !tbaa !14
  store double %460, ptr %14, align 8, !tbaa !9
  %461 = call double @d_imag(ptr noundef nonnull %459) #6
  %462 = insertelement <2 x double> poison, double %460, i64 0
  %463 = insertelement <2 x double> %462, double %461, i64 1
  %464 = fcmp oge <2 x double> %463, zeroinitializer
  %465 = fneg <2 x double> %463
  %466 = select <2 x i1> %464, <2 x double> %463, <2 x double> %465
  %shift1115 = shufflevector <2 x double> %466, <2 x double> poison, <2 x i32> <i32 1, i32 poison>
  %467 = fadd <2 x double> %466, %shift1115
  %468 = extractelement <2 x double> %467, i64 0
  %469 = load double, ptr %20, align 8, !tbaa !9
  store double %469, ptr %21, align 16, !tbaa !14
  store double 0.000000e+00, ptr %455, align 8, !tbaa !21
  %470 = fcmp oge double %.9977, 1.000000e+00
  %471 = select i1 %470, double %.9977, double 1.000000e+00
  %472 = fdiv double 1.000000e+00, %471
  store double %472, ptr %18, align 8, !tbaa !9
  %473 = getelementptr inbounds double, ptr %24, i64 %.8780972
  %474 = load double, ptr %473, align 8, !tbaa !9
  %475 = load double, ptr %22, align 8, !tbaa !9
  %476 = fsub double %475, %468
  %477 = fmul double %472, %476
  %478 = fcmp ogt double %474, %477
  br i1 %478, label %479, label %514

479:                                              ; preds = %458
  %480 = fmul double %472, 5.000000e-01
  store double %480, ptr %18, align 8, !tbaa !9
  %481 = insertelement <2 x double> <double poison, double 0.000000e+00>, double %469, i64 0
  br i1 %.not823, label %487, label %482

482:                                              ; preds = %479
  store i64 %.6770974, ptr %13, align 8, !tbaa !5
  %483 = getelementptr inbounds %struct.doublecomplex, ptr %26, i64 %.6770974
  %484 = load <2 x double>, ptr %483, align 8, !tbaa !9
  %485 = shufflevector <2 x double> %481, <2 x double> poison, <2 x i32> zeroinitializer
  %486 = fmul <2 x double> %485, %484
  store <2 x double> %486, ptr %15, align 16, !tbaa !9
  br label %487

487:                                              ; preds = %479, %482
  %488 = phi <2 x double> [ %486, %482 ], [ %481, %479 ]
  store <2 x double> %488, ptr %19, align 16, !tbaa !9
  %489 = extractelement <2 x double> %488, i64 0
  %490 = fcmp oge double %489, 0.000000e+00
  %491 = fneg double %489
  %492 = select i1 %490, double %489, double %491
  %493 = call double @d_imag(ptr noundef nonnull %19) #6
  %494 = fcmp oge double %493, 0.000000e+00
  %495 = fneg double %493
  %496 = select i1 %494, double %493, double %495
  %497 = fadd double %492, %496
  %498 = fcmp ogt double %497, 1.000000e+00
  br i1 %498, label %499, label %505

499:                                              ; preds = %487
  store double 1.000000e+00, ptr %14, align 8, !tbaa !9
  %500 = load double, ptr %18, align 8, !tbaa !9
  %501 = fmul double %497, %500
  %502 = fcmp oge double %501, 1.000000e+00
  %503 = select i1 %502, double 1.000000e+00, double %501
  store double %503, ptr %18, align 8, !tbaa !9
  call void @zladiv_(ptr noundef nonnull %15, ptr noundef nonnull %21, ptr noundef nonnull %19) #6
  %504 = load <2 x double>, ptr %15, align 16, !tbaa !9
  store <2 x double> %504, ptr %21, align 16, !tbaa !9
  br label %505

505:                                              ; preds = %499, %487
  %506 = load double, ptr %18, align 8, !tbaa !9
  %507 = fcmp olt double %506, 1.000000e+00
  br i1 %507, label %508, label %514

508:                                              ; preds = %505
  %509 = call i32 @f2c_zdscal(ptr noundef nonnull %4, ptr noundef nonnull %18, ptr noundef nonnull %6, ptr noundef nonnull @c__1) #6
  %510 = load double, ptr %18, align 8, !tbaa !9
  %511 = load double, ptr %7, align 8, !tbaa !9
  %512 = fmul double %510, %511
  store double %512, ptr %7, align 8, !tbaa !9
  %513 = fmul double %.9977, %510
  br label %514

514:                                              ; preds = %505, %508, %458
  %.10 = phi double [ %513, %508 ], [ %.9977, %505 ], [ %.9977, %458 ]
  %515 = load double, ptr %21, align 16, !tbaa !14
  %516 = fcmp oeq double %515, 1.000000e+00
  %517 = load double, ptr %455, align 8
  %518 = fcmp oeq double %517, 0.000000e+00
  %or.cond = select i1 %516, i1 %518, i1 false
  br i1 %or.cond, label %519, label %533

519:                                              ; preds = %514
  br i1 %.not.not.not, label %525, label %520

520:                                              ; preds = %519
  %521 = add nsw i64 %.8780972, -1
  store i64 %521, ptr %13, align 8, !tbaa !5
  %522 = sub nsw i64 %.6770974, %.8780972
  %523 = getelementptr %struct.doublecomplex, ptr %5, i64 %522
  call void @f2c_zdotu(ptr noundef nonnull %15, ptr noundef nonnull %13, ptr noundef %523, ptr noundef nonnull @c__1, ptr noundef nonnull %6, ptr noundef nonnull @c__1) #6
  %524 = load <2 x double>, ptr %15, align 16, !tbaa !9
  br label %.loopexit872

525:                                              ; preds = %519
  %526 = load i64, ptr %4, align 8, !tbaa !5
  %527 = icmp slt i64 %.8780972, %526
  br i1 %527, label %528, label %.loopexit872

528:                                              ; preds = %525
  %529 = sub nsw i64 %526, %.8780972
  store i64 %529, ptr %13, align 8, !tbaa !5
  %530 = getelementptr %struct.doublecomplex, ptr %5, i64 %.6770974
  %531 = getelementptr %struct.doublecomplex, ptr %6, i64 %.8780972
  call void @f2c_zdotu(ptr noundef nonnull %15, ptr noundef nonnull %13, ptr noundef %530, ptr noundef nonnull @c__1, ptr noundef %531, ptr noundef nonnull @c__1) #6
  %532 = load <2 x double>, ptr %15, align 16, !tbaa !9
  br label %.loopexit872

533:                                              ; preds = %514
  br i1 %.not.not.not, label %560, label %534

534:                                              ; preds = %533
  %.not848.not943 = icmp sgt i64 %.8780972, 1
  br i1 %.not848.not943, label %.lr.ph948, label %.loopexit872

.lr.ph948:                                        ; preds = %534
  %535 = sub nsw i64 %.6770974, %.8780972
  %536 = getelementptr %struct.doublecomplex, ptr %26, i64 %535
  br label %537

537:                                              ; preds = %.lr.ph948, %537
  %.1783944 = phi i64 [ 1, %.lr.ph948 ], [ %559, %537 ]
  %538 = phi <2 x double> [ zeroinitializer, %.lr.ph948 ], [ %558, %537 ]
  %539 = getelementptr %struct.doublecomplex, ptr %536, i64 %.1783944
  %540 = load double, ptr %539, align 8, !tbaa !14
  %541 = getelementptr inbounds i8, ptr %539, i64 8
  %542 = load double, ptr %541, align 8, !tbaa !21
  %543 = fneg double %542
  %544 = fmul double %517, %543
  %545 = call double @llvm.fmuladd.f64(double %540, double %515, double %544)
  %546 = fmul double %515, %542
  %547 = call double @llvm.fmuladd.f64(double %540, double %517, double %546)
  %548 = getelementptr inbounds %struct.doublecomplex, ptr %25, i64 %.1783944
  %549 = fneg double %547
  %550 = load <2 x double>, ptr %548, align 8, !tbaa !9
  %551 = insertelement <2 x double> poison, double %547, i64 0
  %552 = insertelement <2 x double> %551, double %549, i64 1
  %553 = fmul <2 x double> %550, %552
  %554 = shufflevector <2 x double> %553, <2 x double> poison, <2 x i32> <i32 1, i32 0>
  %555 = insertelement <2 x double> poison, double %545, i64 0
  %556 = shufflevector <2 x double> %555, <2 x double> poison, <2 x i32> zeroinitializer
  %557 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %556, <2 x double> %550, <2 x double> %554)
  %558 = fadd <2 x double> %538, %557
  %559 = add nuw nsw i64 %.1783944, 1
  %exitcond.not = icmp eq i64 %559, %.8780972
  br i1 %exitcond.not, label %..loopexit873_crit_edge, label %537, !llvm.loop !23

560:                                              ; preds = %533
  %561 = load i64, ptr %4, align 8, !tbaa !5
  %.not = icmp slt i64 %.8780972, %561
  br i1 %.not, label %.lr.ph959, label %.loopexit872

.lr.ph959:                                        ; preds = %560
  %562 = getelementptr %struct.doublecomplex, ptr %26, i64 %.6770974
  %563 = add i64 %561, 1
  %564 = sub i64 %563, %.8780972
  br label %565

565:                                              ; preds = %.lr.ph959, %565
  %.2784955 = phi i64 [ 1, %.lr.ph959 ], [ %587, %565 ]
  %566 = phi <2 x double> [ zeroinitializer, %.lr.ph959 ], [ %586, %565 ]
  %567 = getelementptr %struct.doublecomplex, ptr %562, i64 %.2784955
  %568 = load double, ptr %567, align 8, !tbaa !14
  %569 = getelementptr inbounds i8, ptr %567, i64 8
  %570 = load double, ptr %569, align 8, !tbaa !21
  %571 = fneg double %570
  %572 = fmul double %517, %571
  %573 = call double @llvm.fmuladd.f64(double %568, double %515, double %572)
  %574 = fmul double %515, %570
  %575 = call double @llvm.fmuladd.f64(double %568, double %517, double %574)
  %576 = getelementptr %struct.doublecomplex, ptr %459, i64 %.2784955
  %577 = fneg double %575
  %578 = load <2 x double>, ptr %576, align 8, !tbaa !9
  %579 = insertelement <2 x double> poison, double %575, i64 0
  %580 = insertelement <2 x double> %579, double %577, i64 1
  %581 = fmul <2 x double> %578, %580
  %582 = shufflevector <2 x double> %581, <2 x double> poison, <2 x i32> <i32 1, i32 0>
  %583 = insertelement <2 x double> poison, double %573, i64 0
  %584 = shufflevector <2 x double> %583, <2 x double> poison, <2 x i32> zeroinitializer
  %585 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %584, <2 x double> %578, <2 x double> %582)
  %586 = fadd <2 x double> %566, %585
  %587 = add nuw i64 %.2784955, 1
  %exitcond1032.not = icmp eq i64 %587, %564
  br i1 %exitcond1032.not, label %..loopexit872_crit_edge, label %565, !llvm.loop !24

..loopexit872_crit_edge:                          ; preds = %565
  store <2 x double> %585, ptr %16, align 16, !tbaa !9
  br label %.loopexit872

..loopexit873_crit_edge:                          ; preds = %537
  store <2 x double> %557, ptr %16, align 16, !tbaa !9
  br label %.loopexit872

.loopexit872:                                     ; preds = %534, %..loopexit873_crit_edge, %..loopexit872_crit_edge, %560, %520, %528, %525
  %588 = phi <2 x double> [ %524, %520 ], [ %532, %528 ], [ zeroinitializer, %525 ], [ zeroinitializer, %560 ], [ %586, %..loopexit872_crit_edge ], [ %558, %..loopexit873_crit_edge ], [ zeroinitializer, %534 ]
  %589 = load double, ptr %20, align 8, !tbaa !9
  store double %589, ptr %15, align 16, !tbaa !14
  store double 0.000000e+00, ptr %456, align 8, !tbaa !21
  %590 = load double, ptr %21, align 16, !tbaa !14
  %591 = fcmp oeq double %590, %589
  %592 = load double, ptr %455, align 8
  %593 = fcmp oeq double %592, 0.000000e+00
  %or.cond859 = select i1 %591, i1 %593, i1 false
  br i1 %or.cond859, label %594, label %666

594:                                              ; preds = %.loopexit872
  %595 = load <2 x double>, ptr %459, align 8, !tbaa !9
  %596 = fsub <2 x double> %595, %588
  store <2 x double> %596, ptr %15, align 16, !tbaa !9
  store <2 x double> %596, ptr %459, align 8, !tbaa !9
  store i64 %.8780972, ptr %13, align 8, !tbaa !5
  %597 = extractelement <2 x double> %596, i64 0
  %598 = fcmp oge double %597, 0.000000e+00
  %599 = fneg double %597
  %600 = select i1 %598, double %597, double %599
  %601 = call double @d_imag(ptr noundef nonnull %459) #6
  %602 = fcmp oge double %601, 0.000000e+00
  %603 = fneg double %601
  %604 = select i1 %602, double %601, double %603
  %605 = fadd double %600, %604
  br i1 %.not823, label %614, label %606

606:                                              ; preds = %594
  store i64 %.6770974, ptr %13, align 8, !tbaa !5
  %607 = load double, ptr %20, align 8, !tbaa !9
  %608 = getelementptr inbounds %struct.doublecomplex, ptr %26, i64 %.6770974
  %609 = load <2 x double>, ptr %608, align 8, !tbaa !9
  %610 = insertelement <2 x double> poison, double %607, i64 0
  %611 = shufflevector <2 x double> %610, <2 x double> poison, <2 x i32> zeroinitializer
  %612 = fmul <2 x double> %611, %609
  store <2 x double> %612, ptr %15, align 16, !tbaa !9
  store <2 x double> %612, ptr %19, align 16, !tbaa !9
  %613 = extractelement <2 x double> %612, i64 0
  br label %617

614:                                              ; preds = %594
  %615 = load double, ptr %20, align 8, !tbaa !9
  store double %615, ptr %19, align 16, !tbaa !14
  store double 0.000000e+00, ptr %457, align 8, !tbaa !21
  %616 = fcmp oeq double %615, 1.000000e+00
  br i1 %616, label %671, label %617

617:                                              ; preds = %614, %606
  %618 = phi double [ %615, %614 ], [ %613, %606 ]
  store double %618, ptr %14, align 8, !tbaa !9
  %619 = call double @d_imag(ptr noundef nonnull %19) #6
  %620 = insertelement <2 x double> poison, double %618, i64 0
  %621 = insertelement <2 x double> %620, double %619, i64 1
  %622 = fcmp oge <2 x double> %621, zeroinitializer
  %623 = fneg <2 x double> %621
  %624 = select <2 x i1> %622, <2 x double> %621, <2 x double> %623
  %shift1116 = shufflevector <2 x double> %624, <2 x double> poison, <2 x i32> <i32 1, i32 poison>
  %625 = fadd <2 x double> %624, %shift1116
  %626 = extractelement <2 x double> %625, i64 0
  %627 = load double, ptr %23, align 8, !tbaa !9
  %628 = fcmp ogt double %626, %627
  br i1 %628, label %629, label %646

629:                                              ; preds = %617
  %630 = fcmp olt double %626, 1.000000e+00
  br i1 %630, label %631, label %642

631:                                              ; preds = %629
  %632 = load double, ptr %22, align 8, !tbaa !9
  %633 = fmul double %626, %632
  %634 = fcmp ogt double %605, %633
  br i1 %634, label %635, label %642

635:                                              ; preds = %631
  %636 = fdiv double 1.000000e+00, %605
  store double %636, ptr %18, align 8, !tbaa !9
  %637 = call i32 @f2c_zdscal(ptr noundef nonnull %4, ptr noundef nonnull %18, ptr noundef nonnull %6, ptr noundef nonnull @c__1) #6
  %638 = load double, ptr %18, align 8, !tbaa !9
  %639 = load double, ptr %7, align 8, !tbaa !9
  %640 = fmul double %638, %639
  store double %640, ptr %7, align 8, !tbaa !9
  %641 = fmul double %.10, %638
  br label %642

642:                                              ; preds = %631, %635, %629
  %.11 = phi double [ %641, %635 ], [ %.10, %631 ], [ %.10, %629 ]
  store i64 %.8780972, ptr %13, align 8, !tbaa !5
  call void @zladiv_(ptr noundef nonnull %15, ptr noundef nonnull %459, ptr noundef nonnull %19) #6
  %643 = load i64, ptr %13, align 8, !tbaa !5
  %644 = getelementptr inbounds %struct.doublecomplex, ptr %25, i64 %643
  %645 = load <2 x double>, ptr %15, align 16, !tbaa !9
  store <2 x double> %645, ptr %644, align 8, !tbaa !9
  br label %671

646:                                              ; preds = %617
  %647 = fcmp ogt double %626, 0.000000e+00
  br i1 %647, label %648, label %663

648:                                              ; preds = %646
  %649 = load double, ptr %22, align 8, !tbaa !9
  %650 = fmul double %626, %649
  %651 = fcmp ogt double %605, %650
  br i1 %651, label %652, label %659

652:                                              ; preds = %648
  %653 = fdiv double %650, %605
  store double %653, ptr %18, align 8, !tbaa !9
  %654 = call i32 @f2c_zdscal(ptr noundef nonnull %4, ptr noundef nonnull %18, ptr noundef nonnull %6, ptr noundef nonnull @c__1) #6
  %655 = load double, ptr %18, align 8, !tbaa !9
  %656 = load double, ptr %7, align 8, !tbaa !9
  %657 = fmul double %655, %656
  store double %657, ptr %7, align 8, !tbaa !9
  %658 = fmul double %.10, %655
  br label %659

659:                                              ; preds = %652, %648
  %.12 = phi double [ %658, %652 ], [ %.10, %648 ]
  store i64 %.8780972, ptr %13, align 8, !tbaa !5
  call void @zladiv_(ptr noundef nonnull %15, ptr noundef nonnull %459, ptr noundef nonnull %19) #6
  %660 = load i64, ptr %13, align 8, !tbaa !5
  %661 = getelementptr inbounds %struct.doublecomplex, ptr %25, i64 %660
  %662 = load <2 x double>, ptr %15, align 16, !tbaa !9
  store <2 x double> %662, ptr %661, align 8, !tbaa !9
  br label %671

663:                                              ; preds = %646
  %664 = load i64, ptr %4, align 8, !tbaa !5
  store i64 %664, ptr %13, align 8, !tbaa !5
  %.not850966 = icmp slt i64 %664, 1
  br i1 %.not850966, label %._crit_edge970, label %.lr.ph969.preheader

.lr.ph969.preheader:                              ; preds = %663
  %665 = shl nuw i64 %664, 4
  call void @llvm.memset.p0.i64(ptr nonnull align 8 %6, i8 0, i64 %665, i1 false), !tbaa !9
  br label %._crit_edge970

._crit_edge970:                                   ; preds = %.lr.ph969.preheader, %663
  store <2 x double> <double 1.000000e+00, double 0.000000e+00>, ptr %459, align 8, !tbaa !9
  store double 0.000000e+00, ptr %7, align 8, !tbaa !9
  br label %671

666:                                              ; preds = %.loopexit872
  store i64 %.8780972, ptr %13, align 8, !tbaa !5
  call void @zladiv_(ptr noundef nonnull %16, ptr noundef nonnull %459, ptr noundef nonnull %19) #6
  %667 = load <2 x double>, ptr %16, align 16, !tbaa !9
  %668 = fsub <2 x double> %667, %588
  store <2 x double> %668, ptr %15, align 16, !tbaa !9
  %669 = load i64, ptr %13, align 8, !tbaa !5
  %670 = getelementptr inbounds %struct.doublecomplex, ptr %25, i64 %669
  store <2 x double> %668, ptr %670, align 8, !tbaa !9
  br label %671

671:                                              ; preds = %614, %659, %._crit_edge970, %642, %666
  %.13 = phi double [ %.11, %642 ], [ %.12, %659 ], [ 0.000000e+00, %._crit_edge970 ], [ %.10, %614 ], [ %.10, %666 ]
  store i64 %.8780972, ptr %13, align 8, !tbaa !5
  %672 = load double, ptr %459, align 8, !tbaa !14
  store double %672, ptr %14, align 8, !tbaa !9
  %673 = call double @d_imag(ptr noundef nonnull %459) #6
  %674 = insertelement <2 x double> poison, double %672, i64 0
  %675 = insertelement <2 x double> %674, double %673, i64 1
  %676 = fcmp oge <2 x double> %675, zeroinitializer
  %677 = fneg <2 x double> %675
  %678 = select <2 x i1> %676, <2 x double> %675, <2 x double> %677
  %shift1117 = shufflevector <2 x double> %678, <2 x double> poison, <2 x i32> <i32 1, i32 poison>
  %679 = fadd <2 x double> %678, %shift1117
  %680 = extractelement <2 x double> %679, i64 0
  %681 = fcmp oge double %.13, %680
  %682 = select i1 %681, double %.13, double %680
  %683 = add nuw nsw i64 %.2758976, 1
  %684 = mul nsw i64 %683, %246
  %685 = add nsw i64 %684, %.6770974
  %686 = add nsw i64 %246, %.8780972
  %687 = load i64, ptr %12, align 8
  %688 = icmp sge i64 %686, %687
  %689 = icmp sle i64 %686, %687
  %.in845 = select i1 %448, i1 %688, i1 %689
  br i1 %.in845, label %458, label %.loopexit871, !llvm.loop !25

690:                                              ; preds = %446
  store i64 %247, ptr %11, align 8, !tbaa !5
  store i64 %246, ptr %12, align 8, !tbaa !5
  br i1 %.in8391001, label %.lr.ph1008, label %.loopexit871

.lr.ph1008:                                       ; preds = %690
  %691 = add nsw i64 %.2, 1
  %692 = mul nsw i64 %691, %.2
  %693 = sdiv i64 %692, 2
  %694 = getelementptr inbounds i8, ptr %21, i64 8
  %695 = getelementptr inbounds i8, ptr %15, i64 8
  %696 = getelementptr inbounds i8, ptr %19, i64 8
  %697 = getelementptr inbounds i8, ptr %17, i64 8
  br label %698

698:                                              ; preds = %.lr.ph1008, %919
  %.141006 = phi double [ %.1747, %.lr.ph1008 ], [ %930, %919 ]
  %.37591005 = phi i64 [ 1, %.lr.ph1008 ], [ %931, %919 ]
  %.77711003 = phi i64 [ %693, %.lr.ph1008 ], [ %933, %919 ]
  %.97811002 = phi i64 [ %.2, %.lr.ph1008 ], [ %935, %919 ]
  store i64 %.97811002, ptr %13, align 8, !tbaa !5
  %699 = getelementptr inbounds %struct.doublecomplex, ptr %25, i64 %.97811002
  %700 = load double, ptr %699, align 8, !tbaa !14
  store double %700, ptr %14, align 8, !tbaa !9
  %701 = call double @d_imag(ptr noundef nonnull %699) #6
  %702 = insertelement <2 x double> poison, double %700, i64 0
  %703 = insertelement <2 x double> %702, double %701, i64 1
  %704 = fcmp oge <2 x double> %703, zeroinitializer
  %705 = fneg <2 x double> %703
  %706 = select <2 x i1> %704, <2 x double> %703, <2 x double> %705
  %shift1118 = shufflevector <2 x double> %706, <2 x double> poison, <2 x i32> <i32 1, i32 poison>
  %707 = fadd <2 x double> %706, %shift1118
  %708 = extractelement <2 x double> %707, i64 0
  %709 = load double, ptr %20, align 8, !tbaa !9
  store double %709, ptr %21, align 16, !tbaa !14
  store double 0.000000e+00, ptr %694, align 8, !tbaa !21
  %710 = fcmp oge double %.141006, 1.000000e+00
  %711 = select i1 %710, double %.141006, double 1.000000e+00
  %712 = fdiv double 1.000000e+00, %711
  store double %712, ptr %18, align 8, !tbaa !9
  %713 = getelementptr inbounds double, ptr %24, i64 %.97811002
  %714 = load double, ptr %713, align 8, !tbaa !9
  %715 = load double, ptr %22, align 8, !tbaa !9
  %716 = fsub double %715, %708
  %717 = fmul double %712, %716
  %718 = fcmp ogt double %714, %717
  br i1 %718, label %719, label %756

719:                                              ; preds = %698
  %720 = fmul double %712, 5.000000e-01
  store double %720, ptr %18, align 8, !tbaa !9
  %721 = insertelement <2 x double> <double poison, double 0.000000e+00>, double %709, i64 0
  br i1 %.not823, label %729, label %722

722:                                              ; preds = %719
  %723 = getelementptr inbounds %struct.doublecomplex, ptr %26, i64 %.77711003
  call void @d_cnjg(ptr noundef nonnull %16, ptr noundef nonnull %723) #6
  %724 = load double, ptr %20, align 8, !tbaa !9
  %725 = load <2 x double>, ptr %16, align 16, !tbaa !9
  %726 = insertelement <2 x double> poison, double %724, i64 0
  %727 = shufflevector <2 x double> %726, <2 x double> poison, <2 x i32> zeroinitializer
  %728 = fmul <2 x double> %727, %725
  store <2 x double> %728, ptr %15, align 16, !tbaa !9
  br label %729

729:                                              ; preds = %719, %722
  %730 = phi <2 x double> [ %728, %722 ], [ %721, %719 ]
  store <2 x double> %730, ptr %19, align 16, !tbaa !9
  %731 = extractelement <2 x double> %730, i64 0
  %732 = fcmp oge double %731, 0.000000e+00
  %733 = fneg double %731
  %734 = select i1 %732, double %731, double %733
  %735 = call double @d_imag(ptr noundef nonnull %19) #6
  %736 = fcmp oge double %735, 0.000000e+00
  %737 = fneg double %735
  %738 = select i1 %736, double %735, double %737
  %739 = fadd double %734, %738
  %740 = fcmp ogt double %739, 1.000000e+00
  br i1 %740, label %741, label %747

741:                                              ; preds = %729
  store double 1.000000e+00, ptr %14, align 8, !tbaa !9
  %742 = load double, ptr %18, align 8, !tbaa !9
  %743 = fmul double %739, %742
  %744 = fcmp oge double %743, 1.000000e+00
  %745 = select i1 %744, double 1.000000e+00, double %743
  store double %745, ptr %18, align 8, !tbaa !9
  call void @zladiv_(ptr noundef nonnull %15, ptr noundef nonnull %21, ptr noundef nonnull %19) #6
  %746 = load <2 x double>, ptr %15, align 16, !tbaa !9
  store <2 x double> %746, ptr %21, align 16, !tbaa !9
  br label %747

747:                                              ; preds = %741, %729
  %748 = load double, ptr %18, align 8, !tbaa !9
  %749 = fcmp olt double %748, 1.000000e+00
  br i1 %749, label %750, label %756

750:                                              ; preds = %747
  %751 = call i32 @f2c_zdscal(ptr noundef nonnull %4, ptr noundef nonnull %18, ptr noundef nonnull %6, ptr noundef nonnull @c__1) #6
  %752 = load double, ptr %18, align 8, !tbaa !9
  %753 = load double, ptr %7, align 8, !tbaa !9
  %754 = fmul double %752, %753
  store double %754, ptr %7, align 8, !tbaa !9
  %755 = fmul double %.141006, %752
  br label %756

756:                                              ; preds = %747, %750, %698
  %.15 = phi double [ %755, %750 ], [ %.141006, %747 ], [ %.141006, %698 ]
  %757 = load double, ptr %21, align 16, !tbaa !14
  %758 = fcmp oeq double %757, 1.000000e+00
  %759 = load double, ptr %694, align 8
  %760 = fcmp oeq double %759, 0.000000e+00
  %or.cond5 = select i1 %758, i1 %760, i1 false
  br i1 %or.cond5, label %761, label %775

761:                                              ; preds = %756
  br i1 %.not.not.not, label %767, label %762

762:                                              ; preds = %761
  %763 = add nsw i64 %.97811002, -1
  store i64 %763, ptr %13, align 8, !tbaa !5
  %764 = sub nsw i64 %.77711003, %.97811002
  %765 = getelementptr %struct.doublecomplex, ptr %5, i64 %764
  call void @f2c_zdotc(ptr noundef nonnull %15, ptr noundef nonnull %13, ptr noundef %765, ptr noundef nonnull @c__1, ptr noundef nonnull %6, ptr noundef nonnull @c__1) #6
  %766 = load <2 x double>, ptr %15, align 16, !tbaa !9
  br label %.loopexit

767:                                              ; preds = %761
  %768 = load i64, ptr %4, align 8, !tbaa !5
  %769 = icmp slt i64 %.97811002, %768
  br i1 %769, label %770, label %.loopexit

770:                                              ; preds = %767
  %771 = sub nsw i64 %768, %.97811002
  store i64 %771, ptr %13, align 8, !tbaa !5
  %772 = getelementptr %struct.doublecomplex, ptr %5, i64 %.77711003
  %773 = getelementptr %struct.doublecomplex, ptr %6, i64 %.97811002
  call void @f2c_zdotc(ptr noundef nonnull %15, ptr noundef nonnull %13, ptr noundef %772, ptr noundef nonnull @c__1, ptr noundef %773, ptr noundef nonnull @c__1) #6
  %774 = load <2 x double>, ptr %15, align 16, !tbaa !9
  br label %.loopexit

775:                                              ; preds = %756
  br i1 %.not.not.not, label %805, label %776

776:                                              ; preds = %775
  %777 = add nsw i64 %.97811002, -1
  store i64 %777, ptr %13, align 8, !tbaa !5
  %.not842980 = icmp slt i64 %.97811002, 2
  br i1 %.not842980, label %.loopexit, label %.lr.ph985

.lr.ph985:                                        ; preds = %776
  %778 = sub nsw i64 %.77711003, %.97811002
  %779 = getelementptr %struct.doublecomplex, ptr %26, i64 %778
  br label %780

780:                                              ; preds = %.lr.ph985, %780
  %.4786981 = phi i64 [ 1, %.lr.ph985 ], [ %803, %780 ]
  %781 = phi <2 x double> [ zeroinitializer, %.lr.ph985 ], [ %802, %780 ]
  %782 = getelementptr %struct.doublecomplex, ptr %779, i64 %.4786981
  call void @d_cnjg(ptr noundef nonnull %17, ptr noundef %782) #6
  %783 = load double, ptr %17, align 8, !tbaa !14
  %784 = load double, ptr %21, align 16, !tbaa !14
  %785 = load double, ptr %697, align 8, !tbaa !21
  %786 = load double, ptr %694, align 8, !tbaa !21
  %787 = fneg double %785
  %788 = fmul double %786, %787
  %789 = call double @llvm.fmuladd.f64(double %783, double %784, double %788)
  %790 = fmul double %784, %785
  %791 = call double @llvm.fmuladd.f64(double %783, double %786, double %790)
  %792 = getelementptr inbounds %struct.doublecomplex, ptr %25, i64 %.4786981
  %793 = fneg double %791
  %794 = load <2 x double>, ptr %792, align 8, !tbaa !9
  %795 = insertelement <2 x double> poison, double %791, i64 0
  %796 = insertelement <2 x double> %795, double %793, i64 1
  %797 = fmul <2 x double> %794, %796
  %798 = shufflevector <2 x double> %797, <2 x double> poison, <2 x i32> <i32 1, i32 0>
  %799 = insertelement <2 x double> poison, double %789, i64 0
  %800 = shufflevector <2 x double> %799, <2 x double> poison, <2 x i32> zeroinitializer
  %801 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %800, <2 x double> %794, <2 x double> %798)
  store <2 x double> %801, ptr %16, align 16, !tbaa !9
  %802 = fadd <2 x double> %781, %801
  store <2 x double> %802, ptr %15, align 16, !tbaa !9
  %803 = add nuw nsw i64 %.4786981, 1
  %804 = load i64, ptr %13, align 8, !tbaa !5
  %.not842.not = icmp slt i64 %.4786981, %804
  br i1 %.not842.not, label %780, label %.loopexit, !llvm.loop !26

805:                                              ; preds = %775
  %806 = load i64, ptr %4, align 8, !tbaa !5
  %807 = icmp slt i64 %.97811002, %806
  br i1 %807, label %808, label %.loopexit

808:                                              ; preds = %805
  %809 = sub nsw i64 %806, %.97811002
  store i64 %809, ptr %13, align 8, !tbaa !5
  %.not841988 = icmp slt i64 %809, 1
  br i1 %.not841988, label %.loopexit, label %.lr.ph993

.lr.ph993:                                        ; preds = %808
  %810 = getelementptr %struct.doublecomplex, ptr %26, i64 %.77711003
  br label %811

811:                                              ; preds = %.lr.ph993, %811
  %.5787989 = phi i64 [ 1, %.lr.ph993 ], [ %834, %811 ]
  %812 = phi <2 x double> [ zeroinitializer, %.lr.ph993 ], [ %833, %811 ]
  %813 = getelementptr %struct.doublecomplex, ptr %810, i64 %.5787989
  call void @d_cnjg(ptr noundef nonnull %17, ptr noundef %813) #6
  %814 = load double, ptr %17, align 8, !tbaa !14
  %815 = load double, ptr %21, align 16, !tbaa !14
  %816 = load double, ptr %697, align 8, !tbaa !21
  %817 = load double, ptr %694, align 8, !tbaa !21
  %818 = fneg double %816
  %819 = fmul double %817, %818
  %820 = call double @llvm.fmuladd.f64(double %814, double %815, double %819)
  %821 = fmul double %815, %816
  %822 = call double @llvm.fmuladd.f64(double %814, double %817, double %821)
  %823 = getelementptr %struct.doublecomplex, ptr %699, i64 %.5787989
  %824 = fneg double %822
  %825 = load <2 x double>, ptr %823, align 8, !tbaa !9
  %826 = insertelement <2 x double> poison, double %822, i64 0
  %827 = insertelement <2 x double> %826, double %824, i64 1
  %828 = fmul <2 x double> %825, %827
  %829 = shufflevector <2 x double> %828, <2 x double> poison, <2 x i32> <i32 1, i32 0>
  %830 = insertelement <2 x double> poison, double %820, i64 0
  %831 = shufflevector <2 x double> %830, <2 x double> poison, <2 x i32> zeroinitializer
  %832 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %831, <2 x double> %825, <2 x double> %829)
  store <2 x double> %832, ptr %16, align 16, !tbaa !9
  %833 = fadd <2 x double> %812, %832
  store <2 x double> %833, ptr %15, align 16, !tbaa !9
  %834 = add nuw nsw i64 %.5787989, 1
  %835 = load i64, ptr %13, align 8, !tbaa !5
  %.not841.not = icmp slt i64 %.5787989, %835
  br i1 %.not841.not, label %811, label %.loopexit, !llvm.loop !27

.loopexit:                                        ; preds = %780, %811, %776, %808, %805, %762, %770, %767
  %836 = phi <2 x double> [ %766, %762 ], [ %774, %770 ], [ zeroinitializer, %767 ], [ zeroinitializer, %805 ], [ zeroinitializer, %808 ], [ zeroinitializer, %776 ], [ %833, %811 ], [ %802, %780 ]
  %837 = load double, ptr %20, align 8, !tbaa !9
  store double %837, ptr %15, align 16, !tbaa !14
  store double 0.000000e+00, ptr %695, align 8, !tbaa !21
  %838 = load double, ptr %21, align 16, !tbaa !14
  %839 = fcmp oeq double %838, %837
  %840 = load double, ptr %694, align 8
  %841 = fcmp oeq double %840, 0.000000e+00
  %or.cond861 = select i1 %839, i1 %841, i1 false
  br i1 %or.cond861, label %842, label %914

842:                                              ; preds = %.loopexit
  %843 = load <2 x double>, ptr %699, align 8, !tbaa !9
  %844 = fsub <2 x double> %843, %836
  store <2 x double> %844, ptr %15, align 16, !tbaa !9
  store <2 x double> %844, ptr %699, align 8, !tbaa !9
  store i64 %.97811002, ptr %13, align 8, !tbaa !5
  %845 = extractelement <2 x double> %844, i64 0
  %846 = fcmp oge double %845, 0.000000e+00
  %847 = fneg double %845
  %848 = select i1 %846, double %845, double %847
  %849 = call double @d_imag(ptr noundef nonnull %699) #6
  %850 = fcmp oge double %849, 0.000000e+00
  %851 = fneg double %849
  %852 = select i1 %850, double %849, double %851
  %853 = fadd double %848, %852
  br i1 %.not823, label %862, label %854

854:                                              ; preds = %842
  %855 = getelementptr inbounds %struct.doublecomplex, ptr %26, i64 %.77711003
  call void @d_cnjg(ptr noundef nonnull %16, ptr noundef nonnull %855) #6
  %856 = load double, ptr %20, align 8, !tbaa !9
  %857 = load <2 x double>, ptr %16, align 16, !tbaa !9
  %858 = insertelement <2 x double> poison, double %856, i64 0
  %859 = shufflevector <2 x double> %858, <2 x double> poison, <2 x i32> zeroinitializer
  %860 = fmul <2 x double> %859, %857
  store <2 x double> %860, ptr %15, align 16, !tbaa !9
  store <2 x double> %860, ptr %19, align 16, !tbaa !9
  %861 = extractelement <2 x double> %860, i64 0
  br label %865

862:                                              ; preds = %842
  %863 = load double, ptr %20, align 8, !tbaa !9
  store double %863, ptr %19, align 16, !tbaa !14
  store double 0.000000e+00, ptr %696, align 8, !tbaa !21
  %864 = fcmp oeq double %863, 1.000000e+00
  br i1 %864, label %919, label %865

865:                                              ; preds = %862, %854
  %866 = phi double [ %863, %862 ], [ %861, %854 ]
  store double %866, ptr %14, align 8, !tbaa !9
  %867 = call double @d_imag(ptr noundef nonnull %19) #6
  %868 = insertelement <2 x double> poison, double %866, i64 0
  %869 = insertelement <2 x double> %868, double %867, i64 1
  %870 = fcmp oge <2 x double> %869, zeroinitializer
  %871 = fneg <2 x double> %869
  %872 = select <2 x i1> %870, <2 x double> %869, <2 x double> %871
  %shift1119 = shufflevector <2 x double> %872, <2 x double> poison, <2 x i32> <i32 1, i32 poison>
  %873 = fadd <2 x double> %872, %shift1119
  %874 = extractelement <2 x double> %873, i64 0
  %875 = load double, ptr %23, align 8, !tbaa !9
  %876 = fcmp ogt double %874, %875
  br i1 %876, label %877, label %894

877:                                              ; preds = %865
  %878 = fcmp olt double %874, 1.000000e+00
  br i1 %878, label %879, label %890

879:                                              ; preds = %877
  %880 = load double, ptr %22, align 8, !tbaa !9
  %881 = fmul double %874, %880
  %882 = fcmp ogt double %853, %881
  br i1 %882, label %883, label %890

883:                                              ; preds = %879
  %884 = fdiv double 1.000000e+00, %853
  store double %884, ptr %18, align 8, !tbaa !9
  %885 = call i32 @f2c_zdscal(ptr noundef nonnull %4, ptr noundef nonnull %18, ptr noundef nonnull %6, ptr noundef nonnull @c__1) #6
  %886 = load double, ptr %18, align 8, !tbaa !9
  %887 = load double, ptr %7, align 8, !tbaa !9
  %888 = fmul double %886, %887
  store double %888, ptr %7, align 8, !tbaa !9
  %889 = fmul double %.15, %886
  br label %890

890:                                              ; preds = %879, %883, %877
  %.16 = phi double [ %889, %883 ], [ %.15, %879 ], [ %.15, %877 ]
  store i64 %.97811002, ptr %13, align 8, !tbaa !5
  call void @zladiv_(ptr noundef nonnull %15, ptr noundef nonnull %699, ptr noundef nonnull %19) #6
  %891 = load i64, ptr %13, align 8, !tbaa !5
  %892 = getelementptr inbounds %struct.doublecomplex, ptr %25, i64 %891
  %893 = load <2 x double>, ptr %15, align 16, !tbaa !9
  store <2 x double> %893, ptr %892, align 8, !tbaa !9
  br label %919

894:                                              ; preds = %865
  %895 = fcmp ogt double %874, 0.000000e+00
  br i1 %895, label %896, label %911

896:                                              ; preds = %894
  %897 = load double, ptr %22, align 8, !tbaa !9
  %898 = fmul double %874, %897
  %899 = fcmp ogt double %853, %898
  br i1 %899, label %900, label %907

900:                                              ; preds = %896
  %901 = fdiv double %898, %853
  store double %901, ptr %18, align 8, !tbaa !9
  %902 = call i32 @f2c_zdscal(ptr noundef nonnull %4, ptr noundef nonnull %18, ptr noundef nonnull %6, ptr noundef nonnull @c__1) #6
  %903 = load double, ptr %18, align 8, !tbaa !9
  %904 = load double, ptr %7, align 8, !tbaa !9
  %905 = fmul double %903, %904
  store double %905, ptr %7, align 8, !tbaa !9
  %906 = fmul double %.15, %903
  br label %907

907:                                              ; preds = %900, %896
  %.17 = phi double [ %906, %900 ], [ %.15, %896 ]
  store i64 %.97811002, ptr %13, align 8, !tbaa !5
  call void @zladiv_(ptr noundef nonnull %15, ptr noundef nonnull %699, ptr noundef nonnull %19) #6
  %908 = load i64, ptr %13, align 8, !tbaa !5
  %909 = getelementptr inbounds %struct.doublecomplex, ptr %25, i64 %908
  %910 = load <2 x double>, ptr %15, align 16, !tbaa !9
  store <2 x double> %910, ptr %909, align 8, !tbaa !9
  br label %919

911:                                              ; preds = %894
  %912 = load i64, ptr %4, align 8, !tbaa !5
  store i64 %912, ptr %13, align 8, !tbaa !5
  %.not844996 = icmp slt i64 %912, 1
  br i1 %.not844996, label %._crit_edge1000, label %.lr.ph999.preheader

.lr.ph999.preheader:                              ; preds = %911
  %913 = shl nuw i64 %912, 4
  call void @llvm.memset.p0.i64(ptr nonnull align 8 %6, i8 0, i64 %913, i1 false), !tbaa !9
  br label %._crit_edge1000

._crit_edge1000:                                  ; preds = %.lr.ph999.preheader, %911
  store <2 x double> <double 1.000000e+00, double 0.000000e+00>, ptr %699, align 8, !tbaa !9
  store double 0.000000e+00, ptr %7, align 8, !tbaa !9
  br label %919

914:                                              ; preds = %.loopexit
  store i64 %.97811002, ptr %13, align 8, !tbaa !5
  call void @zladiv_(ptr noundef nonnull %16, ptr noundef nonnull %699, ptr noundef nonnull %19) #6
  %915 = load <2 x double>, ptr %16, align 16, !tbaa !9
  %916 = fsub <2 x double> %915, %836
  store <2 x double> %916, ptr %15, align 16, !tbaa !9
  %917 = load i64, ptr %13, align 8, !tbaa !5
  %918 = getelementptr inbounds %struct.doublecomplex, ptr %25, i64 %917
  store <2 x double> %916, ptr %918, align 8, !tbaa !9
  br label %919

919:                                              ; preds = %862, %907, %._crit_edge1000, %890, %914
  %.18 = phi double [ %.16, %890 ], [ %.17, %907 ], [ 0.000000e+00, %._crit_edge1000 ], [ %.15, %862 ], [ %.15, %914 ]
  store i64 %.97811002, ptr %13, align 8, !tbaa !5
  %920 = load double, ptr %699, align 8, !tbaa !14
  store double %920, ptr %14, align 8, !tbaa !9
  %921 = call double @d_imag(ptr noundef nonnull %699) #6
  %922 = insertelement <2 x double> poison, double %920, i64 0
  %923 = insertelement <2 x double> %922, double %921, i64 1
  %924 = fcmp oge <2 x double> %923, zeroinitializer
  %925 = fneg <2 x double> %923
  %926 = select <2 x i1> %924, <2 x double> %923, <2 x double> %925
  %shift1120 = shufflevector <2 x double> %926, <2 x double> poison, <2 x i32> <i32 1, i32 poison>
  %927 = fadd <2 x double> %926, %shift1120
  %928 = extractelement <2 x double> %927, i64 0
  %929 = fcmp oge double %.18, %928
  %930 = select i1 %929, double %.18, double %928
  %931 = add nuw nsw i64 %.37591005, 1
  %932 = mul nsw i64 %931, %246
  %933 = add nsw i64 %932, %.77711003
  %934 = load i64, ptr %12, align 8, !tbaa !5
  %935 = add nsw i64 %934, %.97811002
  %936 = icmp slt i64 %934, 0
  %937 = icmp sge i64 %935, %247
  %938 = icmp sle i64 %935, %247
  %.in839 = select i1 %936, i1 %937, i1 %938
  br i1 %.in839, label %698, label %.loopexit871, !llvm.loop !28

.loopexit871:                                     ; preds = %440, %671, %919, %265, %451, %690
  %939 = load double, ptr %20, align 8, !tbaa !9
  %940 = load double, ptr %7, align 8, !tbaa !9
  %941 = fdiv double %940, %939
  store double %941, ptr %7, align 8, !tbaa !9
  br label %942

942:                                              ; preds = %.loopexit871, %252
  %943 = phi double [ %939, %.loopexit871 ], [ %.pr869, %252 ]
  %944 = fcmp une double %943, 1.000000e+00
  br i1 %944, label %945, label %948

945:                                              ; preds = %942
  %946 = fdiv double 1.000000e+00, %943
  store double %946, ptr %14, align 8, !tbaa !9
  %947 = call i32 @f2c_dscal(ptr noundef nonnull %4, ptr noundef nonnull %14, ptr noundef %8, ptr noundef nonnull @c__1) #6
  br label %948

948:                                              ; preds = %942, %945, %51, %.thread
  call void @llvm.lifetime.end.p0(i64 8, ptr nonnull %23) #6
  call void @llvm.lifetime.end.p0(i64 8, ptr nonnull %22) #6
  call void @llvm.lifetime.end.p0(i64 16, ptr nonnull %21) #6
  call void @llvm.lifetime.end.p0(i64 8, ptr nonnull %20) #6
  call void @llvm.lifetime.end.p0(i64 16, ptr nonnull %19) #6
  call void @llvm.lifetime.end.p0(i64 8, ptr nonnull %18) #6
  call void @llvm.lifetime.end.p0(i64 16, ptr nonnull %17) #6
  call void @llvm.lifetime.end.p0(i64 16, ptr nonnull %16) #6
  call void @llvm.lifetime.end.p0(i64 16, ptr nonnull %15) #6
  call void @llvm.lifetime.end.p0(i64 8, ptr nonnull %14) #6
  call void @llvm.lifetime.end.p0(i64 8, ptr nonnull %13) #6
  call void @llvm.lifetime.end.p0(i64 8, ptr nonnull %12) #6
  call void @llvm.lifetime.end.p0(i64 8, ptr nonnull %11) #6
  ret i32 0
}

; Function Attrs: mustprogress nocallback nofree nosync nounwind willreturn memory(argmem: readwrite)
declare void @llvm.lifetime.start.p0(i64 immarg, ptr nocapture) #1

declare i64 @lsame_(ptr noundef, ptr noundef) local_unnamed_addr #2

declare i32 @xerbla_(ptr noundef, ptr noundef) local_unnamed_addr #2

declare double @dlamch_(ptr noundef) local_unnamed_addr #2

declare i32 @dlabad_(ptr noundef, ptr noundef) local_unnamed_addr #2

declare double @f2c_dzasum(ptr noundef, ptr noundef, ptr noundef) local_unnamed_addr #2

declare i64 @f2c_idamax(ptr noundef, ptr noundef, ptr noundef) local_unnamed_addr #2

declare i32 @f2c_dscal(ptr noundef, ptr noundef, ptr noundef, ptr noundef) local_unnamed_addr #2

declare double @d_imag(ptr noundef) local_unnamed_addr #2

declare i32 @f2c_ztpsv(ptr noundef, ptr noundef, ptr noundef, ptr noundef, ptr noundef, ptr noundef, ptr noundef) local_unnamed_addr #2

declare i32 @f2c_zdscal(ptr noundef, ptr noundef, ptr noundef, ptr noundef) local_unnamed_addr #2

declare void @zladiv_(ptr noundef, ptr noundef, ptr noundef) local_unnamed_addr #2

declare i32 @f2c_zaxpy(ptr noundef, ptr noundef, ptr noundef, ptr noundef, ptr noundef, ptr noundef) local_unnamed_addr #2

declare i64 @f2c_izamax(ptr noundef, ptr noundef, ptr noundef) local_unnamed_addr #2

declare void @f2c_zdotu(ptr noundef, ptr noundef, ptr noundef, ptr noundef, ptr noundef, ptr noundef) local_unnamed_addr #2

; Function Attrs: mustprogress nocallback nofree nosync nounwind speculatable willreturn memory(none)
declare double @llvm.fmuladd.f64(double, double, double) #3

declare void @d_cnjg(ptr noundef, ptr noundef) local_unnamed_addr #2

declare void @f2c_zdotc(ptr noundef, ptr noundef, ptr noundef, ptr noundef, ptr noundef, ptr noundef) local_unnamed_addr #2

; Function Attrs: mustprogress nocallback nofree nosync nounwind willreturn memory(argmem: readwrite)
declare void @llvm.lifetime.end.p0(i64 immarg, ptr nocapture) #1

; Function Attrs: nocallback nofree nounwind willreturn memory(argmem: write)
declare void @llvm.memset.p0.i64(ptr nocapture writeonly, i8, i64, i1 immarg) #4

; Function Attrs: nocallback nofree nosync nounwind speculatable willreturn memory(none)
declare <2 x double> @llvm.fmuladd.v2f64(<2 x double>, <2 x double>, <2 x double>) #5

attributes #0 = { nounwind uwtable "min-legal-vector-width"="0" "no-trapping-math"="true" "stack-protector-buffer-size"="8" "target-cpu"="x86-64" "target-features"="+cmov,+cx8,+fxsr,+mmx,+sse,+sse2,+x87" "tune-cpu"="generic" }
attributes #1 = { mustprogress nocallback nofree nosync nounwind willreturn memory(argmem: readwrite) }
attributes #2 = { "no-trapping-math"="true" "stack-protector-buffer-size"="8" "target-cpu"="x86-64" "target-features"="+cmov,+cx8,+fxsr,+mmx,+sse,+sse2,+x87" "tune-cpu"="generic" }
attributes #3 = { mustprogress nocallback nofree nosync nounwind speculatable willreturn memory(none) }
attributes #4 = { nocallback nofree nounwind willreturn memory(argmem: write) }
attributes #5 = { nocallback nofree nosync nounwind speculatable willreturn memory(none) }
attributes #6 = { nounwind }

!llvm.module.flags = !{!0, !1, !2, !3}
!llvm.ident = !{!4}

!0 = !{i32 1, !"wchar_size", i32 4}
!1 = !{i32 8, !"PIC Level", i32 2}
!2 = !{i32 7, !"PIE Level", i32 2}
!3 = !{i32 7, !"uwtable", i32 2}
!4 = !{!"clang version 19.1.0 (git@github.com:llvm/llvm-project.git a4bf6cd7cfb1a1421ba92bca9d017b49936c55e4)"}
!5 = !{!6, !6, i64 0}
!6 = !{!"long", !7, i64 0}
!7 = !{!"omnipotent char", !8, i64 0}
!8 = !{!"Simple C/C++ TBAA"}
!9 = !{!10, !10, i64 0}
!10 = !{!"double", !7, i64 0}
!11 = distinct !{!11, !12}
!12 = !{!"llvm.loop.mustprogress"}
!13 = distinct !{!13, !12}
!14 = !{!15, !10, i64 0}
!15 = !{!"", !10, i64 0, !10, i64 8}
!16 = distinct !{!16, !12}
!17 = distinct !{!17, !12}
!18 = distinct !{!18, !12}
!19 = distinct !{!19, !12}
!20 = distinct !{!20, !12}
!21 = !{!15, !10, i64 8}
!22 = distinct !{!22, !12}
!23 = distinct !{!23, !12}
!24 = distinct !{!24, !12}
!25 = distinct !{!25, !12}
!26 = distinct !{!26, !12}
!27 = distinct !{!27, !12}
!28 = distinct !{!28, !12}


; Effective O3 passes: CorrelatedValuePropagationPass,DSEPass,EarlyCSEPass,GVNPass,GlobalOptPass,IPSCCPPass,IndVarSimplifyPass,InferAlignmentPass,InferFunctionAttrsPass,InstCombinePass,InstSimplifyPass,JumpThreadingPass,LCSSAPass,LICMPass,LoopIdiomRecognizePass,LoopRotatePass,LoopSimplifyPass,LoopUnrollPass,PostOrderFunctionAttrsPass,ReassociatePass,SLPVectorizerPass,SROAPass,SimplifyCFGPass,TailCallElimPass,VectorCombinePass