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

; 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.complex = type { float, float }

@.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 float, align 4

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

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

87:                                               ; preds = %83
  %88 = load ptr, ptr %23, align 8, !tbaa !5
  store i64 -1, ptr %88, align 8, !tbaa !9
  br label %147

89:                                               ; preds = %83, %11
  %90 = load i64, ptr %57, align 8, !tbaa !9
  %91 = icmp ne i64 %90, 0
  br i1 %91, label %102, label %92

92:                                               ; preds = %89
  %93 = load ptr, ptr %14, align 8, !tbaa !5
  %94 = call i64 @lsame_(ptr noundef %93, ptr noundef @.str.3)
  %95 = icmp ne i64 %94, 0
  br i1 %95, label %102, label %96

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

100:                                              ; preds = %96
  %101 = load ptr, ptr %23, align 8, !tbaa !5
  store i64 -2, ptr %101, align 8, !tbaa !9
  br label %146

102:                                              ; preds = %96, %92, %89
  %103 = load i64, ptr %60, align 8, !tbaa !9
  %104 = icmp ne i64 %103, 0
  br i1 %104, label %111, label %105

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

109:                                              ; preds = %105
  %110 = load ptr, ptr %23, align 8, !tbaa !5
  store i64 -3, ptr %110, align 8, !tbaa !9
  br label %145

111:                                              ; preds = %105, %102
  %112 = load ptr, ptr %16, align 8, !tbaa !5
  %113 = call i64 @lsame_(ptr noundef %112, ptr noundef @.str.5)
  %114 = icmp ne i64 %113, 0
  br i1 %114, label %121, label %115

115:                                              ; preds = %111
  %116 = load ptr, ptr %16, align 8, !tbaa !5
  %117 = call i64 @lsame_(ptr noundef %116, ptr noundef @.str.1)
  %118 = icmp ne i64 %117, 0
  br i1 %118, label %121, label %119

119:                                              ; preds = %115
  %120 = load ptr, ptr %23, align 8, !tbaa !5
  store i64 -4, ptr %120, align 8, !tbaa !9
  br label %144

121:                                              ; preds = %115, %111
  %122 = load ptr, ptr %17, align 8, !tbaa !5
  %123 = load i64, ptr %122, align 8, !tbaa !9
  %124 = icmp slt i64 %123, 0
  br i1 %124, label %125, label %127

125:                                              ; preds = %121
  %126 = load ptr, ptr %23, align 8, !tbaa !5
  store i64 -5, ptr %126, align 8, !tbaa !9
  br label %143

127:                                              ; preds = %121
  %128 = load ptr, ptr %19, align 8, !tbaa !5
  %129 = load i64, ptr %128, align 8, !tbaa !9
  %130 = load ptr, ptr %17, align 8, !tbaa !5
  %131 = load i64, ptr %130, align 8, !tbaa !9
  %132 = icmp sge i64 1, %131
  br i1 %132, label %133, label %134

133:                                              ; preds = %127
  br label %137

134:                                              ; preds = %127
  %135 = load ptr, ptr %17, align 8, !tbaa !5
  %136 = load i64, ptr %135, align 8, !tbaa !9
  br label %137

137:                                              ; preds = %134, %133
  %138 = phi i64 [ 1, %133 ], [ %136, %134 ]
  %139 = icmp slt i64 %129, %138
  br i1 %139, label %140, label %142

140:                                              ; preds = %137
  %141 = load ptr, ptr %23, align 8, !tbaa !5
  store i64 -7, ptr %141, align 8, !tbaa !9
  br label %142

142:                                              ; preds = %140, %137
  br label %143

143:                                              ; preds = %142, %125
  br label %144

144:                                              ; preds = %143, %119
  br label %145

145:                                              ; preds = %144, %109
  br label %146

146:                                              ; preds = %145, %100
  br label %147

147:                                              ; preds = %146, %87
  %148 = load ptr, ptr %23, align 8, !tbaa !5
  %149 = load i64, ptr %148, align 8, !tbaa !9
  %150 = icmp ne i64 %149, 0
  br i1 %150, label %151, label %156

151:                                              ; preds = %147
  %152 = load ptr, ptr %23, align 8, !tbaa !5
  %153 = load i64, ptr %152, align 8, !tbaa !9
  %154 = sub nsw i64 0, %153
  store i64 %154, ptr %26, align 8, !tbaa !9
  %155 = call i32 @xerbla_(ptr noundef @.str.6, ptr noundef %26)
  store i32 0, ptr %12, align 4
  store i32 1, ptr %61, align 4
  br label %2962

156:                                              ; preds = %147
  %157 = load ptr, ptr %17, align 8, !tbaa !5
  %158 = load i64, ptr %157, align 8, !tbaa !9
  %159 = icmp eq i64 %158, 0
  br i1 %159, label %160, label %161

160:                                              ; preds = %156
  store i32 0, ptr %12, align 4
  store i32 1, ptr %61, align 4
  br label %2962

161:                                              ; preds = %156
  %162 = call double @slamch_(ptr noundef @.str.7)
  %163 = fptrunc double %162 to float
  store float %163, ptr %59, align 4, !tbaa !11
  %164 = load float, ptr %59, align 4, !tbaa !11
  %165 = fdiv float 1.000000e+00, %164
  store float %165, ptr %56, align 4, !tbaa !11
  %166 = call i32 @slabad_(ptr noundef %59, ptr noundef %56)
  %167 = call double @slamch_(ptr noundef @.str.8)
  %168 = load float, ptr %59, align 4, !tbaa !11
  %169 = fpext float %168 to double
  %170 = fdiv double %169, %167
  %171 = fptrunc double %170 to float
  store float %171, ptr %59, align 4, !tbaa !11
  %172 = load float, ptr %59, align 4, !tbaa !11
  %173 = fdiv float 1.000000e+00, %172
  store float %173, ptr %56, align 4, !tbaa !11
  %174 = load ptr, ptr %21, align 8, !tbaa !5
  store float 1.000000e+00, ptr %174, align 4, !tbaa !11
  %175 = load ptr, ptr %16, align 8, !tbaa !5
  %176 = call i64 @lsame_(ptr noundef %175, ptr noundef @.str.1)
  %177 = icmp ne i64 %176, 0
  br i1 %177, label %178, label %241

178:                                              ; preds = %161
  %179 = load i64, ptr %55, align 8, !tbaa !9
  %180 = icmp ne i64 %179, 0
  br i1 %180, label %181, label %206

181:                                              ; preds = %178
  %182 = load ptr, ptr %17, align 8, !tbaa !5
  %183 = load i64, ptr %182, align 8, !tbaa !9
  store i64 %183, ptr %26, align 8, !tbaa !9
  store i64 1, ptr %40, align 8, !tbaa !9
  br label %184

184:                                              ; preds = %202, %181
  %185 = load i64, ptr %40, align 8, !tbaa !9
  %186 = load i64, ptr %26, align 8, !tbaa !9
  %187 = icmp sle i64 %185, %186
  br i1 %187, label %188, label %205

188:                                              ; preds = %184
  %189 = load i64, ptr %40, align 8, !tbaa !9
  %190 = sub nsw i64 %189, 1
  store i64 %190, ptr %27, align 8, !tbaa !9
  %191 = load ptr, ptr %18, align 8, !tbaa !5
  %192 = load i64, ptr %40, align 8, !tbaa !9
  %193 = load i64, ptr %24, align 8, !tbaa !9
  %194 = mul nsw i64 %192, %193
  %195 = add nsw i64 %194, 1
  %196 = getelementptr inbounds %struct.complex, ptr %191, i64 %195
  %197 = call double @f2c_scasum(ptr noundef %27, ptr noundef %196, ptr noundef @c__1)
  %198 = fptrunc double %197 to float
  %199 = load ptr, ptr %22, align 8, !tbaa !5
  %200 = load i64, ptr %40, align 8, !tbaa !9
  %201 = getelementptr inbounds float, ptr %199, i64 %200
  store float %198, ptr %201, align 4, !tbaa !11
  br label %202

202:                                              ; preds = %188
  %203 = load i64, ptr %40, align 8, !tbaa !9
  %204 = add nsw i64 %203, 1
  store i64 %204, ptr %40, align 8, !tbaa !9
  br label %184, !llvm.loop !13

205:                                              ; preds = %184
  br label %240

206:                                              ; preds = %178
  %207 = load ptr, ptr %17, align 8, !tbaa !5
  %208 = load i64, ptr %207, align 8, !tbaa !9
  %209 = sub nsw i64 %208, 1
  store i64 %209, ptr %26, align 8, !tbaa !9
  store i64 1, ptr %40, align 8, !tbaa !9
  br label %210

210:                                              ; preds = %232, %206
  %211 = load i64, ptr %40, align 8, !tbaa !9
  %212 = load i64, ptr %26, align 8, !tbaa !9
  %213 = icmp sle i64 %211, %212
  br i1 %213, label %214, label %235

214:                                              ; preds = %210
  %215 = load ptr, ptr %17, align 8, !tbaa !5
  %216 = load i64, ptr %215, align 8, !tbaa !9
  %217 = load i64, ptr %40, align 8, !tbaa !9
  %218 = sub nsw i64 %216, %217
  store i64 %218, ptr %27, align 8, !tbaa !9
  %219 = load ptr, ptr %18, align 8, !tbaa !5
  %220 = load i64, ptr %40, align 8, !tbaa !9
  %221 = add nsw i64 %220, 1
  %222 = load i64, ptr %40, align 8, !tbaa !9
  %223 = load i64, ptr %24, align 8, !tbaa !9
  %224 = mul nsw i64 %222, %223
  %225 = add nsw i64 %221, %224
  %226 = getelementptr inbounds %struct.complex, ptr %219, i64 %225
  %227 = call double @f2c_scasum(ptr noundef %27, ptr noundef %226, ptr noundef @c__1)
  %228 = fptrunc double %227 to float
  %229 = load ptr, ptr %22, align 8, !tbaa !5
  %230 = load i64, ptr %40, align 8, !tbaa !9
  %231 = getelementptr inbounds float, ptr %229, i64 %230
  store float %228, ptr %231, align 4, !tbaa !11
  br label %232

232:                                              ; preds = %214
  %233 = load i64, ptr %40, align 8, !tbaa !9
  %234 = add nsw i64 %233, 1
  store i64 %234, ptr %40, align 8, !tbaa !9
  br label %210, !llvm.loop !15

235:                                              ; preds = %210
  %236 = load ptr, ptr %22, align 8, !tbaa !5
  %237 = load ptr, ptr %17, align 8, !tbaa !5
  %238 = load i64, ptr %237, align 8, !tbaa !9
  %239 = getelementptr inbounds float, ptr %236, i64 %238
  store float 0.000000e+00, ptr %239, align 4, !tbaa !11
  br label %240

240:                                              ; preds = %235, %205
  br label %241

241:                                              ; preds = %240, %161
  %242 = load ptr, ptr %17, align 8, !tbaa !5
  %243 = load ptr, ptr %22, align 8, !tbaa !5
  %244 = getelementptr inbounds float, ptr %243, i64 1
  %245 = call i64 @f2c_isamax(ptr noundef %242, ptr noundef %244, ptr noundef @c__1)
  store i64 %245, ptr %46, align 8, !tbaa !9
  %246 = load ptr, ptr %22, align 8, !tbaa !5
  %247 = load i64, ptr %46, align 8, !tbaa !9
  %248 = getelementptr inbounds float, ptr %246, i64 %247
  %249 = load float, ptr %248, align 4, !tbaa !11
  store float %249, ptr %47, align 4, !tbaa !11
  %250 = load float, ptr %47, align 4, !tbaa !11
  %251 = load float, ptr %56, align 4, !tbaa !11
  %252 = fmul float %251, 5.000000e-01
  %253 = fcmp ole float %250, %252
  br i1 %253, label %254, label %255

254:                                              ; preds = %241
  store float 1.000000e+00, ptr %51, align 4, !tbaa !11
  br label %264

255:                                              ; preds = %241
  %256 = load float, ptr %59, align 4, !tbaa !11
  %257 = load float, ptr %47, align 4, !tbaa !11
  %258 = fmul float %256, %257
  %259 = fdiv float 5.000000e-01, %258
  store float %259, ptr %51, align 4, !tbaa !11
  %260 = load ptr, ptr %17, align 8, !tbaa !5
  %261 = load ptr, ptr %22, align 8, !tbaa !5
  %262 = getelementptr inbounds float, ptr %261, i64 1
  %263 = call i32 @f2c_sscal(ptr noundef %260, ptr noundef %51, ptr noundef %262, ptr noundef @c__1)
  br label %264

264:                                              ; preds = %255, %254
  store float 0.000000e+00, ptr %49, align 4, !tbaa !11
  %265 = load ptr, ptr %17, align 8, !tbaa !5
  %266 = load i64, ptr %265, align 8, !tbaa !9
  store i64 %266, ptr %26, align 8, !tbaa !9
  store i64 1, ptr %40, align 8, !tbaa !9
  br label %267

267:                                              ; preds = %319, %264
  %268 = load i64, ptr %40, align 8, !tbaa !9
  %269 = load i64, ptr %26, align 8, !tbaa !9
  %270 = icmp sle i64 %268, %269
  br i1 %270, label %271, label %322

271:                                              ; preds = %267
  %272 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %272, ptr %27, align 8, !tbaa !9
  %273 = load float, ptr %49, align 4, !tbaa !11
  store float %273, ptr %33, align 4, !tbaa !11
  %274 = load ptr, ptr %20, align 8, !tbaa !5
  %275 = load i64, ptr %27, align 8, !tbaa !9
  %276 = getelementptr inbounds %struct.complex, ptr %274, i64 %275
  %277 = getelementptr inbounds %struct.complex, ptr %276, i32 0, i32 0
  %278 = load float, ptr %277, align 4, !tbaa !16
  %279 = fdiv float %278, 2.000000e+00
  store float %279, ptr %31, align 4, !tbaa !11
  %280 = load float, ptr %31, align 4, !tbaa !11
  %281 = fcmp oge float %280, 0.000000e+00
  br i1 %281, label %282, label %284

282:                                              ; preds = %271
  %283 = load float, ptr %31, align 4, !tbaa !11
  br label %287

284:                                              ; preds = %271
  %285 = load float, ptr %31, align 4, !tbaa !11
  %286 = fneg float %285
  br label %287

287:                                              ; preds = %284, %282
  %288 = phi float [ %283, %282 ], [ %286, %284 ]
  %289 = fpext float %288 to double
  %290 = load ptr, ptr %20, align 8, !tbaa !5
  %291 = load i64, ptr %40, align 8, !tbaa !9
  %292 = getelementptr inbounds %struct.complex, ptr %290, i64 %291
  %293 = call double @r_imag(ptr noundef %292)
  %294 = fdiv double %293, 2.000000e+00
  %295 = fptrunc double %294 to float
  store float %295, ptr %32, align 4, !tbaa !11
  %296 = load float, ptr %32, align 4, !tbaa !11
  %297 = fcmp oge float %296, 0.000000e+00
  br i1 %297, label %298, label %300

298:                                              ; preds = %287
  %299 = load float, ptr %32, align 4, !tbaa !11
  br label %303

300:                                              ; preds = %287
  %301 = load float, ptr %32, align 4, !tbaa !11
  %302 = fneg float %301
  br label %303

303:                                              ; preds = %300, %298
  %304 = phi float [ %299, %298 ], [ %302, %300 ]
  %305 = fpext float %304 to double
  %306 = fadd double %289, %305
  %307 = fptrunc double %306 to float
  store float %307, ptr %34, align 4, !tbaa !11
  %308 = load float, ptr %33, align 4, !tbaa !11
  %309 = load float, ptr %34, align 4, !tbaa !11
  %310 = fcmp oge float %308, %309
  br i1 %310, label %311, label %313

311:                                              ; preds = %303
  %312 = load float, ptr %33, align 4, !tbaa !11
  br label %315

313:                                              ; preds = %303
  %314 = load float, ptr %34, align 4, !tbaa !11
  br label %315

315:                                              ; preds = %313, %311
  %316 = phi float [ %312, %311 ], [ %314, %313 ]
  %317 = fpext float %316 to double
  %318 = fptrunc double %317 to float
  store float %318, ptr %49, align 4, !tbaa !11
  br label %319

319:                                              ; preds = %315
  %320 = load i64, ptr %40, align 8, !tbaa !9
  %321 = add nsw i64 %320, 1
  store i64 %321, ptr %40, align 8, !tbaa !9
  br label %267, !llvm.loop !18

322:                                              ; preds = %267
  %323 = load float, ptr %49, align 4, !tbaa !11
  store float %323, ptr %45, align 4, !tbaa !11
  %324 = load i64, ptr %57, align 8, !tbaa !9
  %325 = icmp ne i64 %324, 0
  br i1 %325, label %326, label %545

326:                                              ; preds = %322
  %327 = load i64, ptr %55, align 8, !tbaa !9
  %328 = icmp ne i64 %327, 0
  br i1 %328, label %329, label %332

329:                                              ; preds = %326
  %330 = load ptr, ptr %17, align 8, !tbaa !5
  %331 = load i64, ptr %330, align 8, !tbaa !9
  store i64 %331, ptr %58, align 8, !tbaa !9
  store i64 1, ptr %53, align 8, !tbaa !9
  store i64 -1, ptr %44, align 8, !tbaa !9
  br label %335

332:                                              ; preds = %326
  store i64 1, ptr %58, align 8, !tbaa !9
  %333 = load ptr, ptr %17, align 8, !tbaa !5
  %334 = load i64, ptr %333, align 8, !tbaa !9
  store i64 %334, ptr %53, align 8, !tbaa !9
  store i64 1, ptr %44, align 8, !tbaa !9
  br label %335

335:                                              ; preds = %332, %329
  %336 = load float, ptr %51, align 4, !tbaa !11
  %337 = fcmp une float %336, 1.000000e+00
  br i1 %337, label %338, label %339

338:                                              ; preds = %335
  store float 0.000000e+00, ptr %50, align 4, !tbaa !11
  br label %544

339:                                              ; preds = %335
  %340 = load i64, ptr %60, align 8, !tbaa !9
  %341 = icmp ne i64 %340, 0
  br i1 %341, label %342, label %481

342:                                              ; preds = %339
  %343 = load float, ptr %45, align 4, !tbaa !11
  %344 = load float, ptr %59, align 4, !tbaa !11
  %345 = fcmp oge float %343, %344
  br i1 %345, label %346, label %348

346:                                              ; preds = %342
  %347 = load float, ptr %45, align 4, !tbaa !11
  br label %350

348:                                              ; preds = %342
  %349 = load float, ptr %59, align 4, !tbaa !11
  br label %350

350:                                              ; preds = %348, %346
  %351 = phi float [ %347, %346 ], [ %349, %348 ]
  %352 = fpext float %351 to double
  %353 = fdiv double 5.000000e-01, %352
  %354 = fptrunc double %353 to float
  store float %354, ptr %50, align 4, !tbaa !11
  %355 = load float, ptr %50, align 4, !tbaa !11
  store float %355, ptr %45, align 4, !tbaa !11
  %356 = load i64, ptr %53, align 8, !tbaa !9
  store i64 %356, ptr %26, align 8, !tbaa !9
  %357 = load i64, ptr %44, align 8, !tbaa !9
  store i64 %357, ptr %27, align 8, !tbaa !9
  %358 = load i64, ptr %58, align 8, !tbaa !9
  store i64 %358, ptr %40, align 8, !tbaa !9
  br label %359

359:                                              ; preds = %475, %350
  %360 = load i64, ptr %27, align 8, !tbaa !9
  %361 = icmp slt i64 %360, 0
  br i1 %361, label %362, label %367

362:                                              ; preds = %359
  %363 = load i64, ptr %40, align 8, !tbaa !9
  %364 = load i64, ptr %26, align 8, !tbaa !9
  %365 = icmp sge i64 %363, %364
  %366 = zext i1 %365 to i32
  br label %372

367:                                              ; preds = %359
  %368 = load i64, ptr %40, align 8, !tbaa !9
  %369 = load i64, ptr %26, align 8, !tbaa !9
  %370 = icmp sle i64 %368, %369
  %371 = zext i1 %370 to i32
  br label %372

372:                                              ; preds = %367, %362
  %373 = phi i32 [ %366, %362 ], [ %371, %367 ]
  %374 = icmp ne i32 %373, 0
  br i1 %374, label %375, label %479

375:                                              ; preds = %372
  %376 = load float, ptr %50, align 4, !tbaa !11
  %377 = load float, ptr %59, align 4, !tbaa !11
  %378 = fcmp ole float %376, %377
  br i1 %378, label %379, label %380

379:                                              ; preds = %375
  br label %544

380:                                              ; preds = %375
  %381 = load i64, ptr %40, align 8, !tbaa !9
  %382 = load i64, ptr %40, align 8, !tbaa !9
  %383 = load i64, ptr %24, align 8, !tbaa !9
  %384 = mul nsw i64 %382, %383
  %385 = add nsw i64 %381, %384
  store i64 %385, ptr %28, align 8, !tbaa !9
  %386 = load ptr, ptr %18, align 8, !tbaa !5
  %387 = load i64, ptr %28, align 8, !tbaa !9
  %388 = getelementptr inbounds %struct.complex, ptr %386, i64 %387
  %389 = getelementptr inbounds %struct.complex, ptr %388, i32 0, i32 0
  %390 = load float, ptr %389, align 4, !tbaa !16
  %391 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 0
  store float %390, ptr %391, align 4, !tbaa !16
  %392 = load ptr, ptr %18, align 8, !tbaa !5
  %393 = load i64, ptr %28, align 8, !tbaa !9
  %394 = getelementptr inbounds %struct.complex, ptr %392, i64 %393
  %395 = getelementptr inbounds %struct.complex, ptr %394, i32 0, i32 1
  %396 = load float, ptr %395, align 4, !tbaa !19
  %397 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 1
  store float %396, ptr %397, align 4, !tbaa !19
  %398 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 0
  %399 = load float, ptr %398, align 4, !tbaa !16
  store float %399, ptr %31, align 4, !tbaa !11
  %400 = load float, ptr %31, align 4, !tbaa !11
  %401 = fcmp oge float %400, 0.000000e+00
  br i1 %401, label %402, label %404

402:                                              ; preds = %380
  %403 = load float, ptr %31, align 4, !tbaa !11
  br label %407

404:                                              ; preds = %380
  %405 = load float, ptr %31, align 4, !tbaa !11
  %406 = fneg float %405
  br label %407

407:                                              ; preds = %404, %402
  %408 = phi float [ %403, %402 ], [ %406, %404 ]
  %409 = fpext float %408 to double
  %410 = call double @r_imag(ptr noundef %48)
  %411 = fptrunc double %410 to float
  store float %411, ptr %32, align 4, !tbaa !11
  %412 = load float, ptr %32, align 4, !tbaa !11
  %413 = fcmp oge float %412, 0.000000e+00
  br i1 %413, label %414, label %416

414:                                              ; preds = %407
  %415 = load float, ptr %32, align 4, !tbaa !11
  br label %419

416:                                              ; preds = %407
  %417 = load float, ptr %32, align 4, !tbaa !11
  %418 = fneg float %417
  br label %419

419:                                              ; preds = %416, %414
  %420 = phi float [ %415, %414 ], [ %418, %416 ]
  %421 = fpext float %420 to double
  %422 = fadd double %409, %421
  %423 = fptrunc double %422 to float
  store float %423, ptr %43, align 4, !tbaa !11
  %424 = load float, ptr %43, align 4, !tbaa !11
  %425 = load float, ptr %59, align 4, !tbaa !11
  %426 = fcmp oge float %424, %425
  br i1 %426, label %427, label %452

427:                                              ; preds = %419
  %428 = load float, ptr %45, align 4, !tbaa !11
  store float %428, ptr %31, align 4, !tbaa !11
  %429 = load float, ptr %43, align 4, !tbaa !11
  %430 = fcmp ole float 1.000000e+00, %429
  br i1 %430, label %431, label %432

431:                                              ; preds = %427
  br label %434

432:                                              ; preds = %427
  %433 = load float, ptr %43, align 4, !tbaa !11
  br label %434

434:                                              ; preds = %432, %431
  %435 = phi float [ 1.000000e+00, %431 ], [ %433, %432 ]
  %436 = fpext float %435 to double
  %437 = load float, ptr %50, align 4, !tbaa !11
  %438 = fpext float %437 to double
  %439 = fmul double %436, %438
  %440 = fptrunc double %439 to float
  store float %440, ptr %32, align 4, !tbaa !11
  %441 = load float, ptr %31, align 4, !tbaa !11
  %442 = load float, ptr %32, align 4, !tbaa !11
  %443 = fcmp ole float %441, %442
  br i1 %443, label %444, label %446

444:                                              ; preds = %434
  %445 = load float, ptr %31, align 4, !tbaa !11
  br label %448

446:                                              ; preds = %434
  %447 = load float, ptr %32, align 4, !tbaa !11
  br label %448

448:                                              ; preds = %446, %444
  %449 = phi float [ %445, %444 ], [ %447, %446 ]
  %450 = fpext float %449 to double
  %451 = fptrunc double %450 to float
  store float %451, ptr %45, align 4, !tbaa !11
  br label %453

452:                                              ; preds = %419
  store float 0.000000e+00, ptr %45, align 4, !tbaa !11
  br label %453

453:                                              ; preds = %452, %448
  %454 = load float, ptr %43, align 4, !tbaa !11
  %455 = load ptr, ptr %22, align 8, !tbaa !5
  %456 = load i64, ptr %40, align 8, !tbaa !9
  %457 = getelementptr inbounds float, ptr %455, i64 %456
  %458 = load float, ptr %457, align 4, !tbaa !11
  %459 = fadd float %454, %458
  %460 = load float, ptr %59, align 4, !tbaa !11
  %461 = fcmp oge float %459, %460
  br i1 %461, label %462, label %473

462:                                              ; preds = %453
  %463 = load float, ptr %43, align 4, !tbaa !11
  %464 = load float, ptr %43, align 4, !tbaa !11
  %465 = load ptr, ptr %22, align 8, !tbaa !5
  %466 = load i64, ptr %40, align 8, !tbaa !9
  %467 = getelementptr inbounds float, ptr %465, i64 %466
  %468 = load float, ptr %467, align 4, !tbaa !11
  %469 = fadd float %464, %468
  %470 = fdiv float %463, %469
  %471 = load float, ptr %50, align 4, !tbaa !11
  %472 = fmul float %471, %470
  store float %472, ptr %50, align 4, !tbaa !11
  br label %474

473:                                              ; preds = %453
  store float 0.000000e+00, ptr %50, align 4, !tbaa !11
  br label %474

474:                                              ; preds = %473, %462
  br label %475

475:                                              ; preds = %474
  %476 = load i64, ptr %27, align 8, !tbaa !9
  %477 = load i64, ptr %40, align 8, !tbaa !9
  %478 = add nsw i64 %477, %476
  store i64 %478, ptr %40, align 8, !tbaa !9
  br label %359, !llvm.loop !20

479:                                              ; preds = %372
  %480 = load float, ptr %45, align 4, !tbaa !11
  store float %480, ptr %50, align 4, !tbaa !11
  br label %543

481:                                              ; preds = %339
  store float 1.000000e+00, ptr %31, align 4, !tbaa !11
  %482 = load float, ptr %45, align 4, !tbaa !11
  %483 = load float, ptr %59, align 4, !tbaa !11
  %484 = fcmp oge float %482, %483
  br i1 %484, label %485, label %487

485:                                              ; preds = %481
  %486 = load float, ptr %45, align 4, !tbaa !11
  br label %489

487:                                              ; preds = %481
  %488 = load float, ptr %59, align 4, !tbaa !11
  br label %489

489:                                              ; preds = %487, %485
  %490 = phi float [ %486, %485 ], [ %488, %487 ]
  %491 = fpext float %490 to double
  %492 = fdiv double 5.000000e-01, %491
  %493 = fptrunc double %492 to float
  store float %493, ptr %32, align 4, !tbaa !11
  %494 = load float, ptr %31, align 4, !tbaa !11
  %495 = load float, ptr %32, align 4, !tbaa !11
  %496 = fcmp ole float %494, %495
  br i1 %496, label %497, label %499

497:                                              ; preds = %489
  %498 = load float, ptr %31, align 4, !tbaa !11
  br label %501

499:                                              ; preds = %489
  %500 = load float, ptr %32, align 4, !tbaa !11
  br label %501

501:                                              ; preds = %499, %497
  %502 = phi float [ %498, %497 ], [ %500, %499 ]
  %503 = fpext float %502 to double
  %504 = fptrunc double %503 to float
  store float %504, ptr %50, align 4, !tbaa !11
  %505 = load i64, ptr %53, align 8, !tbaa !9
  store i64 %505, ptr %27, align 8, !tbaa !9
  %506 = load i64, ptr %44, align 8, !tbaa !9
  store i64 %506, ptr %26, align 8, !tbaa !9
  %507 = load i64, ptr %58, align 8, !tbaa !9
  store i64 %507, ptr %40, align 8, !tbaa !9
  br label %508

508:                                              ; preds = %538, %501
  %509 = load i64, ptr %26, align 8, !tbaa !9
  %510 = icmp slt i64 %509, 0
  br i1 %510, label %511, label %516

511:                                              ; preds = %508
  %512 = load i64, ptr %40, align 8, !tbaa !9
  %513 = load i64, ptr %27, align 8, !tbaa !9
  %514 = icmp sge i64 %512, %513
  %515 = zext i1 %514 to i32
  br label %521

516:                                              ; preds = %508
  %517 = load i64, ptr %40, align 8, !tbaa !9
  %518 = load i64, ptr %27, align 8, !tbaa !9
  %519 = icmp sle i64 %517, %518
  %520 = zext i1 %519 to i32
  br label %521

521:                                              ; preds = %516, %511
  %522 = phi i32 [ %515, %511 ], [ %520, %516 ]
  %523 = icmp ne i32 %522, 0
  br i1 %523, label %524, label %542

524:                                              ; preds = %521
  %525 = load float, ptr %50, align 4, !tbaa !11
  %526 = load float, ptr %59, align 4, !tbaa !11
  %527 = fcmp ole float %525, %526
  br i1 %527, label %528, label %529

528:                                              ; preds = %524
  br label %544

529:                                              ; preds = %524
  %530 = load ptr, ptr %22, align 8, !tbaa !5
  %531 = load i64, ptr %40, align 8, !tbaa !9
  %532 = getelementptr inbounds float, ptr %530, i64 %531
  %533 = load float, ptr %532, align 4, !tbaa !11
  %534 = fadd float %533, 1.000000e+00
  %535 = fdiv float 1.000000e+00, %534
  %536 = load float, ptr %50, align 4, !tbaa !11
  %537 = fmul float %536, %535
  store float %537, ptr %50, align 4, !tbaa !11
  br label %538

538:                                              ; preds = %529
  %539 = load i64, ptr %26, align 8, !tbaa !9
  %540 = load i64, ptr %40, align 8, !tbaa !9
  %541 = add nsw i64 %540, %539
  store i64 %541, ptr %40, align 8, !tbaa !9
  br label %508, !llvm.loop !21

542:                                              ; preds = %521
  br label %543

543:                                              ; preds = %542, %479
  br label %544

544:                                              ; preds = %543, %528, %379, %338
  br label %759

545:                                              ; preds = %322
  %546 = load i64, ptr %55, align 8, !tbaa !9
  %547 = icmp ne i64 %546, 0
  br i1 %547, label %548, label %551

548:                                              ; preds = %545
  store i64 1, ptr %58, align 8, !tbaa !9
  %549 = load ptr, ptr %17, align 8, !tbaa !5
  %550 = load i64, ptr %549, align 8, !tbaa !9
  store i64 %550, ptr %53, align 8, !tbaa !9
  store i64 1, ptr %44, align 8, !tbaa !9
  br label %554

551:                                              ; preds = %545
  %552 = load ptr, ptr %17, align 8, !tbaa !5
  %553 = load i64, ptr %552, align 8, !tbaa !9
  store i64 %553, ptr %58, align 8, !tbaa !9
  store i64 1, ptr %53, align 8, !tbaa !9
  store i64 -1, ptr %44, align 8, !tbaa !9
  br label %554

554:                                              ; preds = %551, %548
  %555 = load float, ptr %51, align 4, !tbaa !11
  %556 = fcmp une float %555, 1.000000e+00
  br i1 %556, label %557, label %558

557:                                              ; preds = %554
  store float 0.000000e+00, ptr %50, align 4, !tbaa !11
  br label %758

558:                                              ; preds = %554
  %559 = load i64, ptr %60, align 8, !tbaa !9
  %560 = icmp ne i64 %559, 0
  br i1 %560, label %561, label %695

561:                                              ; preds = %558
  %562 = load float, ptr %45, align 4, !tbaa !11
  %563 = load float, ptr %59, align 4, !tbaa !11
  %564 = fcmp oge float %562, %563
  br i1 %564, label %565, label %567

565:                                              ; preds = %561
  %566 = load float, ptr %45, align 4, !tbaa !11
  br label %569

567:                                              ; preds = %561
  %568 = load float, ptr %59, align 4, !tbaa !11
  br label %569

569:                                              ; preds = %567, %565
  %570 = phi float [ %566, %565 ], [ %568, %567 ]
  %571 = fpext float %570 to double
  %572 = fdiv double 5.000000e-01, %571
  %573 = fptrunc double %572 to float
  store float %573, ptr %50, align 4, !tbaa !11
  %574 = load float, ptr %50, align 4, !tbaa !11
  store float %574, ptr %45, align 4, !tbaa !11
  %575 = load i64, ptr %53, align 8, !tbaa !9
  store i64 %575, ptr %26, align 8, !tbaa !9
  %576 = load i64, ptr %44, align 8, !tbaa !9
  store i64 %576, ptr %27, align 8, !tbaa !9
  %577 = load i64, ptr %58, align 8, !tbaa !9
  store i64 %577, ptr %40, align 8, !tbaa !9
  br label %578

578:                                              ; preds = %679, %569
  %579 = load i64, ptr %27, align 8, !tbaa !9
  %580 = icmp slt i64 %579, 0
  br i1 %580, label %581, label %586

581:                                              ; preds = %578
  %582 = load i64, ptr %40, align 8, !tbaa !9
  %583 = load i64, ptr %26, align 8, !tbaa !9
  %584 = icmp sge i64 %582, %583
  %585 = zext i1 %584 to i32
  br label %591

586:                                              ; preds = %578
  %587 = load i64, ptr %40, align 8, !tbaa !9
  %588 = load i64, ptr %26, align 8, !tbaa !9
  %589 = icmp sle i64 %587, %588
  %590 = zext i1 %589 to i32
  br label %591

591:                                              ; preds = %586, %581
  %592 = phi i32 [ %585, %581 ], [ %590, %586 ]
  %593 = icmp ne i32 %592, 0
  br i1 %593, label %594, label %683

594:                                              ; preds = %591
  %595 = load float, ptr %50, align 4, !tbaa !11
  %596 = load float, ptr %59, align 4, !tbaa !11
  %597 = fcmp ole float %595, %596
  br i1 %597, label %598, label %599

598:                                              ; preds = %594
  br label %758

599:                                              ; preds = %594
  %600 = load ptr, ptr %22, align 8, !tbaa !5
  %601 = load i64, ptr %40, align 8, !tbaa !9
  %602 = getelementptr inbounds float, ptr %600, i64 %601
  %603 = load float, ptr %602, align 4, !tbaa !11
  %604 = fadd float %603, 1.000000e+00
  store float %604, ptr %41, align 4, !tbaa !11
  %605 = load float, ptr %50, align 4, !tbaa !11
  store float %605, ptr %31, align 4, !tbaa !11
  %606 = load float, ptr %45, align 4, !tbaa !11
  %607 = load float, ptr %41, align 4, !tbaa !11
  %608 = fdiv float %606, %607
  store float %608, ptr %32, align 4, !tbaa !11
  %609 = load float, ptr %31, align 4, !tbaa !11
  %610 = load float, ptr %32, align 4, !tbaa !11
  %611 = fcmp ole float %609, %610
  br i1 %611, label %612, label %614

612:                                              ; preds = %599
  %613 = load float, ptr %31, align 4, !tbaa !11
  br label %616

614:                                              ; preds = %599
  %615 = load float, ptr %32, align 4, !tbaa !11
  br label %616

616:                                              ; preds = %614, %612
  %617 = phi float [ %613, %612 ], [ %615, %614 ]
  %618 = fpext float %617 to double
  %619 = fptrunc double %618 to float
  store float %619, ptr %50, align 4, !tbaa !11
  %620 = load i64, ptr %40, align 8, !tbaa !9
  %621 = load i64, ptr %40, align 8, !tbaa !9
  %622 = load i64, ptr %24, align 8, !tbaa !9
  %623 = mul nsw i64 %621, %622
  %624 = add nsw i64 %620, %623
  store i64 %624, ptr %28, align 8, !tbaa !9
  %625 = load ptr, ptr %18, align 8, !tbaa !5
  %626 = load i64, ptr %28, align 8, !tbaa !9
  %627 = getelementptr inbounds %struct.complex, ptr %625, i64 %626
  %628 = getelementptr inbounds %struct.complex, ptr %627, i32 0, i32 0
  %629 = load float, ptr %628, align 4, !tbaa !16
  %630 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 0
  store float %629, ptr %630, align 4, !tbaa !16
  %631 = load ptr, ptr %18, align 8, !tbaa !5
  %632 = load i64, ptr %28, align 8, !tbaa !9
  %633 = getelementptr inbounds %struct.complex, ptr %631, i64 %632
  %634 = getelementptr inbounds %struct.complex, ptr %633, i32 0, i32 1
  %635 = load float, ptr %634, align 4, !tbaa !19
  %636 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 1
  store float %635, ptr %636, align 4, !tbaa !19
  %637 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 0
  %638 = load float, ptr %637, align 4, !tbaa !16
  store float %638, ptr %31, align 4, !tbaa !11
  %639 = load float, ptr %31, align 4, !tbaa !11
  %640 = fcmp oge float %639, 0.000000e+00
  br i1 %640, label %641, label %643

641:                                              ; preds = %616
  %642 = load float, ptr %31, align 4, !tbaa !11
  br label %646

643:                                              ; preds = %616
  %644 = load float, ptr %31, align 4, !tbaa !11
  %645 = fneg float %644
  br label %646

646:                                              ; preds = %643, %641
  %647 = phi float [ %642, %641 ], [ %645, %643 ]
  %648 = fpext float %647 to double
  %649 = call double @r_imag(ptr noundef %48)
  %650 = fptrunc double %649 to float
  store float %650, ptr %32, align 4, !tbaa !11
  %651 = load float, ptr %32, align 4, !tbaa !11
  %652 = fcmp oge float %651, 0.000000e+00
  br i1 %652, label %653, label %655

653:                                              ; preds = %646
  %654 = load float, ptr %32, align 4, !tbaa !11
  br label %658

655:                                              ; preds = %646
  %656 = load float, ptr %32, align 4, !tbaa !11
  %657 = fneg float %656
  br label %658

658:                                              ; preds = %655, %653
  %659 = phi float [ %654, %653 ], [ %657, %655 ]
  %660 = fpext float %659 to double
  %661 = fadd double %648, %660
  %662 = fptrunc double %661 to float
  store float %662, ptr %43, align 4, !tbaa !11
  %663 = load float, ptr %43, align 4, !tbaa !11
  %664 = load float, ptr %59, align 4, !tbaa !11
  %665 = fcmp oge float %663, %664
  br i1 %665, label %666, label %677

666:                                              ; preds = %658
  %667 = load float, ptr %41, align 4, !tbaa !11
  %668 = load float, ptr %43, align 4, !tbaa !11
  %669 = fcmp ogt float %667, %668
  br i1 %669, label %670, label %676

670:                                              ; preds = %666
  %671 = load float, ptr %43, align 4, !tbaa !11
  %672 = load float, ptr %41, align 4, !tbaa !11
  %673 = fdiv float %671, %672
  %674 = load float, ptr %45, align 4, !tbaa !11
  %675 = fmul float %674, %673
  store float %675, ptr %45, align 4, !tbaa !11
  br label %676

676:                                              ; preds = %670, %666
  br label %678

677:                                              ; preds = %658
  store float 0.000000e+00, ptr %45, align 4, !tbaa !11
  br label %678

678:                                              ; preds = %677, %676
  br label %679

679:                                              ; preds = %678
  %680 = load i64, ptr %27, align 8, !tbaa !9
  %681 = load i64, ptr %40, align 8, !tbaa !9
  %682 = add nsw i64 %681, %680
  store i64 %682, ptr %40, align 8, !tbaa !9
  br label %578, !llvm.loop !22

683:                                              ; preds = %591
  %684 = load float, ptr %50, align 4, !tbaa !11
  %685 = load float, ptr %45, align 4, !tbaa !11
  %686 = fcmp ole float %684, %685
  br i1 %686, label %687, label %689

687:                                              ; preds = %683
  %688 = load float, ptr %50, align 4, !tbaa !11
  br label %691

689:                                              ; preds = %683
  %690 = load float, ptr %45, align 4, !tbaa !11
  br label %691

691:                                              ; preds = %689, %687
  %692 = phi float [ %688, %687 ], [ %690, %689 ]
  %693 = fpext float %692 to double
  %694 = fptrunc double %693 to float
  store float %694, ptr %50, align 4, !tbaa !11
  br label %757

695:                                              ; preds = %558
  store float 1.000000e+00, ptr %31, align 4, !tbaa !11
  %696 = load float, ptr %45, align 4, !tbaa !11
  %697 = load float, ptr %59, align 4, !tbaa !11
  %698 = fcmp oge float %696, %697
  br i1 %698, label %699, label %701

699:                                              ; preds = %695
  %700 = load float, ptr %45, align 4, !tbaa !11
  br label %703

701:                                              ; preds = %695
  %702 = load float, ptr %59, align 4, !tbaa !11
  br label %703

703:                                              ; preds = %701, %699
  %704 = phi float [ %700, %699 ], [ %702, %701 ]
  %705 = fpext float %704 to double
  %706 = fdiv double 5.000000e-01, %705
  %707 = fptrunc double %706 to float
  store float %707, ptr %32, align 4, !tbaa !11
  %708 = load float, ptr %31, align 4, !tbaa !11
  %709 = load float, ptr %32, align 4, !tbaa !11
  %710 = fcmp ole float %708, %709
  br i1 %710, label %711, label %713

711:                                              ; preds = %703
  %712 = load float, ptr %31, align 4, !tbaa !11
  br label %715

713:                                              ; preds = %703
  %714 = load float, ptr %32, align 4, !tbaa !11
  br label %715

715:                                              ; preds = %713, %711
  %716 = phi float [ %712, %711 ], [ %714, %713 ]
  %717 = fpext float %716 to double
  %718 = fptrunc double %717 to float
  store float %718, ptr %50, align 4, !tbaa !11
  %719 = load i64, ptr %53, align 8, !tbaa !9
  store i64 %719, ptr %27, align 8, !tbaa !9
  %720 = load i64, ptr %44, align 8, !tbaa !9
  store i64 %720, ptr %26, align 8, !tbaa !9
  %721 = load i64, ptr %58, align 8, !tbaa !9
  store i64 %721, ptr %40, align 8, !tbaa !9
  br label %722

722:                                              ; preds = %752, %715
  %723 = load i64, ptr %26, align 8, !tbaa !9
  %724 = icmp slt i64 %723, 0
  br i1 %724, label %725, label %730

725:                                              ; preds = %722
  %726 = load i64, ptr %40, align 8, !tbaa !9
  %727 = load i64, ptr %27, align 8, !tbaa !9
  %728 = icmp sge i64 %726, %727
  %729 = zext i1 %728 to i32
  br label %735

730:                                              ; preds = %722
  %731 = load i64, ptr %40, align 8, !tbaa !9
  %732 = load i64, ptr %27, align 8, !tbaa !9
  %733 = icmp sle i64 %731, %732
  %734 = zext i1 %733 to i32
  br label %735

735:                                              ; preds = %730, %725
  %736 = phi i32 [ %729, %725 ], [ %734, %730 ]
  %737 = icmp ne i32 %736, 0
  br i1 %737, label %738, label %756

738:                                              ; preds = %735
  %739 = load float, ptr %50, align 4, !tbaa !11
  %740 = load float, ptr %59, align 4, !tbaa !11
  %741 = fcmp ole float %739, %740
  br i1 %741, label %742, label %743

742:                                              ; preds = %738
  br label %758

743:                                              ; preds = %738
  %744 = load ptr, ptr %22, align 8, !tbaa !5
  %745 = load i64, ptr %40, align 8, !tbaa !9
  %746 = getelementptr inbounds float, ptr %744, i64 %745
  %747 = load float, ptr %746, align 4, !tbaa !11
  %748 = fadd float %747, 1.000000e+00
  store float %748, ptr %41, align 4, !tbaa !11
  %749 = load float, ptr %41, align 4, !tbaa !11
  %750 = load float, ptr %50, align 4, !tbaa !11
  %751 = fdiv float %750, %749
  store float %751, ptr %50, align 4, !tbaa !11
  br label %752

752:                                              ; preds = %743
  %753 = load i64, ptr %26, align 8, !tbaa !9
  %754 = load i64, ptr %40, align 8, !tbaa !9
  %755 = add nsw i64 %754, %753
  store i64 %755, ptr %40, align 8, !tbaa !9
  br label %722, !llvm.loop !23

756:                                              ; preds = %735
  br label %757

757:                                              ; preds = %756, %691
  br label %758

758:                                              ; preds = %757, %742, %598, %557
  br label %759

759:                                              ; preds = %758, %544
  %760 = load float, ptr %50, align 4, !tbaa !11
  %761 = load float, ptr %51, align 4, !tbaa !11
  %762 = fmul float %760, %761
  %763 = load float, ptr %59, align 4, !tbaa !11
  %764 = fcmp ogt float %762, %763
  br i1 %764, label %765, label %777

765:                                              ; preds = %759
  %766 = load ptr, ptr %13, align 8, !tbaa !5
  %767 = load ptr, ptr %14, align 8, !tbaa !5
  %768 = load ptr, ptr %15, align 8, !tbaa !5
  %769 = load ptr, ptr %17, align 8, !tbaa !5
  %770 = load ptr, ptr %18, align 8, !tbaa !5
  %771 = load i64, ptr %25, align 8, !tbaa !9
  %772 = getelementptr inbounds %struct.complex, ptr %770, i64 %771
  %773 = load ptr, ptr %19, align 8, !tbaa !5
  %774 = load ptr, ptr %20, align 8, !tbaa !5
  %775 = getelementptr inbounds %struct.complex, ptr %774, i64 1
  %776 = call i32 @f2c_ctrsv(ptr noundef %766, ptr noundef %767, ptr noundef %768, ptr noundef %769, ptr noundef %772, ptr noundef %773, ptr noundef %775, ptr noundef @c__1)
  br label %2951

777:                                              ; preds = %759
  %778 = load float, ptr %49, align 4, !tbaa !11
  %779 = load float, ptr %56, align 4, !tbaa !11
  %780 = fmul float %779, 5.000000e-01
  %781 = fcmp ogt float %778, %780
  br i1 %781, label %782, label %794

782:                                              ; preds = %777
  %783 = load float, ptr %56, align 4, !tbaa !11
  %784 = fmul float %783, 5.000000e-01
  %785 = load float, ptr %49, align 4, !tbaa !11
  %786 = fdiv float %784, %785
  %787 = load ptr, ptr %21, align 8, !tbaa !5
  store float %786, ptr %787, align 4, !tbaa !11
  %788 = load ptr, ptr %17, align 8, !tbaa !5
  %789 = load ptr, ptr %21, align 8, !tbaa !5
  %790 = load ptr, ptr %20, align 8, !tbaa !5
  %791 = getelementptr inbounds %struct.complex, ptr %790, i64 1
  %792 = call i32 @f2c_csscal(ptr noundef %788, ptr noundef %789, ptr noundef %791, ptr noundef @c__1)
  %793 = load float, ptr %56, align 4, !tbaa !11
  store float %793, ptr %49, align 4, !tbaa !11
  br label %797

794:                                              ; preds = %777
  %795 = load float, ptr %49, align 4, !tbaa !11
  %796 = fmul float %795, 2.000000e+00
  store float %796, ptr %49, align 4, !tbaa !11
  br label %797

797:                                              ; preds = %794, %782
  %798 = load i64, ptr %57, align 8, !tbaa !9
  %799 = icmp ne i64 %798, 0
  br i1 %799, label %800, label %1347

800:                                              ; preds = %797
  %801 = load i64, ptr %53, align 8, !tbaa !9
  store i64 %801, ptr %26, align 8, !tbaa !9
  %802 = load i64, ptr %44, align 8, !tbaa !9
  store i64 %802, ptr %27, align 8, !tbaa !9
  %803 = load i64, ptr %58, align 8, !tbaa !9
  store i64 %803, ptr %40, align 8, !tbaa !9
  br label %804

804:                                              ; preds = %1342, %800
  %805 = load i64, ptr %27, align 8, !tbaa !9
  %806 = icmp slt i64 %805, 0
  br i1 %806, label %807, label %812

807:                                              ; preds = %804
  %808 = load i64, ptr %40, align 8, !tbaa !9
  %809 = load i64, ptr %26, align 8, !tbaa !9
  %810 = icmp sge i64 %808, %809
  %811 = zext i1 %810 to i32
  br label %817

812:                                              ; preds = %804
  %813 = load i64, ptr %40, align 8, !tbaa !9
  %814 = load i64, ptr %26, align 8, !tbaa !9
  %815 = icmp sle i64 %813, %814
  %816 = zext i1 %815 to i32
  br label %817

817:                                              ; preds = %812, %807
  %818 = phi i32 [ %811, %807 ], [ %816, %812 ]
  %819 = icmp ne i32 %818, 0
  br i1 %819, label %820, label %1346

820:                                              ; preds = %817
  %821 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %821, ptr %28, align 8, !tbaa !9
  %822 = load ptr, ptr %20, align 8, !tbaa !5
  %823 = load i64, ptr %28, align 8, !tbaa !9
  %824 = getelementptr inbounds %struct.complex, ptr %822, i64 %823
  %825 = getelementptr inbounds %struct.complex, ptr %824, i32 0, i32 0
  %826 = load float, ptr %825, align 4, !tbaa !16
  store float %826, ptr %31, align 4, !tbaa !11
  %827 = load float, ptr %31, align 4, !tbaa !11
  %828 = fcmp oge float %827, 0.000000e+00
  br i1 %828, label %829, label %831

829:                                              ; preds = %820
  %830 = load float, ptr %31, align 4, !tbaa !11
  br label %834

831:                                              ; preds = %820
  %832 = load float, ptr %31, align 4, !tbaa !11
  %833 = fneg float %832
  br label %834

834:                                              ; preds = %831, %829
  %835 = phi float [ %830, %829 ], [ %833, %831 ]
  %836 = fpext float %835 to double
  %837 = load ptr, ptr %20, align 8, !tbaa !5
  %838 = load i64, ptr %40, align 8, !tbaa !9
  %839 = getelementptr inbounds %struct.complex, ptr %837, i64 %838
  %840 = call double @r_imag(ptr noundef %839)
  %841 = fptrunc double %840 to float
  store float %841, ptr %32, align 4, !tbaa !11
  %842 = load float, ptr %32, align 4, !tbaa !11
  %843 = fcmp oge float %842, 0.000000e+00
  br i1 %843, label %844, label %846

844:                                              ; preds = %834
  %845 = load float, ptr %32, align 4, !tbaa !11
  br label %849

846:                                              ; preds = %834
  %847 = load float, ptr %32, align 4, !tbaa !11
  %848 = fneg float %847
  br label %849

849:                                              ; preds = %846, %844
  %850 = phi float [ %845, %844 ], [ %848, %846 ]
  %851 = fpext float %850 to double
  %852 = fadd double %836, %851
  %853 = fptrunc double %852 to float
  store float %853, ptr %41, align 4, !tbaa !11
  %854 = load i64, ptr %60, align 8, !tbaa !9
  %855 = icmp ne i64 %854, 0
  br i1 %855, label %856, label %884

856:                                              ; preds = %849
  %857 = load i64, ptr %40, align 8, !tbaa !9
  %858 = load i64, ptr %40, align 8, !tbaa !9
  %859 = load i64, ptr %24, align 8, !tbaa !9
  %860 = mul nsw i64 %858, %859
  %861 = add nsw i64 %857, %860
  store i64 %861, ptr %28, align 8, !tbaa !9
  %862 = load float, ptr %51, align 4, !tbaa !11
  %863 = load ptr, ptr %18, align 8, !tbaa !5
  %864 = load i64, ptr %28, align 8, !tbaa !9
  %865 = getelementptr inbounds %struct.complex, ptr %863, i64 %864
  %866 = getelementptr inbounds %struct.complex, ptr %865, i32 0, i32 0
  %867 = load float, ptr %866, align 4, !tbaa !16
  %868 = fmul float %862, %867
  %869 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  store float %868, ptr %869, align 4, !tbaa !16
  %870 = load float, ptr %51, align 4, !tbaa !11
  %871 = load ptr, ptr %18, align 8, !tbaa !5
  %872 = load i64, ptr %28, align 8, !tbaa !9
  %873 = getelementptr inbounds %struct.complex, ptr %871, i64 %872
  %874 = getelementptr inbounds %struct.complex, ptr %873, i32 0, i32 1
  %875 = load float, ptr %874, align 4, !tbaa !19
  %876 = fmul float %870, %875
  %877 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  store float %876, ptr %877, align 4, !tbaa !19
  %878 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %879 = load float, ptr %878, align 4, !tbaa !16
  %880 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 0
  store float %879, ptr %880, align 4, !tbaa !16
  %881 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %882 = load float, ptr %881, align 4, !tbaa !19
  %883 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 1
  store float %882, ptr %883, align 4, !tbaa !19
  br label %892

884:                                              ; preds = %849
  %885 = load float, ptr %51, align 4, !tbaa !11
  %886 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 0
  store float %885, ptr %886, align 4, !tbaa !16
  %887 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 1
  store float 0.000000e+00, ptr %887, align 4, !tbaa !19
  %888 = load float, ptr %51, align 4, !tbaa !11
  %889 = fcmp oeq float %888, 1.000000e+00
  br i1 %889, label %890, label %891

890:                                              ; preds = %884
  br label %1118

891:                                              ; preds = %884
  br label %892

892:                                              ; preds = %891, %856
  %893 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 0
  %894 = load float, ptr %893, align 4, !tbaa !16
  store float %894, ptr %31, align 4, !tbaa !11
  %895 = load float, ptr %31, align 4, !tbaa !11
  %896 = fcmp oge float %895, 0.000000e+00
  br i1 %896, label %897, label %899

897:                                              ; preds = %892
  %898 = load float, ptr %31, align 4, !tbaa !11
  br label %902

899:                                              ; preds = %892
  %900 = load float, ptr %31, align 4, !tbaa !11
  %901 = fneg float %900
  br label %902

902:                                              ; preds = %899, %897
  %903 = phi float [ %898, %897 ], [ %901, %899 ]
  %904 = fpext float %903 to double
  %905 = call double @r_imag(ptr noundef %48)
  %906 = fptrunc double %905 to float
  store float %906, ptr %32, align 4, !tbaa !11
  %907 = load float, ptr %32, align 4, !tbaa !11
  %908 = fcmp oge float %907, 0.000000e+00
  br i1 %908, label %909, label %911

909:                                              ; preds = %902
  %910 = load float, ptr %32, align 4, !tbaa !11
  br label %914

911:                                              ; preds = %902
  %912 = load float, ptr %32, align 4, !tbaa !11
  %913 = fneg float %912
  br label %914

914:                                              ; preds = %911, %909
  %915 = phi float [ %910, %909 ], [ %913, %911 ]
  %916 = fpext float %915 to double
  %917 = fadd double %904, %916
  %918 = fptrunc double %917 to float
  store float %918, ptr %43, align 4, !tbaa !11
  %919 = load float, ptr %43, align 4, !tbaa !11
  %920 = load float, ptr %59, align 4, !tbaa !11
  %921 = fcmp ogt float %919, %920
  br i1 %921, label %922, label %996

922:                                              ; preds = %914
  %923 = load float, ptr %43, align 4, !tbaa !11
  %924 = fcmp olt float %923, 1.000000e+00
  br i1 %924, label %925, label %946

925:                                              ; preds = %922
  %926 = load float, ptr %41, align 4, !tbaa !11
  %927 = load float, ptr %43, align 4, !tbaa !11
  %928 = load float, ptr %56, align 4, !tbaa !11
  %929 = fmul float %927, %928
  %930 = fcmp ogt float %926, %929
  br i1 %930, label %931, label %945

931:                                              ; preds = %925
  %932 = load float, ptr %41, align 4, !tbaa !11
  %933 = fdiv float 1.000000e+00, %932
  store float %933, ptr %42, align 4, !tbaa !11
  %934 = load ptr, ptr %17, align 8, !tbaa !5
  %935 = load ptr, ptr %20, align 8, !tbaa !5
  %936 = getelementptr inbounds %struct.complex, ptr %935, i64 1
  %937 = call i32 @f2c_csscal(ptr noundef %934, ptr noundef %42, ptr noundef %936, ptr noundef @c__1)
  %938 = load float, ptr %42, align 4, !tbaa !11
  %939 = load ptr, ptr %21, align 8, !tbaa !5
  %940 = load float, ptr %939, align 4, !tbaa !11
  %941 = fmul float %940, %938
  store float %941, ptr %939, align 4, !tbaa !11
  %942 = load float, ptr %42, align 4, !tbaa !11
  %943 = load float, ptr %49, align 4, !tbaa !11
  %944 = fmul float %943, %942
  store float %944, ptr %49, align 4, !tbaa !11
  br label %945

945:                                              ; preds = %931, %925
  br label %946

946:                                              ; preds = %945, %922
  %947 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %947, ptr %28, align 8, !tbaa !9
  %948 = load ptr, ptr %20, align 8, !tbaa !5
  %949 = load i64, ptr %40, align 8, !tbaa !9
  %950 = getelementptr inbounds %struct.complex, ptr %948, i64 %949
  call void @cladiv_(ptr noundef %35, ptr noundef %950, ptr noundef %48)
  %951 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %952 = load float, ptr %951, align 4, !tbaa !16
  %953 = load ptr, ptr %20, align 8, !tbaa !5
  %954 = load i64, ptr %28, align 8, !tbaa !9
  %955 = getelementptr inbounds %struct.complex, ptr %953, i64 %954
  %956 = getelementptr inbounds %struct.complex, ptr %955, i32 0, i32 0
  store float %952, ptr %956, align 4, !tbaa !16
  %957 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %958 = load float, ptr %957, align 4, !tbaa !19
  %959 = load ptr, ptr %20, align 8, !tbaa !5
  %960 = load i64, ptr %28, align 8, !tbaa !9
  %961 = getelementptr inbounds %struct.complex, ptr %959, i64 %960
  %962 = getelementptr inbounds %struct.complex, ptr %961, i32 0, i32 1
  store float %958, ptr %962, align 4, !tbaa !19
  %963 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %963, ptr %28, align 8, !tbaa !9
  %964 = load ptr, ptr %20, align 8, !tbaa !5
  %965 = load i64, ptr %28, align 8, !tbaa !9
  %966 = getelementptr inbounds %struct.complex, ptr %964, i64 %965
  %967 = getelementptr inbounds %struct.complex, ptr %966, i32 0, i32 0
  %968 = load float, ptr %967, align 4, !tbaa !16
  store float %968, ptr %31, align 4, !tbaa !11
  %969 = load float, ptr %31, align 4, !tbaa !11
  %970 = fcmp oge float %969, 0.000000e+00
  br i1 %970, label %971, label %973

971:                                              ; preds = %946
  %972 = load float, ptr %31, align 4, !tbaa !11
  br label %976

973:                                              ; preds = %946
  %974 = load float, ptr %31, align 4, !tbaa !11
  %975 = fneg float %974
  br label %976

976:                                              ; preds = %973, %971
  %977 = phi float [ %972, %971 ], [ %975, %973 ]
  %978 = fpext float %977 to double
  %979 = load ptr, ptr %20, align 8, !tbaa !5
  %980 = load i64, ptr %40, align 8, !tbaa !9
  %981 = getelementptr inbounds %struct.complex, ptr %979, i64 %980
  %982 = call double @r_imag(ptr noundef %981)
  %983 = fptrunc double %982 to float
  store float %983, ptr %32, align 4, !tbaa !11
  %984 = load float, ptr %32, align 4, !tbaa !11
  %985 = fcmp oge float %984, 0.000000e+00
  br i1 %985, label %986, label %988

986:                                              ; preds = %976
  %987 = load float, ptr %32, align 4, !tbaa !11
  br label %991

988:                                              ; preds = %976
  %989 = load float, ptr %32, align 4, !tbaa !11
  %990 = fneg float %989
  br label %991

991:                                              ; preds = %988, %986
  %992 = phi float [ %987, %986 ], [ %990, %988 ]
  %993 = fpext float %992 to double
  %994 = fadd double %978, %993
  %995 = fptrunc double %994 to float
  store float %995, ptr %41, align 4, !tbaa !11
  br label %1117

996:                                              ; preds = %914
  %997 = load float, ptr %43, align 4, !tbaa !11
  %998 = fcmp ogt float %997, 0.000000e+00
  br i1 %998, label %999, label %1085

999:                                              ; preds = %996
  %1000 = load float, ptr %41, align 4, !tbaa !11
  %1001 = load float, ptr %43, align 4, !tbaa !11
  %1002 = load float, ptr %56, align 4, !tbaa !11
  %1003 = fmul float %1001, %1002
  %1004 = fcmp ogt float %1000, %1003
  br i1 %1004, label %1005, label %1035

1005:                                             ; preds = %999
  %1006 = load float, ptr %43, align 4, !tbaa !11
  %1007 = load float, ptr %56, align 4, !tbaa !11
  %1008 = fmul float %1006, %1007
  %1009 = load float, ptr %41, align 4, !tbaa !11
  %1010 = fdiv float %1008, %1009
  store float %1010, ptr %42, align 4, !tbaa !11
  %1011 = load ptr, ptr %22, align 8, !tbaa !5
  %1012 = load i64, ptr %40, align 8, !tbaa !9
  %1013 = getelementptr inbounds float, ptr %1011, i64 %1012
  %1014 = load float, ptr %1013, align 4, !tbaa !11
  %1015 = fcmp ogt float %1014, 1.000000e+00
  br i1 %1015, label %1016, label %1023

1016:                                             ; preds = %1005
  %1017 = load ptr, ptr %22, align 8, !tbaa !5
  %1018 = load i64, ptr %40, align 8, !tbaa !9
  %1019 = getelementptr inbounds float, ptr %1017, i64 %1018
  %1020 = load float, ptr %1019, align 4, !tbaa !11
  %1021 = load float, ptr %42, align 4, !tbaa !11
  %1022 = fdiv float %1021, %1020
  store float %1022, ptr %42, align 4, !tbaa !11
  br label %1023

1023:                                             ; preds = %1016, %1005
  %1024 = load ptr, ptr %17, align 8, !tbaa !5
  %1025 = load ptr, ptr %20, align 8, !tbaa !5
  %1026 = getelementptr inbounds %struct.complex, ptr %1025, i64 1
  %1027 = call i32 @f2c_csscal(ptr noundef %1024, ptr noundef %42, ptr noundef %1026, ptr noundef @c__1)
  %1028 = load float, ptr %42, align 4, !tbaa !11
  %1029 = load ptr, ptr %21, align 8, !tbaa !5
  %1030 = load float, ptr %1029, align 4, !tbaa !11
  %1031 = fmul float %1030, %1028
  store float %1031, ptr %1029, align 4, !tbaa !11
  %1032 = load float, ptr %42, align 4, !tbaa !11
  %1033 = load float, ptr %49, align 4, !tbaa !11
  %1034 = fmul float %1033, %1032
  store float %1034, ptr %49, align 4, !tbaa !11
  br label %1035

1035:                                             ; preds = %1023, %999
  %1036 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %1036, ptr %28, align 8, !tbaa !9
  %1037 = load ptr, ptr %20, align 8, !tbaa !5
  %1038 = load i64, ptr %40, align 8, !tbaa !9
  %1039 = getelementptr inbounds %struct.complex, ptr %1037, i64 %1038
  call void @cladiv_(ptr noundef %35, ptr noundef %1039, ptr noundef %48)
  %1040 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %1041 = load float, ptr %1040, align 4, !tbaa !16
  %1042 = load ptr, ptr %20, align 8, !tbaa !5
  %1043 = load i64, ptr %28, align 8, !tbaa !9
  %1044 = getelementptr inbounds %struct.complex, ptr %1042, i64 %1043
  %1045 = getelementptr inbounds %struct.complex, ptr %1044, i32 0, i32 0
  store float %1041, ptr %1045, align 4, !tbaa !16
  %1046 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %1047 = load float, ptr %1046, align 4, !tbaa !19
  %1048 = load ptr, ptr %20, align 8, !tbaa !5
  %1049 = load i64, ptr %28, align 8, !tbaa !9
  %1050 = getelementptr inbounds %struct.complex, ptr %1048, i64 %1049
  %1051 = getelementptr inbounds %struct.complex, ptr %1050, i32 0, i32 1
  store float %1047, ptr %1051, align 4, !tbaa !19
  %1052 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %1052, ptr %28, align 8, !tbaa !9
  %1053 = load ptr, ptr %20, align 8, !tbaa !5
  %1054 = load i64, ptr %28, align 8, !tbaa !9
  %1055 = getelementptr inbounds %struct.complex, ptr %1053, i64 %1054
  %1056 = getelementptr inbounds %struct.complex, ptr %1055, i32 0, i32 0
  %1057 = load float, ptr %1056, align 4, !tbaa !16
  store float %1057, ptr %31, align 4, !tbaa !11
  %1058 = load float, ptr %31, align 4, !tbaa !11
  %1059 = fcmp oge float %1058, 0.000000e+00
  br i1 %1059, label %1060, label %1062

1060:                                             ; preds = %1035
  %1061 = load float, ptr %31, align 4, !tbaa !11
  br label %1065

1062:                                             ; preds = %1035
  %1063 = load float, ptr %31, align 4, !tbaa !11
  %1064 = fneg float %1063
  br label %1065

1065:                                             ; preds = %1062, %1060
  %1066 = phi float [ %1061, %1060 ], [ %1064, %1062 ]
  %1067 = fpext float %1066 to double
  %1068 = load ptr, ptr %20, align 8, !tbaa !5
  %1069 = load i64, ptr %40, align 8, !tbaa !9
  %1070 = getelementptr inbounds %struct.complex, ptr %1068, i64 %1069
  %1071 = call double @r_imag(ptr noundef %1070)
  %1072 = fptrunc double %1071 to float
  store float %1072, ptr %32, align 4, !tbaa !11
  %1073 = load float, ptr %32, align 4, !tbaa !11
  %1074 = fcmp oge float %1073, 0.000000e+00
  br i1 %1074, label %1075, label %1077

1075:                                             ; preds = %1065
  %1076 = load float, ptr %32, align 4, !tbaa !11
  br label %1080

1077:                                             ; preds = %1065
  %1078 = load float, ptr %32, align 4, !tbaa !11
  %1079 = fneg float %1078
  br label %1080

1080:                                             ; preds = %1077, %1075
  %1081 = phi float [ %1076, %1075 ], [ %1079, %1077 ]
  %1082 = fpext float %1081 to double
  %1083 = fadd double %1067, %1082
  %1084 = fptrunc double %1083 to float
  store float %1084, ptr %41, align 4, !tbaa !11
  br label %1116

1085:                                             ; preds = %996
  %1086 = load ptr, ptr %17, align 8, !tbaa !5
  %1087 = load i64, ptr %1086, align 8, !tbaa !9
  store i64 %1087, ptr %28, align 8, !tbaa !9
  store i64 1, ptr %39, align 8, !tbaa !9
  br label %1088

1088:                                             ; preds = %1102, %1085
  %1089 = load i64, ptr %39, align 8, !tbaa !9
  %1090 = load i64, ptr %28, align 8, !tbaa !9
  %1091 = icmp sle i64 %1089, %1090
  br i1 %1091, label %1092, label %1105

1092:                                             ; preds = %1088
  %1093 = load i64, ptr %39, align 8, !tbaa !9
  store i64 %1093, ptr %29, align 8, !tbaa !9
  %1094 = load ptr, ptr %20, align 8, !tbaa !5
  %1095 = load i64, ptr %29, align 8, !tbaa !9
  %1096 = getelementptr inbounds %struct.complex, ptr %1094, i64 %1095
  %1097 = getelementptr inbounds %struct.complex, ptr %1096, i32 0, i32 0
  store float 0.000000e+00, ptr %1097, align 4, !tbaa !16
  %1098 = load ptr, ptr %20, align 8, !tbaa !5
  %1099 = load i64, ptr %29, align 8, !tbaa !9
  %1100 = getelementptr inbounds %struct.complex, ptr %1098, i64 %1099
  %1101 = getelementptr inbounds %struct.complex, ptr %1100, i32 0, i32 1
  store float 0.000000e+00, ptr %1101, align 4, !tbaa !19
  br label %1102

1102:                                             ; preds = %1092
  %1103 = load i64, ptr %39, align 8, !tbaa !9
  %1104 = add nsw i64 %1103, 1
  store i64 %1104, ptr %39, align 8, !tbaa !9
  br label %1088, !llvm.loop !24

1105:                                             ; preds = %1088
  %1106 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %1106, ptr %28, align 8, !tbaa !9
  %1107 = load ptr, ptr %20, align 8, !tbaa !5
  %1108 = load i64, ptr %28, align 8, !tbaa !9
  %1109 = getelementptr inbounds %struct.complex, ptr %1107, i64 %1108
  %1110 = getelementptr inbounds %struct.complex, ptr %1109, i32 0, i32 0
  store float 1.000000e+00, ptr %1110, align 4, !tbaa !16
  %1111 = load ptr, ptr %20, align 8, !tbaa !5
  %1112 = load i64, ptr %28, align 8, !tbaa !9
  %1113 = getelementptr inbounds %struct.complex, ptr %1111, i64 %1112
  %1114 = getelementptr inbounds %struct.complex, ptr %1113, i32 0, i32 1
  store float 0.000000e+00, ptr %1114, align 4, !tbaa !19
  store float 1.000000e+00, ptr %41, align 4, !tbaa !11
  %1115 = load ptr, ptr %21, align 8, !tbaa !5
  store float 0.000000e+00, ptr %1115, align 4, !tbaa !11
  store float 0.000000e+00, ptr %49, align 4, !tbaa !11
  br label %1116

1116:                                             ; preds = %1105, %1080
  br label %1117

1117:                                             ; preds = %1116, %991
  br label %1118

1118:                                             ; preds = %1117, %890
  %1119 = load float, ptr %41, align 4, !tbaa !11
  %1120 = fcmp ogt float %1119, 1.000000e+00
  br i1 %1120, label %1121, label %1146

1121:                                             ; preds = %1118
  %1122 = load float, ptr %41, align 4, !tbaa !11
  %1123 = fdiv float 1.000000e+00, %1122
  store float %1123, ptr %42, align 4, !tbaa !11
  %1124 = load ptr, ptr %22, align 8, !tbaa !5
  %1125 = load i64, ptr %40, align 8, !tbaa !9
  %1126 = getelementptr inbounds float, ptr %1124, i64 %1125
  %1127 = load float, ptr %1126, align 4, !tbaa !11
  %1128 = load float, ptr %56, align 4, !tbaa !11
  %1129 = load float, ptr %49, align 4, !tbaa !11
  %1130 = fsub float %1128, %1129
  %1131 = load float, ptr %42, align 4, !tbaa !11
  %1132 = fmul float %1130, %1131
  %1133 = fcmp ogt float %1127, %1132
  br i1 %1133, label %1134, label %1145

1134:                                             ; preds = %1121
  %1135 = load float, ptr %42, align 4, !tbaa !11
  %1136 = fmul float %1135, 5.000000e-01
  store float %1136, ptr %42, align 4, !tbaa !11
  %1137 = load ptr, ptr %17, align 8, !tbaa !5
  %1138 = load ptr, ptr %20, align 8, !tbaa !5
  %1139 = getelementptr inbounds %struct.complex, ptr %1138, i64 1
  %1140 = call i32 @f2c_csscal(ptr noundef %1137, ptr noundef %42, ptr noundef %1139, ptr noundef @c__1)
  %1141 = load float, ptr %42, align 4, !tbaa !11
  %1142 = load ptr, ptr %21, align 8, !tbaa !5
  %1143 = load float, ptr %1142, align 4, !tbaa !11
  %1144 = fmul float %1143, %1141
  store float %1144, ptr %1142, align 4, !tbaa !11
  br label %1145

1145:                                             ; preds = %1134, %1121
  br label %1166

1146:                                             ; preds = %1118
  %1147 = load float, ptr %41, align 4, !tbaa !11
  %1148 = load ptr, ptr %22, align 8, !tbaa !5
  %1149 = load i64, ptr %40, align 8, !tbaa !9
  %1150 = getelementptr inbounds float, ptr %1148, i64 %1149
  %1151 = load float, ptr %1150, align 4, !tbaa !11
  %1152 = fmul float %1147, %1151
  %1153 = load float, ptr %56, align 4, !tbaa !11
  %1154 = load float, ptr %49, align 4, !tbaa !11
  %1155 = fsub float %1153, %1154
  %1156 = fcmp ogt float %1152, %1155
  br i1 %1156, label %1157, label %1165

1157:                                             ; preds = %1146
  %1158 = load ptr, ptr %17, align 8, !tbaa !5
  %1159 = load ptr, ptr %20, align 8, !tbaa !5
  %1160 = getelementptr inbounds %struct.complex, ptr %1159, i64 1
  %1161 = call i32 @f2c_csscal(ptr noundef %1158, ptr noundef @c_b36, ptr noundef %1160, ptr noundef @c__1)
  %1162 = load ptr, ptr %21, align 8, !tbaa !5
  %1163 = load float, ptr %1162, align 4, !tbaa !11
  %1164 = fmul float %1163, 5.000000e-01
  store float %1164, ptr %1162, align 4, !tbaa !11
  br label %1165

1165:                                             ; preds = %1157, %1146
  br label %1166

1166:                                             ; preds = %1165, %1145
  %1167 = load i64, ptr %55, align 8, !tbaa !9
  %1168 = icmp ne i64 %1167, 0
  br i1 %1168, label %1169, label %1248

1169:                                             ; preds = %1166
  %1170 = load i64, ptr %40, align 8, !tbaa !9
  %1171 = icmp sgt i64 %1170, 1
  br i1 %1171, label %1172, label %1247

1172:                                             ; preds = %1169
  %1173 = load i64, ptr %40, align 8, !tbaa !9
  %1174 = sub nsw i64 %1173, 1
  store i64 %1174, ptr %28, align 8, !tbaa !9
  %1175 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %1175, ptr %29, align 8, !tbaa !9
  %1176 = load ptr, ptr %20, align 8, !tbaa !5
  %1177 = load i64, ptr %29, align 8, !tbaa !9
  %1178 = getelementptr inbounds %struct.complex, ptr %1176, i64 %1177
  %1179 = getelementptr inbounds %struct.complex, ptr %1178, i32 0, i32 0
  %1180 = load float, ptr %1179, align 4, !tbaa !16
  %1181 = fneg float %1180
  %1182 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 0
  store float %1181, ptr %1182, align 4, !tbaa !16
  %1183 = load ptr, ptr %20, align 8, !tbaa !5
  %1184 = load i64, ptr %29, align 8, !tbaa !9
  %1185 = getelementptr inbounds %struct.complex, ptr %1183, i64 %1184
  %1186 = getelementptr inbounds %struct.complex, ptr %1185, i32 0, i32 1
  %1187 = load float, ptr %1186, align 4, !tbaa !19
  %1188 = fneg float %1187
  %1189 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 1
  store float %1188, ptr %1189, align 4, !tbaa !19
  %1190 = load float, ptr %51, align 4, !tbaa !11
  %1191 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 0
  %1192 = load float, ptr %1191, align 4, !tbaa !16
  %1193 = fmul float %1190, %1192
  %1194 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  store float %1193, ptr %1194, align 4, !tbaa !16
  %1195 = load float, ptr %51, align 4, !tbaa !11
  %1196 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 1
  %1197 = load float, ptr %1196, align 4, !tbaa !19
  %1198 = fmul float %1195, %1197
  %1199 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  store float %1198, ptr %1199, align 4, !tbaa !19
  %1200 = load ptr, ptr %18, align 8, !tbaa !5
  %1201 = load i64, ptr %40, align 8, !tbaa !9
  %1202 = load i64, ptr %24, align 8, !tbaa !9
  %1203 = mul nsw i64 %1201, %1202
  %1204 = add nsw i64 %1203, 1
  %1205 = getelementptr inbounds %struct.complex, ptr %1200, i64 %1204
  %1206 = load ptr, ptr %20, align 8, !tbaa !5
  %1207 = getelementptr inbounds %struct.complex, ptr %1206, i64 1
  %1208 = call i32 @f2c_caxpy(ptr noundef %28, ptr noundef %35, ptr noundef %1205, ptr noundef @c__1, ptr noundef %1207, ptr noundef @c__1)
  %1209 = load i64, ptr %40, align 8, !tbaa !9
  %1210 = sub nsw i64 %1209, 1
  store i64 %1210, ptr %28, align 8, !tbaa !9
  %1211 = load ptr, ptr %20, align 8, !tbaa !5
  %1212 = getelementptr inbounds %struct.complex, ptr %1211, i64 1
  %1213 = call i64 @f2c_icamax(ptr noundef %28, ptr noundef %1212, ptr noundef @c__1)
  store i64 %1213, ptr %39, align 8, !tbaa !9
  %1214 = load i64, ptr %39, align 8, !tbaa !9
  store i64 %1214, ptr %28, align 8, !tbaa !9
  %1215 = load ptr, ptr %20, align 8, !tbaa !5
  %1216 = load i64, ptr %28, align 8, !tbaa !9
  %1217 = getelementptr inbounds %struct.complex, ptr %1215, i64 %1216
  %1218 = getelementptr inbounds %struct.complex, ptr %1217, i32 0, i32 0
  %1219 = load float, ptr %1218, align 4, !tbaa !16
  store float %1219, ptr %31, align 4, !tbaa !11
  %1220 = load float, ptr %31, align 4, !tbaa !11
  %1221 = fcmp oge float %1220, 0.000000e+00
  br i1 %1221, label %1222, label %1224

1222:                                             ; preds = %1172
  %1223 = load float, ptr %31, align 4, !tbaa !11
  br label %1227

1224:                                             ; preds = %1172
  %1225 = load float, ptr %31, align 4, !tbaa !11
  %1226 = fneg float %1225
  br label %1227

1227:                                             ; preds = %1224, %1222
  %1228 = phi float [ %1223, %1222 ], [ %1226, %1224 ]
  %1229 = fpext float %1228 to double
  %1230 = load ptr, ptr %20, align 8, !tbaa !5
  %1231 = load i64, ptr %39, align 8, !tbaa !9
  %1232 = getelementptr inbounds %struct.complex, ptr %1230, i64 %1231
  %1233 = call double @r_imag(ptr noundef %1232)
  %1234 = fptrunc double %1233 to float
  store float %1234, ptr %32, align 4, !tbaa !11
  %1235 = load float, ptr %32, align 4, !tbaa !11
  %1236 = fcmp oge float %1235, 0.000000e+00
  br i1 %1236, label %1237, label %1239

1237:                                             ; preds = %1227
  %1238 = load float, ptr %32, align 4, !tbaa !11
  br label %1242

1239:                                             ; preds = %1227
  %1240 = load float, ptr %32, align 4, !tbaa !11
  %1241 = fneg float %1240
  br label %1242

1242:                                             ; preds = %1239, %1237
  %1243 = phi float [ %1238, %1237 ], [ %1241, %1239 ]
  %1244 = fpext float %1243 to double
  %1245 = fadd double %1229, %1244
  %1246 = fptrunc double %1245 to float
  store float %1246, ptr %49, align 4, !tbaa !11
  br label %1247

1247:                                             ; preds = %1242, %1169
  br label %1341

1248:                                             ; preds = %1166
  %1249 = load i64, ptr %40, align 8, !tbaa !9
  %1250 = load ptr, ptr %17, align 8, !tbaa !5
  %1251 = load i64, ptr %1250, align 8, !tbaa !9
  %1252 = icmp slt i64 %1249, %1251
  br i1 %1252, label %1253, label %1340

1253:                                             ; preds = %1248
  %1254 = load ptr, ptr %17, align 8, !tbaa !5
  %1255 = load i64, ptr %1254, align 8, !tbaa !9
  %1256 = load i64, ptr %40, align 8, !tbaa !9
  %1257 = sub nsw i64 %1255, %1256
  store i64 %1257, ptr %28, align 8, !tbaa !9
  %1258 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %1258, ptr %29, align 8, !tbaa !9
  %1259 = load ptr, ptr %20, align 8, !tbaa !5
  %1260 = load i64, ptr %29, align 8, !tbaa !9
  %1261 = getelementptr inbounds %struct.complex, ptr %1259, i64 %1260
  %1262 = getelementptr inbounds %struct.complex, ptr %1261, i32 0, i32 0
  %1263 = load float, ptr %1262, align 4, !tbaa !16
  %1264 = fneg float %1263
  %1265 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 0
  store float %1264, ptr %1265, align 4, !tbaa !16
  %1266 = load ptr, ptr %20, align 8, !tbaa !5
  %1267 = load i64, ptr %29, align 8, !tbaa !9
  %1268 = getelementptr inbounds %struct.complex, ptr %1266, i64 %1267
  %1269 = getelementptr inbounds %struct.complex, ptr %1268, i32 0, i32 1
  %1270 = load float, ptr %1269, align 4, !tbaa !19
  %1271 = fneg float %1270
  %1272 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 1
  store float %1271, ptr %1272, align 4, !tbaa !19
  %1273 = load float, ptr %51, align 4, !tbaa !11
  %1274 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 0
  %1275 = load float, ptr %1274, align 4, !tbaa !16
  %1276 = fmul float %1273, %1275
  %1277 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  store float %1276, ptr %1277, align 4, !tbaa !16
  %1278 = load float, ptr %51, align 4, !tbaa !11
  %1279 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 1
  %1280 = load float, ptr %1279, align 4, !tbaa !19
  %1281 = fmul float %1278, %1280
  %1282 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  store float %1281, ptr %1282, align 4, !tbaa !19
  %1283 = load ptr, ptr %18, align 8, !tbaa !5
  %1284 = load i64, ptr %40, align 8, !tbaa !9
  %1285 = add nsw i64 %1284, 1
  %1286 = load i64, ptr %40, align 8, !tbaa !9
  %1287 = load i64, ptr %24, align 8, !tbaa !9
  %1288 = mul nsw i64 %1286, %1287
  %1289 = add nsw i64 %1285, %1288
  %1290 = getelementptr inbounds %struct.complex, ptr %1283, i64 %1289
  %1291 = load ptr, ptr %20, align 8, !tbaa !5
  %1292 = load i64, ptr %40, align 8, !tbaa !9
  %1293 = add nsw i64 %1292, 1
  %1294 = getelementptr inbounds %struct.complex, ptr %1291, i64 %1293
  %1295 = call i32 @f2c_caxpy(ptr noundef %28, ptr noundef %35, ptr noundef %1290, ptr noundef @c__1, ptr noundef %1294, ptr noundef @c__1)
  %1296 = load ptr, ptr %17, align 8, !tbaa !5
  %1297 = load i64, ptr %1296, align 8, !tbaa !9
  %1298 = load i64, ptr %40, align 8, !tbaa !9
  %1299 = sub nsw i64 %1297, %1298
  store i64 %1299, ptr %28, align 8, !tbaa !9
  %1300 = load i64, ptr %40, align 8, !tbaa !9
  %1301 = load ptr, ptr %20, align 8, !tbaa !5
  %1302 = load i64, ptr %40, align 8, !tbaa !9
  %1303 = add nsw i64 %1302, 1
  %1304 = getelementptr inbounds %struct.complex, ptr %1301, i64 %1303
  %1305 = call i64 @f2c_icamax(ptr noundef %28, ptr noundef %1304, ptr noundef @c__1)
  %1306 = add nsw i64 %1300, %1305
  store i64 %1306, ptr %39, align 8, !tbaa !9
  %1307 = load i64, ptr %39, align 8, !tbaa !9
  store i64 %1307, ptr %28, align 8, !tbaa !9
  %1308 = load ptr, ptr %20, align 8, !tbaa !5
  %1309 = load i64, ptr %28, align 8, !tbaa !9
  %1310 = getelementptr inbounds %struct.complex, ptr %1308, i64 %1309
  %1311 = getelementptr inbounds %struct.complex, ptr %1310, i32 0, i32 0
  %1312 = load float, ptr %1311, align 4, !tbaa !16
  store float %1312, ptr %31, align 4, !tbaa !11
  %1313 = load float, ptr %31, align 4, !tbaa !11
  %1314 = fcmp oge float %1313, 0.000000e+00
  br i1 %1314, label %1315, label %1317

1315:                                             ; preds = %1253
  %1316 = load float, ptr %31, align 4, !tbaa !11
  br label %1320

1317:                                             ; preds = %1253
  %1318 = load float, ptr %31, align 4, !tbaa !11
  %1319 = fneg float %1318
  br label %1320

1320:                                             ; preds = %1317, %1315
  %1321 = phi float [ %1316, %1315 ], [ %1319, %1317 ]
  %1322 = fpext float %1321 to double
  %1323 = load ptr, ptr %20, align 8, !tbaa !5
  %1324 = load i64, ptr %39, align 8, !tbaa !9
  %1325 = getelementptr inbounds %struct.complex, ptr %1323, i64 %1324
  %1326 = call double @r_imag(ptr noundef %1325)
  %1327 = fptrunc double %1326 to float
  store float %1327, ptr %32, align 4, !tbaa !11
  %1328 = load float, ptr %32, align 4, !tbaa !11
  %1329 = fcmp oge float %1328, 0.000000e+00
  br i1 %1329, label %1330, label %1332

1330:                                             ; preds = %1320
  %1331 = load float, ptr %32, align 4, !tbaa !11
  br label %1335

1332:                                             ; preds = %1320
  %1333 = load float, ptr %32, align 4, !tbaa !11
  %1334 = fneg float %1333
  br label %1335

1335:                                             ; preds = %1332, %1330
  %1336 = phi float [ %1331, %1330 ], [ %1334, %1332 ]
  %1337 = fpext float %1336 to double
  %1338 = fadd double %1322, %1337
  %1339 = fptrunc double %1338 to float
  store float %1339, ptr %49, align 4, !tbaa !11
  br label %1340

1340:                                             ; preds = %1335, %1248
  br label %1341

1341:                                             ; preds = %1340, %1247
  br label %1342

1342:                                             ; preds = %1341
  %1343 = load i64, ptr %27, align 8, !tbaa !9
  %1344 = load i64, ptr %40, align 8, !tbaa !9
  %1345 = add nsw i64 %1344, %1343
  store i64 %1345, ptr %40, align 8, !tbaa !9
  br label %804, !llvm.loop !25

1346:                                             ; preds = %817
  br label %2946

1347:                                             ; preds = %797
  %1348 = load ptr, ptr %14, align 8, !tbaa !5
  %1349 = call i64 @lsame_(ptr noundef %1348, ptr noundef @.str.3)
  %1350 = icmp ne i64 %1349, 0
  br i1 %1350, label %1351, label %2162

1351:                                             ; preds = %1347
  %1352 = load i64, ptr %53, align 8, !tbaa !9
  store i64 %1352, ptr %27, align 8, !tbaa !9
  %1353 = load i64, ptr %44, align 8, !tbaa !9
  store i64 %1353, ptr %26, align 8, !tbaa !9
  %1354 = load i64, ptr %58, align 8, !tbaa !9
  store i64 %1354, ptr %40, align 8, !tbaa !9
  br label %1355

1355:                                             ; preds = %2157, %1351
  %1356 = load i64, ptr %26, align 8, !tbaa !9
  %1357 = icmp slt i64 %1356, 0
  br i1 %1357, label %1358, label %1363

1358:                                             ; preds = %1355
  %1359 = load i64, ptr %40, align 8, !tbaa !9
  %1360 = load i64, ptr %27, align 8, !tbaa !9
  %1361 = icmp sge i64 %1359, %1360
  %1362 = zext i1 %1361 to i32
  br label %1368

1363:                                             ; preds = %1355
  %1364 = load i64, ptr %40, align 8, !tbaa !9
  %1365 = load i64, ptr %27, align 8, !tbaa !9
  %1366 = icmp sle i64 %1364, %1365
  %1367 = zext i1 %1366 to i32
  br label %1368

1368:                                             ; preds = %1363, %1358
  %1369 = phi i32 [ %1362, %1358 ], [ %1367, %1363 ]
  %1370 = icmp ne i32 %1369, 0
  br i1 %1370, label %1371, label %2161

1371:                                             ; preds = %1368
  %1372 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %1372, ptr %28, align 8, !tbaa !9
  %1373 = load ptr, ptr %20, align 8, !tbaa !5
  %1374 = load i64, ptr %28, align 8, !tbaa !9
  %1375 = getelementptr inbounds %struct.complex, ptr %1373, i64 %1374
  %1376 = getelementptr inbounds %struct.complex, ptr %1375, i32 0, i32 0
  %1377 = load float, ptr %1376, align 4, !tbaa !16
  store float %1377, ptr %31, align 4, !tbaa !11
  %1378 = load float, ptr %31, align 4, !tbaa !11
  %1379 = fcmp oge float %1378, 0.000000e+00
  br i1 %1379, label %1380, label %1382

1380:                                             ; preds = %1371
  %1381 = load float, ptr %31, align 4, !tbaa !11
  br label %1385

1382:                                             ; preds = %1371
  %1383 = load float, ptr %31, align 4, !tbaa !11
  %1384 = fneg float %1383
  br label %1385

1385:                                             ; preds = %1382, %1380
  %1386 = phi float [ %1381, %1380 ], [ %1384, %1382 ]
  %1387 = fpext float %1386 to double
  %1388 = load ptr, ptr %20, align 8, !tbaa !5
  %1389 = load i64, ptr %40, align 8, !tbaa !9
  %1390 = getelementptr inbounds %struct.complex, ptr %1388, i64 %1389
  %1391 = call double @r_imag(ptr noundef %1390)
  %1392 = fptrunc double %1391 to float
  store float %1392, ptr %32, align 4, !tbaa !11
  %1393 = load float, ptr %32, align 4, !tbaa !11
  %1394 = fcmp oge float %1393, 0.000000e+00
  br i1 %1394, label %1395, label %1397

1395:                                             ; preds = %1385
  %1396 = load float, ptr %32, align 4, !tbaa !11
  br label %1400

1397:                                             ; preds = %1385
  %1398 = load float, ptr %32, align 4, !tbaa !11
  %1399 = fneg float %1398
  br label %1400

1400:                                             ; preds = %1397, %1395
  %1401 = phi float [ %1396, %1395 ], [ %1399, %1397 ]
  %1402 = fpext float %1401 to double
  %1403 = fadd double %1387, %1402
  %1404 = fptrunc double %1403 to float
  store float %1404, ptr %41, align 4, !tbaa !11
  %1405 = load float, ptr %51, align 4, !tbaa !11
  %1406 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 0
  store float %1405, ptr %1406, align 4, !tbaa !16
  %1407 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 1
  store float 0.000000e+00, ptr %1407, align 4, !tbaa !19
  %1408 = load float, ptr %49, align 4, !tbaa !11
  %1409 = fcmp oge float %1408, 1.000000e+00
  br i1 %1409, label %1410, label %1412

1410:                                             ; preds = %1400
  %1411 = load float, ptr %49, align 4, !tbaa !11
  br label %1413

1412:                                             ; preds = %1400
  br label %1413

1413:                                             ; preds = %1412, %1410
  %1414 = phi float [ %1411, %1410 ], [ 1.000000e+00, %1412 ]
  %1415 = fpext float %1414 to double
  %1416 = fdiv double 1.000000e+00, %1415
  %1417 = fptrunc double %1416 to float
  store float %1417, ptr %42, align 4, !tbaa !11
  %1418 = load ptr, ptr %22, align 8, !tbaa !5
  %1419 = load i64, ptr %40, align 8, !tbaa !9
  %1420 = getelementptr inbounds float, ptr %1418, i64 %1419
  %1421 = load float, ptr %1420, align 4, !tbaa !11
  %1422 = load float, ptr %56, align 4, !tbaa !11
  %1423 = load float, ptr %41, align 4, !tbaa !11
  %1424 = fsub float %1422, %1423
  %1425 = load float, ptr %42, align 4, !tbaa !11
  %1426 = fmul float %1424, %1425
  %1427 = fcmp ogt float %1421, %1426
  br i1 %1427, label %1428, label %1531

1428:                                             ; preds = %1413
  %1429 = load float, ptr %42, align 4, !tbaa !11
  %1430 = fmul float %1429, 5.000000e-01
  store float %1430, ptr %42, align 4, !tbaa !11
  %1431 = load i64, ptr %60, align 8, !tbaa !9
  %1432 = icmp ne i64 %1431, 0
  br i1 %1432, label %1433, label %1461

1433:                                             ; preds = %1428
  %1434 = load i64, ptr %40, align 8, !tbaa !9
  %1435 = load i64, ptr %40, align 8, !tbaa !9
  %1436 = load i64, ptr %24, align 8, !tbaa !9
  %1437 = mul nsw i64 %1435, %1436
  %1438 = add nsw i64 %1434, %1437
  store i64 %1438, ptr %28, align 8, !tbaa !9
  %1439 = load float, ptr %51, align 4, !tbaa !11
  %1440 = load ptr, ptr %18, align 8, !tbaa !5
  %1441 = load i64, ptr %28, align 8, !tbaa !9
  %1442 = getelementptr inbounds %struct.complex, ptr %1440, i64 %1441
  %1443 = getelementptr inbounds %struct.complex, ptr %1442, i32 0, i32 0
  %1444 = load float, ptr %1443, align 4, !tbaa !16
  %1445 = fmul float %1439, %1444
  %1446 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  store float %1445, ptr %1446, align 4, !tbaa !16
  %1447 = load float, ptr %51, align 4, !tbaa !11
  %1448 = load ptr, ptr %18, align 8, !tbaa !5
  %1449 = load i64, ptr %28, align 8, !tbaa !9
  %1450 = getelementptr inbounds %struct.complex, ptr %1448, i64 %1449
  %1451 = getelementptr inbounds %struct.complex, ptr %1450, i32 0, i32 1
  %1452 = load float, ptr %1451, align 4, !tbaa !19
  %1453 = fmul float %1447, %1452
  %1454 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  store float %1453, ptr %1454, align 4, !tbaa !19
  %1455 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %1456 = load float, ptr %1455, align 4, !tbaa !16
  %1457 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 0
  store float %1456, ptr %1457, align 4, !tbaa !16
  %1458 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %1459 = load float, ptr %1458, align 4, !tbaa !19
  %1460 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 1
  store float %1459, ptr %1460, align 4, !tbaa !19
  br label %1465

1461:                                             ; preds = %1428
  %1462 = load float, ptr %51, align 4, !tbaa !11
  %1463 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 0
  store float %1462, ptr %1463, align 4, !tbaa !16
  %1464 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 1
  store float 0.000000e+00, ptr %1464, align 4, !tbaa !19
  br label %1465

1465:                                             ; preds = %1461, %1433
  %1466 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 0
  %1467 = load float, ptr %1466, align 4, !tbaa !16
  store float %1467, ptr %31, align 4, !tbaa !11
  %1468 = load float, ptr %31, align 4, !tbaa !11
  %1469 = fcmp oge float %1468, 0.000000e+00
  br i1 %1469, label %1470, label %1472

1470:                                             ; preds = %1465
  %1471 = load float, ptr %31, align 4, !tbaa !11
  br label %1475

1472:                                             ; preds = %1465
  %1473 = load float, ptr %31, align 4, !tbaa !11
  %1474 = fneg float %1473
  br label %1475

1475:                                             ; preds = %1472, %1470
  %1476 = phi float [ %1471, %1470 ], [ %1474, %1472 ]
  %1477 = fpext float %1476 to double
  %1478 = call double @r_imag(ptr noundef %48)
  %1479 = fptrunc double %1478 to float
  store float %1479, ptr %32, align 4, !tbaa !11
  %1480 = load float, ptr %32, align 4, !tbaa !11
  %1481 = fcmp oge float %1480, 0.000000e+00
  br i1 %1481, label %1482, label %1484

1482:                                             ; preds = %1475
  %1483 = load float, ptr %32, align 4, !tbaa !11
  br label %1487

1484:                                             ; preds = %1475
  %1485 = load float, ptr %32, align 4, !tbaa !11
  %1486 = fneg float %1485
  br label %1487

1487:                                             ; preds = %1484, %1482
  %1488 = phi float [ %1483, %1482 ], [ %1486, %1484 ]
  %1489 = fpext float %1488 to double
  %1490 = fadd double %1477, %1489
  %1491 = fptrunc double %1490 to float
  store float %1491, ptr %43, align 4, !tbaa !11
  %1492 = load float, ptr %43, align 4, !tbaa !11
  %1493 = fcmp ogt float %1492, 1.000000e+00
  br i1 %1493, label %1494, label %1515

1494:                                             ; preds = %1487
  store float 1.000000e+00, ptr %31, align 4, !tbaa !11
  %1495 = load float, ptr %42, align 4, !tbaa !11
  %1496 = load float, ptr %43, align 4, !tbaa !11
  %1497 = fmul float %1495, %1496
  store float %1497, ptr %32, align 4, !tbaa !11
  %1498 = load float, ptr %31, align 4, !tbaa !11
  %1499 = load float, ptr %32, align 4, !tbaa !11
  %1500 = fcmp ole float %1498, %1499
  br i1 %1500, label %1501, label %1503

1501:                                             ; preds = %1494
  %1502 = load float, ptr %31, align 4, !tbaa !11
  br label %1505

1503:                                             ; preds = %1494
  %1504 = load float, ptr %32, align 4, !tbaa !11
  br label %1505

1505:                                             ; preds = %1503, %1501
  %1506 = phi float [ %1502, %1501 ], [ %1504, %1503 ]
  %1507 = fpext float %1506 to double
  %1508 = fptrunc double %1507 to float
  store float %1508, ptr %42, align 4, !tbaa !11
  call void @cladiv_(ptr noundef %35, ptr noundef %52, ptr noundef %48)
  %1509 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %1510 = load float, ptr %1509, align 4, !tbaa !16
  %1511 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 0
  store float %1510, ptr %1511, align 4, !tbaa !16
  %1512 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %1513 = load float, ptr %1512, align 4, !tbaa !19
  %1514 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 1
  store float %1513, ptr %1514, align 4, !tbaa !19
  br label %1515

1515:                                             ; preds = %1505, %1487
  %1516 = load float, ptr %42, align 4, !tbaa !11
  %1517 = fcmp olt float %1516, 1.000000e+00
  br i1 %1517, label %1518, label %1530

1518:                                             ; preds = %1515
  %1519 = load ptr, ptr %17, align 8, !tbaa !5
  %1520 = load ptr, ptr %20, align 8, !tbaa !5
  %1521 = getelementptr inbounds %struct.complex, ptr %1520, i64 1
  %1522 = call i32 @f2c_csscal(ptr noundef %1519, ptr noundef %42, ptr noundef %1521, ptr noundef @c__1)
  %1523 = load float, ptr %42, align 4, !tbaa !11
  %1524 = load ptr, ptr %21, align 8, !tbaa !5
  %1525 = load float, ptr %1524, align 4, !tbaa !11
  %1526 = fmul float %1525, %1523
  store float %1526, ptr %1524, align 4, !tbaa !11
  %1527 = load float, ptr %42, align 4, !tbaa !11
  %1528 = load float, ptr %49, align 4, !tbaa !11
  %1529 = fmul float %1528, %1527
  store float %1529, ptr %49, align 4, !tbaa !11
  br label %1530

1530:                                             ; preds = %1518, %1515
  br label %1531

1531:                                             ; preds = %1530, %1413
  %1532 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 0
  store float 0.000000e+00, ptr %1532, align 4, !tbaa !16
  %1533 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 1
  store float 0.000000e+00, ptr %1533, align 4, !tbaa !19
  %1534 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 0
  %1535 = load float, ptr %1534, align 4, !tbaa !16
  %1536 = fcmp oeq float %1535, 1.000000e+00
  br i1 %1536, label %1537, label %1591

1537:                                             ; preds = %1531
  %1538 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 1
  %1539 = load float, ptr %1538, align 4, !tbaa !19
  %1540 = fcmp oeq float %1539, 0.000000e+00
  br i1 %1540, label %1541, label %1591

1541:                                             ; preds = %1537
  %1542 = load i64, ptr %55, align 8, !tbaa !9
  %1543 = icmp ne i64 %1542, 0
  br i1 %1543, label %1544, label %1561

1544:                                             ; preds = %1541
  %1545 = load i64, ptr %40, align 8, !tbaa !9
  %1546 = sub nsw i64 %1545, 1
  store i64 %1546, ptr %28, align 8, !tbaa !9
  %1547 = load ptr, ptr %18, align 8, !tbaa !5
  %1548 = load i64, ptr %40, align 8, !tbaa !9
  %1549 = load i64, ptr %24, align 8, !tbaa !9
  %1550 = mul nsw i64 %1548, %1549
  %1551 = add nsw i64 %1550, 1
  %1552 = getelementptr inbounds %struct.complex, ptr %1547, i64 %1551
  %1553 = load ptr, ptr %20, align 8, !tbaa !5
  %1554 = getelementptr inbounds %struct.complex, ptr %1553, i64 1
  call void @f2c_cdotu(ptr noundef %35, ptr noundef %28, ptr noundef %1552, ptr noundef @c__1, ptr noundef %1554, ptr noundef @c__1)
  %1555 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %1556 = load float, ptr %1555, align 4, !tbaa !16
  %1557 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 0
  store float %1556, ptr %1557, align 4, !tbaa !16
  %1558 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %1559 = load float, ptr %1558, align 4, !tbaa !19
  %1560 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 1
  store float %1559, ptr %1560, align 4, !tbaa !19
  br label %1590

1561:                                             ; preds = %1541
  %1562 = load i64, ptr %40, align 8, !tbaa !9
  %1563 = load ptr, ptr %17, align 8, !tbaa !5
  %1564 = load i64, ptr %1563, align 8, !tbaa !9
  %1565 = icmp slt i64 %1562, %1564
  br i1 %1565, label %1566, label %1589

1566:                                             ; preds = %1561
  %1567 = load ptr, ptr %17, align 8, !tbaa !5
  %1568 = load i64, ptr %1567, align 8, !tbaa !9
  %1569 = load i64, ptr %40, align 8, !tbaa !9
  %1570 = sub nsw i64 %1568, %1569
  store i64 %1570, ptr %28, align 8, !tbaa !9
  %1571 = load ptr, ptr %18, align 8, !tbaa !5
  %1572 = load i64, ptr %40, align 8, !tbaa !9
  %1573 = add nsw i64 %1572, 1
  %1574 = load i64, ptr %40, align 8, !tbaa !9
  %1575 = load i64, ptr %24, align 8, !tbaa !9
  %1576 = mul nsw i64 %1574, %1575
  %1577 = add nsw i64 %1573, %1576
  %1578 = getelementptr inbounds %struct.complex, ptr %1571, i64 %1577
  %1579 = load ptr, ptr %20, align 8, !tbaa !5
  %1580 = load i64, ptr %40, align 8, !tbaa !9
  %1581 = add nsw i64 %1580, 1
  %1582 = getelementptr inbounds %struct.complex, ptr %1579, i64 %1581
  call void @f2c_cdotu(ptr noundef %35, ptr noundef %28, ptr noundef %1578, ptr noundef @c__1, ptr noundef %1582, ptr noundef @c__1)
  %1583 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %1584 = load float, ptr %1583, align 4, !tbaa !16
  %1585 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 0
  store float %1584, ptr %1585, align 4, !tbaa !16
  %1586 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %1587 = load float, ptr %1586, align 4, !tbaa !19
  %1588 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 1
  store float %1587, ptr %1588, align 4, !tbaa !19
  br label %1589

1589:                                             ; preds = %1566, %1561
  br label %1590

1590:                                             ; preds = %1589, %1544
  br label %1815

1591:                                             ; preds = %1537, %1531
  %1592 = load i64, ptr %55, align 8, !tbaa !9
  %1593 = icmp ne i64 %1592, 0
  br i1 %1593, label %1594, label %1700

1594:                                             ; preds = %1591
  %1595 = load i64, ptr %40, align 8, !tbaa !9
  %1596 = sub nsw i64 %1595, 1
  store i64 %1596, ptr %28, align 8, !tbaa !9
  store i64 1, ptr %39, align 8, !tbaa !9
  br label %1597

1597:                                             ; preds = %1696, %1594
  %1598 = load i64, ptr %39, align 8, !tbaa !9
  %1599 = load i64, ptr %28, align 8, !tbaa !9
  %1600 = icmp sle i64 %1598, %1599
  br i1 %1600, label %1601, label %1699

1601:                                             ; preds = %1597
  %1602 = load i64, ptr %39, align 8, !tbaa !9
  %1603 = load i64, ptr %40, align 8, !tbaa !9
  %1604 = load i64, ptr %24, align 8, !tbaa !9
  %1605 = mul nsw i64 %1603, %1604
  %1606 = add nsw i64 %1602, %1605
  store i64 %1606, ptr %29, align 8, !tbaa !9
  %1607 = load ptr, ptr %18, align 8, !tbaa !5
  %1608 = load i64, ptr %29, align 8, !tbaa !9
  %1609 = getelementptr inbounds %struct.complex, ptr %1607, i64 %1608
  %1610 = getelementptr inbounds %struct.complex, ptr %1609, i32 0, i32 0
  %1611 = load float, ptr %1610, align 4, !tbaa !16
  %1612 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 0
  %1613 = load float, ptr %1612, align 4, !tbaa !16
  %1614 = load ptr, ptr %18, align 8, !tbaa !5
  %1615 = load i64, ptr %29, align 8, !tbaa !9
  %1616 = getelementptr inbounds %struct.complex, ptr %1614, i64 %1615
  %1617 = getelementptr inbounds %struct.complex, ptr %1616, i32 0, i32 1
  %1618 = load float, ptr %1617, align 4, !tbaa !19
  %1619 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 1
  %1620 = load float, ptr %1619, align 4, !tbaa !19
  %1621 = fmul float %1618, %1620
  %1622 = fneg float %1621
  %1623 = call float @llvm.fmuladd.f32(float %1611, float %1613, float %1622)
  %1624 = getelementptr inbounds %struct.complex, ptr %37, i32 0, i32 0
  store float %1623, ptr %1624, align 4, !tbaa !16
  %1625 = load ptr, ptr %18, align 8, !tbaa !5
  %1626 = load i64, ptr %29, align 8, !tbaa !9
  %1627 = getelementptr inbounds %struct.complex, ptr %1625, i64 %1626
  %1628 = getelementptr inbounds %struct.complex, ptr %1627, i32 0, i32 0
  %1629 = load float, ptr %1628, align 4, !tbaa !16
  %1630 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 1
  %1631 = load float, ptr %1630, align 4, !tbaa !19
  %1632 = load ptr, ptr %18, align 8, !tbaa !5
  %1633 = load i64, ptr %29, align 8, !tbaa !9
  %1634 = getelementptr inbounds %struct.complex, ptr %1632, i64 %1633
  %1635 = getelementptr inbounds %struct.complex, ptr %1634, i32 0, i32 1
  %1636 = load float, ptr %1635, align 4, !tbaa !19
  %1637 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 0
  %1638 = load float, ptr %1637, align 4, !tbaa !16
  %1639 = fmul float %1636, %1638
  %1640 = call float @llvm.fmuladd.f32(float %1629, float %1631, float %1639)
  %1641 = getelementptr inbounds %struct.complex, ptr %37, i32 0, i32 1
  store float %1640, ptr %1641, align 4, !tbaa !19
  %1642 = load i64, ptr %39, align 8, !tbaa !9
  store i64 %1642, ptr %30, align 8, !tbaa !9
  %1643 = getelementptr inbounds %struct.complex, ptr %37, i32 0, i32 0
  %1644 = load float, ptr %1643, align 4, !tbaa !16
  %1645 = load ptr, ptr %20, align 8, !tbaa !5
  %1646 = load i64, ptr %30, align 8, !tbaa !9
  %1647 = getelementptr inbounds %struct.complex, ptr %1645, i64 %1646
  %1648 = getelementptr inbounds %struct.complex, ptr %1647, i32 0, i32 0
  %1649 = load float, ptr %1648, align 4, !tbaa !16
  %1650 = getelementptr inbounds %struct.complex, ptr %37, i32 0, i32 1
  %1651 = load float, ptr %1650, align 4, !tbaa !19
  %1652 = load ptr, ptr %20, align 8, !tbaa !5
  %1653 = load i64, ptr %30, align 8, !tbaa !9
  %1654 = getelementptr inbounds %struct.complex, ptr %1652, i64 %1653
  %1655 = getelementptr inbounds %struct.complex, ptr %1654, i32 0, i32 1
  %1656 = load float, ptr %1655, align 4, !tbaa !19
  %1657 = fmul float %1651, %1656
  %1658 = fneg float %1657
  %1659 = call float @llvm.fmuladd.f32(float %1644, float %1649, float %1658)
  %1660 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 0
  store float %1659, ptr %1660, align 4, !tbaa !16
  %1661 = getelementptr inbounds %struct.complex, ptr %37, i32 0, i32 0
  %1662 = load float, ptr %1661, align 4, !tbaa !16
  %1663 = load ptr, ptr %20, align 8, !tbaa !5
  %1664 = load i64, ptr %30, align 8, !tbaa !9
  %1665 = getelementptr inbounds %struct.complex, ptr %1663, i64 %1664
  %1666 = getelementptr inbounds %struct.complex, ptr %1665, i32 0, i32 1
  %1667 = load float, ptr %1666, align 4, !tbaa !19
  %1668 = getelementptr inbounds %struct.complex, ptr %37, i32 0, i32 1
  %1669 = load float, ptr %1668, align 4, !tbaa !19
  %1670 = load ptr, ptr %20, align 8, !tbaa !5
  %1671 = load i64, ptr %30, align 8, !tbaa !9
  %1672 = getelementptr inbounds %struct.complex, ptr %1670, i64 %1671
  %1673 = getelementptr inbounds %struct.complex, ptr %1672, i32 0, i32 0
  %1674 = load float, ptr %1673, align 4, !tbaa !16
  %1675 = fmul float %1669, %1674
  %1676 = call float @llvm.fmuladd.f32(float %1662, float %1667, float %1675)
  %1677 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 1
  store float %1676, ptr %1677, align 4, !tbaa !19
  %1678 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 0
  %1679 = load float, ptr %1678, align 4, !tbaa !16
  %1680 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 0
  %1681 = load float, ptr %1680, align 4, !tbaa !16
  %1682 = fadd float %1679, %1681
  %1683 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  store float %1682, ptr %1683, align 4, !tbaa !16
  %1684 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 1
  %1685 = load float, ptr %1684, align 4, !tbaa !19
  %1686 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 1
  %1687 = load float, ptr %1686, align 4, !tbaa !19
  %1688 = fadd float %1685, %1687
  %1689 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  store float %1688, ptr %1689, align 4, !tbaa !19
  %1690 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %1691 = load float, ptr %1690, align 4, !tbaa !16
  %1692 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 0
  store float %1691, ptr %1692, align 4, !tbaa !16
  %1693 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %1694 = load float, ptr %1693, align 4, !tbaa !19
  %1695 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 1
  store float %1694, ptr %1695, align 4, !tbaa !19
  br label %1696

1696:                                             ; preds = %1601
  %1697 = load i64, ptr %39, align 8, !tbaa !9
  %1698 = add nsw i64 %1697, 1
  store i64 %1698, ptr %39, align 8, !tbaa !9
  br label %1597, !llvm.loop !26

1699:                                             ; preds = %1597
  br label %1814

1700:                                             ; preds = %1591
  %1701 = load i64, ptr %40, align 8, !tbaa !9
  %1702 = load ptr, ptr %17, align 8, !tbaa !5
  %1703 = load i64, ptr %1702, align 8, !tbaa !9
  %1704 = icmp slt i64 %1701, %1703
  br i1 %1704, label %1705, label %1813

1705:                                             ; preds = %1700
  %1706 = load ptr, ptr %17, align 8, !tbaa !5
  %1707 = load i64, ptr %1706, align 8, !tbaa !9
  store i64 %1707, ptr %28, align 8, !tbaa !9
  %1708 = load i64, ptr %40, align 8, !tbaa !9
  %1709 = add nsw i64 %1708, 1
  store i64 %1709, ptr %39, align 8, !tbaa !9
  br label %1710

1710:                                             ; preds = %1809, %1705
  %1711 = load i64, ptr %39, align 8, !tbaa !9
  %1712 = load i64, ptr %28, align 8, !tbaa !9
  %1713 = icmp sle i64 %1711, %1712
  br i1 %1713, label %1714, label %1812

1714:                                             ; preds = %1710
  %1715 = load i64, ptr %39, align 8, !tbaa !9
  %1716 = load i64, ptr %40, align 8, !tbaa !9
  %1717 = load i64, ptr %24, align 8, !tbaa !9
  %1718 = mul nsw i64 %1716, %1717
  %1719 = add nsw i64 %1715, %1718
  store i64 %1719, ptr %29, align 8, !tbaa !9
  %1720 = load ptr, ptr %18, align 8, !tbaa !5
  %1721 = load i64, ptr %29, align 8, !tbaa !9
  %1722 = getelementptr inbounds %struct.complex, ptr %1720, i64 %1721
  %1723 = getelementptr inbounds %struct.complex, ptr %1722, i32 0, i32 0
  %1724 = load float, ptr %1723, align 4, !tbaa !16
  %1725 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 0
  %1726 = load float, ptr %1725, align 4, !tbaa !16
  %1727 = load ptr, ptr %18, align 8, !tbaa !5
  %1728 = load i64, ptr %29, align 8, !tbaa !9
  %1729 = getelementptr inbounds %struct.complex, ptr %1727, i64 %1728
  %1730 = getelementptr inbounds %struct.complex, ptr %1729, i32 0, i32 1
  %1731 = load float, ptr %1730, align 4, !tbaa !19
  %1732 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 1
  %1733 = load float, ptr %1732, align 4, !tbaa !19
  %1734 = fmul float %1731, %1733
  %1735 = fneg float %1734
  %1736 = call float @llvm.fmuladd.f32(float %1724, float %1726, float %1735)
  %1737 = getelementptr inbounds %struct.complex, ptr %37, i32 0, i32 0
  store float %1736, ptr %1737, align 4, !tbaa !16
  %1738 = load ptr, ptr %18, align 8, !tbaa !5
  %1739 = load i64, ptr %29, align 8, !tbaa !9
  %1740 = getelementptr inbounds %struct.complex, ptr %1738, i64 %1739
  %1741 = getelementptr inbounds %struct.complex, ptr %1740, i32 0, i32 0
  %1742 = load float, ptr %1741, align 4, !tbaa !16
  %1743 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 1
  %1744 = load float, ptr %1743, align 4, !tbaa !19
  %1745 = load ptr, ptr %18, align 8, !tbaa !5
  %1746 = load i64, ptr %29, align 8, !tbaa !9
  %1747 = getelementptr inbounds %struct.complex, ptr %1745, i64 %1746
  %1748 = getelementptr inbounds %struct.complex, ptr %1747, i32 0, i32 1
  %1749 = load float, ptr %1748, align 4, !tbaa !19
  %1750 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 0
  %1751 = load float, ptr %1750, align 4, !tbaa !16
  %1752 = fmul float %1749, %1751
  %1753 = call float @llvm.fmuladd.f32(float %1742, float %1744, float %1752)
  %1754 = getelementptr inbounds %struct.complex, ptr %37, i32 0, i32 1
  store float %1753, ptr %1754, align 4, !tbaa !19
  %1755 = load i64, ptr %39, align 8, !tbaa !9
  store i64 %1755, ptr %30, align 8, !tbaa !9
  %1756 = getelementptr inbounds %struct.complex, ptr %37, i32 0, i32 0
  %1757 = load float, ptr %1756, align 4, !tbaa !16
  %1758 = load ptr, ptr %20, align 8, !tbaa !5
  %1759 = load i64, ptr %30, align 8, !tbaa !9
  %1760 = getelementptr inbounds %struct.complex, ptr %1758, i64 %1759
  %1761 = getelementptr inbounds %struct.complex, ptr %1760, i32 0, i32 0
  %1762 = load float, ptr %1761, align 4, !tbaa !16
  %1763 = getelementptr inbounds %struct.complex, ptr %37, i32 0, i32 1
  %1764 = load float, ptr %1763, align 4, !tbaa !19
  %1765 = load ptr, ptr %20, align 8, !tbaa !5
  %1766 = load i64, ptr %30, align 8, !tbaa !9
  %1767 = getelementptr inbounds %struct.complex, ptr %1765, i64 %1766
  %1768 = getelementptr inbounds %struct.complex, ptr %1767, i32 0, i32 1
  %1769 = load float, ptr %1768, align 4, !tbaa !19
  %1770 = fmul float %1764, %1769
  %1771 = fneg float %1770
  %1772 = call float @llvm.fmuladd.f32(float %1757, float %1762, float %1771)
  %1773 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 0
  store float %1772, ptr %1773, align 4, !tbaa !16
  %1774 = getelementptr inbounds %struct.complex, ptr %37, i32 0, i32 0
  %1775 = load float, ptr %1774, align 4, !tbaa !16
  %1776 = load ptr, ptr %20, align 8, !tbaa !5
  %1777 = load i64, ptr %30, align 8, !tbaa !9
  %1778 = getelementptr inbounds %struct.complex, ptr %1776, i64 %1777
  %1779 = getelementptr inbounds %struct.complex, ptr %1778, i32 0, i32 1
  %1780 = load float, ptr %1779, align 4, !tbaa !19
  %1781 = getelementptr inbounds %struct.complex, ptr %37, i32 0, i32 1
  %1782 = load float, ptr %1781, align 4, !tbaa !19
  %1783 = load ptr, ptr %20, align 8, !tbaa !5
  %1784 = load i64, ptr %30, align 8, !tbaa !9
  %1785 = getelementptr inbounds %struct.complex, ptr %1783, i64 %1784
  %1786 = getelementptr inbounds %struct.complex, ptr %1785, i32 0, i32 0
  %1787 = load float, ptr %1786, align 4, !tbaa !16
  %1788 = fmul float %1782, %1787
  %1789 = call float @llvm.fmuladd.f32(float %1775, float %1780, float %1788)
  %1790 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 1
  store float %1789, ptr %1790, align 4, !tbaa !19
  %1791 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 0
  %1792 = load float, ptr %1791, align 4, !tbaa !16
  %1793 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 0
  %1794 = load float, ptr %1793, align 4, !tbaa !16
  %1795 = fadd float %1792, %1794
  %1796 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  store float %1795, ptr %1796, align 4, !tbaa !16
  %1797 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 1
  %1798 = load float, ptr %1797, align 4, !tbaa !19
  %1799 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 1
  %1800 = load float, ptr %1799, align 4, !tbaa !19
  %1801 = fadd float %1798, %1800
  %1802 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  store float %1801, ptr %1802, align 4, !tbaa !19
  %1803 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %1804 = load float, ptr %1803, align 4, !tbaa !16
  %1805 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 0
  store float %1804, ptr %1805, align 4, !tbaa !16
  %1806 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %1807 = load float, ptr %1806, align 4, !tbaa !19
  %1808 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 1
  store float %1807, ptr %1808, align 4, !tbaa !19
  br label %1809

1809:                                             ; preds = %1714
  %1810 = load i64, ptr %39, align 8, !tbaa !9
  %1811 = add nsw i64 %1810, 1
  store i64 %1811, ptr %39, align 8, !tbaa !9
  br label %1710, !llvm.loop !27

1812:                                             ; preds = %1710
  br label %1813

1813:                                             ; preds = %1812, %1700
  br label %1814

1814:                                             ; preds = %1813, %1699
  br label %1815

1815:                                             ; preds = %1814, %1590
  %1816 = load float, ptr %51, align 4, !tbaa !11
  %1817 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  store float %1816, ptr %1817, align 4, !tbaa !16
  %1818 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  store float 0.000000e+00, ptr %1818, align 4, !tbaa !19
  %1819 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 0
  %1820 = load float, ptr %1819, align 4, !tbaa !16
  %1821 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %1822 = load float, ptr %1821, align 4, !tbaa !16
  %1823 = fcmp oeq float %1820, %1822
  br i1 %1823, label %1824, label %2082

1824:                                             ; preds = %1815
  %1825 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 1
  %1826 = load float, ptr %1825, align 4, !tbaa !19
  %1827 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %1828 = load float, ptr %1827, align 4, !tbaa !19
  %1829 = fcmp oeq float %1826, %1828
  br i1 %1829, label %1830, label %2082

1830:                                             ; preds = %1824
  %1831 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %1831, ptr %28, align 8, !tbaa !9
  %1832 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %1832, ptr %29, align 8, !tbaa !9
  %1833 = load ptr, ptr %20, align 8, !tbaa !5
  %1834 = load i64, ptr %29, align 8, !tbaa !9
  %1835 = getelementptr inbounds %struct.complex, ptr %1833, i64 %1834
  %1836 = getelementptr inbounds %struct.complex, ptr %1835, i32 0, i32 0
  %1837 = load float, ptr %1836, align 4, !tbaa !16
  %1838 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 0
  %1839 = load float, ptr %1838, align 4, !tbaa !16
  %1840 = fsub float %1837, %1839
  %1841 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  store float %1840, ptr %1841, align 4, !tbaa !16
  %1842 = load ptr, ptr %20, align 8, !tbaa !5
  %1843 = load i64, ptr %29, align 8, !tbaa !9
  %1844 = getelementptr inbounds %struct.complex, ptr %1842, i64 %1843
  %1845 = getelementptr inbounds %struct.complex, ptr %1844, i32 0, i32 1
  %1846 = load float, ptr %1845, align 4, !tbaa !19
  %1847 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 1
  %1848 = load float, ptr %1847, align 4, !tbaa !19
  %1849 = fsub float %1846, %1848
  %1850 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  store float %1849, ptr %1850, align 4, !tbaa !19
  %1851 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %1852 = load float, ptr %1851, align 4, !tbaa !16
  %1853 = load ptr, ptr %20, align 8, !tbaa !5
  %1854 = load i64, ptr %28, align 8, !tbaa !9
  %1855 = getelementptr inbounds %struct.complex, ptr %1853, i64 %1854
  %1856 = getelementptr inbounds %struct.complex, ptr %1855, i32 0, i32 0
  store float %1852, ptr %1856, align 4, !tbaa !16
  %1857 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %1858 = load float, ptr %1857, align 4, !tbaa !19
  %1859 = load ptr, ptr %20, align 8, !tbaa !5
  %1860 = load i64, ptr %28, align 8, !tbaa !9
  %1861 = getelementptr inbounds %struct.complex, ptr %1859, i64 %1860
  %1862 = getelementptr inbounds %struct.complex, ptr %1861, i32 0, i32 1
  store float %1858, ptr %1862, align 4, !tbaa !19
  %1863 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %1863, ptr %28, align 8, !tbaa !9
  %1864 = load ptr, ptr %20, align 8, !tbaa !5
  %1865 = load i64, ptr %28, align 8, !tbaa !9
  %1866 = getelementptr inbounds %struct.complex, ptr %1864, i64 %1865
  %1867 = getelementptr inbounds %struct.complex, ptr %1866, i32 0, i32 0
  %1868 = load float, ptr %1867, align 4, !tbaa !16
  store float %1868, ptr %31, align 4, !tbaa !11
  %1869 = load float, ptr %31, align 4, !tbaa !11
  %1870 = fcmp oge float %1869, 0.000000e+00
  br i1 %1870, label %1871, label %1873

1871:                                             ; preds = %1830
  %1872 = load float, ptr %31, align 4, !tbaa !11
  br label %1876

1873:                                             ; preds = %1830
  %1874 = load float, ptr %31, align 4, !tbaa !11
  %1875 = fneg float %1874
  br label %1876

1876:                                             ; preds = %1873, %1871
  %1877 = phi float [ %1872, %1871 ], [ %1875, %1873 ]
  %1878 = fpext float %1877 to double
  %1879 = load ptr, ptr %20, align 8, !tbaa !5
  %1880 = load i64, ptr %40, align 8, !tbaa !9
  %1881 = getelementptr inbounds %struct.complex, ptr %1879, i64 %1880
  %1882 = call double @r_imag(ptr noundef %1881)
  %1883 = fptrunc double %1882 to float
  store float %1883, ptr %32, align 4, !tbaa !11
  %1884 = load float, ptr %32, align 4, !tbaa !11
  %1885 = fcmp oge float %1884, 0.000000e+00
  br i1 %1885, label %1886, label %1888

1886:                                             ; preds = %1876
  %1887 = load float, ptr %32, align 4, !tbaa !11
  br label %1891

1888:                                             ; preds = %1876
  %1889 = load float, ptr %32, align 4, !tbaa !11
  %1890 = fneg float %1889
  br label %1891

1891:                                             ; preds = %1888, %1886
  %1892 = phi float [ %1887, %1886 ], [ %1890, %1888 ]
  %1893 = fpext float %1892 to double
  %1894 = fadd double %1878, %1893
  %1895 = fptrunc double %1894 to float
  store float %1895, ptr %41, align 4, !tbaa !11
  %1896 = load i64, ptr %60, align 8, !tbaa !9
  %1897 = icmp ne i64 %1896, 0
  br i1 %1897, label %1898, label %1926

1898:                                             ; preds = %1891
  %1899 = load i64, ptr %40, align 8, !tbaa !9
  %1900 = load i64, ptr %40, align 8, !tbaa !9
  %1901 = load i64, ptr %24, align 8, !tbaa !9
  %1902 = mul nsw i64 %1900, %1901
  %1903 = add nsw i64 %1899, %1902
  store i64 %1903, ptr %28, align 8, !tbaa !9
  %1904 = load float, ptr %51, align 4, !tbaa !11
  %1905 = load ptr, ptr %18, align 8, !tbaa !5
  %1906 = load i64, ptr %28, align 8, !tbaa !9
  %1907 = getelementptr inbounds %struct.complex, ptr %1905, i64 %1906
  %1908 = getelementptr inbounds %struct.complex, ptr %1907, i32 0, i32 0
  %1909 = load float, ptr %1908, align 4, !tbaa !16
  %1910 = fmul float %1904, %1909
  %1911 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  store float %1910, ptr %1911, align 4, !tbaa !16
  %1912 = load float, ptr %51, align 4, !tbaa !11
  %1913 = load ptr, ptr %18, align 8, !tbaa !5
  %1914 = load i64, ptr %28, align 8, !tbaa !9
  %1915 = getelementptr inbounds %struct.complex, ptr %1913, i64 %1914
  %1916 = getelementptr inbounds %struct.complex, ptr %1915, i32 0, i32 1
  %1917 = load float, ptr %1916, align 4, !tbaa !19
  %1918 = fmul float %1912, %1917
  %1919 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  store float %1918, ptr %1919, align 4, !tbaa !19
  %1920 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %1921 = load float, ptr %1920, align 4, !tbaa !16
  %1922 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 0
  store float %1921, ptr %1922, align 4, !tbaa !16
  %1923 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %1924 = load float, ptr %1923, align 4, !tbaa !19
  %1925 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 1
  store float %1924, ptr %1925, align 4, !tbaa !19
  br label %1934

1926:                                             ; preds = %1891
  %1927 = load float, ptr %51, align 4, !tbaa !11
  %1928 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 0
  store float %1927, ptr %1928, align 4, !tbaa !16
  %1929 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 1
  store float 0.000000e+00, ptr %1929, align 4, !tbaa !19
  %1930 = load float, ptr %51, align 4, !tbaa !11
  %1931 = fcmp oeq float %1930, 1.000000e+00
  br i1 %1931, label %1932, label %1933

1932:                                             ; preds = %1926
  br label %2081

1933:                                             ; preds = %1926
  br label %1934

1934:                                             ; preds = %1933, %1898
  %1935 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 0
  %1936 = load float, ptr %1935, align 4, !tbaa !16
  store float %1936, ptr %31, align 4, !tbaa !11
  %1937 = load float, ptr %31, align 4, !tbaa !11
  %1938 = fcmp oge float %1937, 0.000000e+00
  br i1 %1938, label %1939, label %1941

1939:                                             ; preds = %1934
  %1940 = load float, ptr %31, align 4, !tbaa !11
  br label %1944

1941:                                             ; preds = %1934
  %1942 = load float, ptr %31, align 4, !tbaa !11
  %1943 = fneg float %1942
  br label %1944

1944:                                             ; preds = %1941, %1939
  %1945 = phi float [ %1940, %1939 ], [ %1943, %1941 ]
  %1946 = fpext float %1945 to double
  %1947 = call double @r_imag(ptr noundef %48)
  %1948 = fptrunc double %1947 to float
  store float %1948, ptr %32, align 4, !tbaa !11
  %1949 = load float, ptr %32, align 4, !tbaa !11
  %1950 = fcmp oge float %1949, 0.000000e+00
  br i1 %1950, label %1951, label %1953

1951:                                             ; preds = %1944
  %1952 = load float, ptr %32, align 4, !tbaa !11
  br label %1956

1953:                                             ; preds = %1944
  %1954 = load float, ptr %32, align 4, !tbaa !11
  %1955 = fneg float %1954
  br label %1956

1956:                                             ; preds = %1953, %1951
  %1957 = phi float [ %1952, %1951 ], [ %1955, %1953 ]
  %1958 = fpext float %1957 to double
  %1959 = fadd double %1946, %1958
  %1960 = fptrunc double %1959 to float
  store float %1960, ptr %43, align 4, !tbaa !11
  %1961 = load float, ptr %43, align 4, !tbaa !11
  %1962 = load float, ptr %59, align 4, !tbaa !11
  %1963 = fcmp ogt float %1961, %1962
  br i1 %1963, label %1964, label %2005

1964:                                             ; preds = %1956
  %1965 = load float, ptr %43, align 4, !tbaa !11
  %1966 = fcmp olt float %1965, 1.000000e+00
  br i1 %1966, label %1967, label %1988

1967:                                             ; preds = %1964
  %1968 = load float, ptr %41, align 4, !tbaa !11
  %1969 = load float, ptr %43, align 4, !tbaa !11
  %1970 = load float, ptr %56, align 4, !tbaa !11
  %1971 = fmul float %1969, %1970
  %1972 = fcmp ogt float %1968, %1971
  br i1 %1972, label %1973, label %1987

1973:                                             ; preds = %1967
  %1974 = load float, ptr %41, align 4, !tbaa !11
  %1975 = fdiv float 1.000000e+00, %1974
  store float %1975, ptr %42, align 4, !tbaa !11
  %1976 = load ptr, ptr %17, align 8, !tbaa !5
  %1977 = load ptr, ptr %20, align 8, !tbaa !5
  %1978 = getelementptr inbounds %struct.complex, ptr %1977, i64 1
  %1979 = call i32 @f2c_csscal(ptr noundef %1976, ptr noundef %42, ptr noundef %1978, ptr noundef @c__1)
  %1980 = load float, ptr %42, align 4, !tbaa !11
  %1981 = load ptr, ptr %21, align 8, !tbaa !5
  %1982 = load float, ptr %1981, align 4, !tbaa !11
  %1983 = fmul float %1982, %1980
  store float %1983, ptr %1981, align 4, !tbaa !11
  %1984 = load float, ptr %42, align 4, !tbaa !11
  %1985 = load float, ptr %49, align 4, !tbaa !11
  %1986 = fmul float %1985, %1984
  store float %1986, ptr %49, align 4, !tbaa !11
  br label %1987

1987:                                             ; preds = %1973, %1967
  br label %1988

1988:                                             ; preds = %1987, %1964
  %1989 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %1989, ptr %28, align 8, !tbaa !9
  %1990 = load ptr, ptr %20, align 8, !tbaa !5
  %1991 = load i64, ptr %40, align 8, !tbaa !9
  %1992 = getelementptr inbounds %struct.complex, ptr %1990, i64 %1991
  call void @cladiv_(ptr noundef %35, ptr noundef %1992, ptr noundef %48)
  %1993 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %1994 = load float, ptr %1993, align 4, !tbaa !16
  %1995 = load ptr, ptr %20, align 8, !tbaa !5
  %1996 = load i64, ptr %28, align 8, !tbaa !9
  %1997 = getelementptr inbounds %struct.complex, ptr %1995, i64 %1996
  %1998 = getelementptr inbounds %struct.complex, ptr %1997, i32 0, i32 0
  store float %1994, ptr %1998, align 4, !tbaa !16
  %1999 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %2000 = load float, ptr %1999, align 4, !tbaa !19
  %2001 = load ptr, ptr %20, align 8, !tbaa !5
  %2002 = load i64, ptr %28, align 8, !tbaa !9
  %2003 = getelementptr inbounds %struct.complex, ptr %2001, i64 %2002
  %2004 = getelementptr inbounds %struct.complex, ptr %2003, i32 0, i32 1
  store float %2000, ptr %2004, align 4, !tbaa !19
  br label %2080

2005:                                             ; preds = %1956
  %2006 = load float, ptr %43, align 4, !tbaa !11
  %2007 = fcmp ogt float %2006, 0.000000e+00
  br i1 %2007, label %2008, label %2048

2008:                                             ; preds = %2005
  %2009 = load float, ptr %41, align 4, !tbaa !11
  %2010 = load float, ptr %43, align 4, !tbaa !11
  %2011 = load float, ptr %56, align 4, !tbaa !11
  %2012 = fmul float %2010, %2011
  %2013 = fcmp ogt float %2009, %2012
  br i1 %2013, label %2014, label %2031

2014:                                             ; preds = %2008
  %2015 = load float, ptr %43, align 4, !tbaa !11
  %2016 = load float, ptr %56, align 4, !tbaa !11
  %2017 = fmul float %2015, %2016
  %2018 = load float, ptr %41, align 4, !tbaa !11
  %2019 = fdiv float %2017, %2018
  store float %2019, ptr %42, align 4, !tbaa !11
  %2020 = load ptr, ptr %17, align 8, !tbaa !5
  %2021 = load ptr, ptr %20, align 8, !tbaa !5
  %2022 = getelementptr inbounds %struct.complex, ptr %2021, i64 1
  %2023 = call i32 @f2c_csscal(ptr noundef %2020, ptr noundef %42, ptr noundef %2022, ptr noundef @c__1)
  %2024 = load float, ptr %42, align 4, !tbaa !11
  %2025 = load ptr, ptr %21, align 8, !tbaa !5
  %2026 = load float, ptr %2025, align 4, !tbaa !11
  %2027 = fmul float %2026, %2024
  store float %2027, ptr %2025, align 4, !tbaa !11
  %2028 = load float, ptr %42, align 4, !tbaa !11
  %2029 = load float, ptr %49, align 4, !tbaa !11
  %2030 = fmul float %2029, %2028
  store float %2030, ptr %49, align 4, !tbaa !11
  br label %2031

2031:                                             ; preds = %2014, %2008
  %2032 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %2032, ptr %28, align 8, !tbaa !9
  %2033 = load ptr, ptr %20, align 8, !tbaa !5
  %2034 = load i64, ptr %40, align 8, !tbaa !9
  %2035 = getelementptr inbounds %struct.complex, ptr %2033, i64 %2034
  call void @cladiv_(ptr noundef %35, ptr noundef %2035, ptr noundef %48)
  %2036 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %2037 = load float, ptr %2036, align 4, !tbaa !16
  %2038 = load ptr, ptr %20, align 8, !tbaa !5
  %2039 = load i64, ptr %28, align 8, !tbaa !9
  %2040 = getelementptr inbounds %struct.complex, ptr %2038, i64 %2039
  %2041 = getelementptr inbounds %struct.complex, ptr %2040, i32 0, i32 0
  store float %2037, ptr %2041, align 4, !tbaa !16
  %2042 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %2043 = load float, ptr %2042, align 4, !tbaa !19
  %2044 = load ptr, ptr %20, align 8, !tbaa !5
  %2045 = load i64, ptr %28, align 8, !tbaa !9
  %2046 = getelementptr inbounds %struct.complex, ptr %2044, i64 %2045
  %2047 = getelementptr inbounds %struct.complex, ptr %2046, i32 0, i32 1
  store float %2043, ptr %2047, align 4, !tbaa !19
  br label %2079

2048:                                             ; preds = %2005
  %2049 = load ptr, ptr %17, align 8, !tbaa !5
  %2050 = load i64, ptr %2049, align 8, !tbaa !9
  store i64 %2050, ptr %28, align 8, !tbaa !9
  store i64 1, ptr %39, align 8, !tbaa !9
  br label %2051

2051:                                             ; preds = %2065, %2048
  %2052 = load i64, ptr %39, align 8, !tbaa !9
  %2053 = load i64, ptr %28, align 8, !tbaa !9
  %2054 = icmp sle i64 %2052, %2053
  br i1 %2054, label %2055, label %2068

2055:                                             ; preds = %2051
  %2056 = load i64, ptr %39, align 8, !tbaa !9
  store i64 %2056, ptr %29, align 8, !tbaa !9
  %2057 = load ptr, ptr %20, align 8, !tbaa !5
  %2058 = load i64, ptr %29, align 8, !tbaa !9
  %2059 = getelementptr inbounds %struct.complex, ptr %2057, i64 %2058
  %2060 = getelementptr inbounds %struct.complex, ptr %2059, i32 0, i32 0
  store float 0.000000e+00, ptr %2060, align 4, !tbaa !16
  %2061 = load ptr, ptr %20, align 8, !tbaa !5
  %2062 = load i64, ptr %29, align 8, !tbaa !9
  %2063 = getelementptr inbounds %struct.complex, ptr %2061, i64 %2062
  %2064 = getelementptr inbounds %struct.complex, ptr %2063, i32 0, i32 1
  store float 0.000000e+00, ptr %2064, align 4, !tbaa !19
  br label %2065

2065:                                             ; preds = %2055
  %2066 = load i64, ptr %39, align 8, !tbaa !9
  %2067 = add nsw i64 %2066, 1
  store i64 %2067, ptr %39, align 8, !tbaa !9
  br label %2051, !llvm.loop !28

2068:                                             ; preds = %2051
  %2069 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %2069, ptr %28, align 8, !tbaa !9
  %2070 = load ptr, ptr %20, align 8, !tbaa !5
  %2071 = load i64, ptr %28, align 8, !tbaa !9
  %2072 = getelementptr inbounds %struct.complex, ptr %2070, i64 %2071
  %2073 = getelementptr inbounds %struct.complex, ptr %2072, i32 0, i32 0
  store float 1.000000e+00, ptr %2073, align 4, !tbaa !16
  %2074 = load ptr, ptr %20, align 8, !tbaa !5
  %2075 = load i64, ptr %28, align 8, !tbaa !9
  %2076 = getelementptr inbounds %struct.complex, ptr %2074, i64 %2075
  %2077 = getelementptr inbounds %struct.complex, ptr %2076, i32 0, i32 1
  store float 0.000000e+00, ptr %2077, align 4, !tbaa !19
  %2078 = load ptr, ptr %21, align 8, !tbaa !5
  store float 0.000000e+00, ptr %2078, align 4, !tbaa !11
  store float 0.000000e+00, ptr %49, align 4, !tbaa !11
  br label %2079

2079:                                             ; preds = %2068, %2031
  br label %2080

2080:                                             ; preds = %2079, %1988
  br label %2081

2081:                                             ; preds = %2080, %1932
  br label %2111

2082:                                             ; preds = %1824, %1815
  %2083 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %2083, ptr %28, align 8, !tbaa !9
  %2084 = load ptr, ptr %20, align 8, !tbaa !5
  %2085 = load i64, ptr %40, align 8, !tbaa !9
  %2086 = getelementptr inbounds %struct.complex, ptr %2084, i64 %2085
  call void @cladiv_(ptr noundef %36, ptr noundef %2086, ptr noundef %48)
  %2087 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 0
  %2088 = load float, ptr %2087, align 4, !tbaa !16
  %2089 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 0
  %2090 = load float, ptr %2089, align 4, !tbaa !16
  %2091 = fsub float %2088, %2090
  %2092 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  store float %2091, ptr %2092, align 4, !tbaa !16
  %2093 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 1
  %2094 = load float, ptr %2093, align 4, !tbaa !19
  %2095 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 1
  %2096 = load float, ptr %2095, align 4, !tbaa !19
  %2097 = fsub float %2094, %2096
  %2098 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  store float %2097, ptr %2098, align 4, !tbaa !19
  %2099 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %2100 = load float, ptr %2099, align 4, !tbaa !16
  %2101 = load ptr, ptr %20, align 8, !tbaa !5
  %2102 = load i64, ptr %28, align 8, !tbaa !9
  %2103 = getelementptr inbounds %struct.complex, ptr %2101, i64 %2102
  %2104 = getelementptr inbounds %struct.complex, ptr %2103, i32 0, i32 0
  store float %2100, ptr %2104, align 4, !tbaa !16
  %2105 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %2106 = load float, ptr %2105, align 4, !tbaa !19
  %2107 = load ptr, ptr %20, align 8, !tbaa !5
  %2108 = load i64, ptr %28, align 8, !tbaa !9
  %2109 = getelementptr inbounds %struct.complex, ptr %2107, i64 %2108
  %2110 = getelementptr inbounds %struct.complex, ptr %2109, i32 0, i32 1
  store float %2106, ptr %2110, align 4, !tbaa !19
  br label %2111

2111:                                             ; preds = %2082, %2081
  %2112 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %2112, ptr %28, align 8, !tbaa !9
  %2113 = load float, ptr %49, align 4, !tbaa !11
  store float %2113, ptr %33, align 4, !tbaa !11
  %2114 = load ptr, ptr %20, align 8, !tbaa !5
  %2115 = load i64, ptr %28, align 8, !tbaa !9
  %2116 = getelementptr inbounds %struct.complex, ptr %2114, i64 %2115
  %2117 = getelementptr inbounds %struct.complex, ptr %2116, i32 0, i32 0
  %2118 = load float, ptr %2117, align 4, !tbaa !16
  store float %2118, ptr %31, align 4, !tbaa !11
  %2119 = load float, ptr %31, align 4, !tbaa !11
  %2120 = fcmp oge float %2119, 0.000000e+00
  br i1 %2120, label %2121, label %2123

2121:                                             ; preds = %2111
  %2122 = load float, ptr %31, align 4, !tbaa !11
  br label %2126

2123:                                             ; preds = %2111
  %2124 = load float, ptr %31, align 4, !tbaa !11
  %2125 = fneg float %2124
  br label %2126

2126:                                             ; preds = %2123, %2121
  %2127 = phi float [ %2122, %2121 ], [ %2125, %2123 ]
  %2128 = fpext float %2127 to double
  %2129 = load ptr, ptr %20, align 8, !tbaa !5
  %2130 = load i64, ptr %40, align 8, !tbaa !9
  %2131 = getelementptr inbounds %struct.complex, ptr %2129, i64 %2130
  %2132 = call double @r_imag(ptr noundef %2131)
  %2133 = fptrunc double %2132 to float
  store float %2133, ptr %32, align 4, !tbaa !11
  %2134 = load float, ptr %32, align 4, !tbaa !11
  %2135 = fcmp oge float %2134, 0.000000e+00
  br i1 %2135, label %2136, label %2138

2136:                                             ; preds = %2126
  %2137 = load float, ptr %32, align 4, !tbaa !11
  br label %2141

2138:                                             ; preds = %2126
  %2139 = load float, ptr %32, align 4, !tbaa !11
  %2140 = fneg float %2139
  br label %2141

2141:                                             ; preds = %2138, %2136
  %2142 = phi float [ %2137, %2136 ], [ %2140, %2138 ]
  %2143 = fpext float %2142 to double
  %2144 = fadd double %2128, %2143
  %2145 = fptrunc double %2144 to float
  store float %2145, ptr %34, align 4, !tbaa !11
  %2146 = load float, ptr %33, align 4, !tbaa !11
  %2147 = load float, ptr %34, align 4, !tbaa !11
  %2148 = fcmp oge float %2146, %2147
  br i1 %2148, label %2149, label %2151

2149:                                             ; preds = %2141
  %2150 = load float, ptr %33, align 4, !tbaa !11
  br label %2153

2151:                                             ; preds = %2141
  %2152 = load float, ptr %34, align 4, !tbaa !11
  br label %2153

2153:                                             ; preds = %2151, %2149
  %2154 = phi float [ %2150, %2149 ], [ %2152, %2151 ]
  %2155 = fpext float %2154 to double
  %2156 = fptrunc double %2155 to float
  store float %2156, ptr %49, align 4, !tbaa !11
  br label %2157

2157:                                             ; preds = %2153
  %2158 = load i64, ptr %26, align 8, !tbaa !9
  %2159 = load i64, ptr %40, align 8, !tbaa !9
  %2160 = add nsw i64 %2159, %2158
  store i64 %2160, ptr %40, align 8, !tbaa !9
  br label %1355, !llvm.loop !29

2161:                                             ; preds = %1368
  br label %2945

2162:                                             ; preds = %1347
  %2163 = load i64, ptr %53, align 8, !tbaa !9
  store i64 %2163, ptr %26, align 8, !tbaa !9
  %2164 = load i64, ptr %44, align 8, !tbaa !9
  store i64 %2164, ptr %27, align 8, !tbaa !9
  %2165 = load i64, ptr %58, align 8, !tbaa !9
  store i64 %2165, ptr %40, align 8, !tbaa !9
  br label %2166

2166:                                             ; preds = %2940, %2162
  %2167 = load i64, ptr %27, align 8, !tbaa !9
  %2168 = icmp slt i64 %2167, 0
  br i1 %2168, label %2169, label %2174

2169:                                             ; preds = %2166
  %2170 = load i64, ptr %40, align 8, !tbaa !9
  %2171 = load i64, ptr %26, align 8, !tbaa !9
  %2172 = icmp sge i64 %2170, %2171
  %2173 = zext i1 %2172 to i32
  br label %2179

2174:                                             ; preds = %2166
  %2175 = load i64, ptr %40, align 8, !tbaa !9
  %2176 = load i64, ptr %26, align 8, !tbaa !9
  %2177 = icmp sle i64 %2175, %2176
  %2178 = zext i1 %2177 to i32
  br label %2179

2179:                                             ; preds = %2174, %2169
  %2180 = phi i32 [ %2173, %2169 ], [ %2178, %2174 ]
  %2181 = icmp ne i32 %2180, 0
  br i1 %2181, label %2182, label %2944

2182:                                             ; preds = %2179
  %2183 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %2183, ptr %28, align 8, !tbaa !9
  %2184 = load ptr, ptr %20, align 8, !tbaa !5
  %2185 = load i64, ptr %28, align 8, !tbaa !9
  %2186 = getelementptr inbounds %struct.complex, ptr %2184, i64 %2185
  %2187 = getelementptr inbounds %struct.complex, ptr %2186, i32 0, i32 0
  %2188 = load float, ptr %2187, align 4, !tbaa !16
  store float %2188, ptr %31, align 4, !tbaa !11
  %2189 = load float, ptr %31, align 4, !tbaa !11
  %2190 = fcmp oge float %2189, 0.000000e+00
  br i1 %2190, label %2191, label %2193

2191:                                             ; preds = %2182
  %2192 = load float, ptr %31, align 4, !tbaa !11
  br label %2196

2193:                                             ; preds = %2182
  %2194 = load float, ptr %31, align 4, !tbaa !11
  %2195 = fneg float %2194
  br label %2196

2196:                                             ; preds = %2193, %2191
  %2197 = phi float [ %2192, %2191 ], [ %2195, %2193 ]
  %2198 = fpext float %2197 to double
  %2199 = load ptr, ptr %20, align 8, !tbaa !5
  %2200 = load i64, ptr %40, align 8, !tbaa !9
  %2201 = getelementptr inbounds %struct.complex, ptr %2199, i64 %2200
  %2202 = call double @r_imag(ptr noundef %2201)
  %2203 = fptrunc double %2202 to float
  store float %2203, ptr %32, align 4, !tbaa !11
  %2204 = load float, ptr %32, align 4, !tbaa !11
  %2205 = fcmp oge float %2204, 0.000000e+00
  br i1 %2205, label %2206, label %2208

2206:                                             ; preds = %2196
  %2207 = load float, ptr %32, align 4, !tbaa !11
  br label %2211

2208:                                             ; preds = %2196
  %2209 = load float, ptr %32, align 4, !tbaa !11
  %2210 = fneg float %2209
  br label %2211

2211:                                             ; preds = %2208, %2206
  %2212 = phi float [ %2207, %2206 ], [ %2210, %2208 ]
  %2213 = fpext float %2212 to double
  %2214 = fadd double %2198, %2213
  %2215 = fptrunc double %2214 to float
  store float %2215, ptr %41, align 4, !tbaa !11
  %2216 = load float, ptr %51, align 4, !tbaa !11
  %2217 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 0
  store float %2216, ptr %2217, align 4, !tbaa !16
  %2218 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 1
  store float 0.000000e+00, ptr %2218, align 4, !tbaa !19
  %2219 = load float, ptr %49, align 4, !tbaa !11
  %2220 = fcmp oge float %2219, 1.000000e+00
  br i1 %2220, label %2221, label %2223

2221:                                             ; preds = %2211
  %2222 = load float, ptr %49, align 4, !tbaa !11
  br label %2224

2223:                                             ; preds = %2211
  br label %2224

2224:                                             ; preds = %2223, %2221
  %2225 = phi float [ %2222, %2221 ], [ 1.000000e+00, %2223 ]
  %2226 = fpext float %2225 to double
  %2227 = fdiv double 1.000000e+00, %2226
  %2228 = fptrunc double %2227 to float
  store float %2228, ptr %42, align 4, !tbaa !11
  %2229 = load ptr, ptr %22, align 8, !tbaa !5
  %2230 = load i64, ptr %40, align 8, !tbaa !9
  %2231 = getelementptr inbounds float, ptr %2229, i64 %2230
  %2232 = load float, ptr %2231, align 4, !tbaa !11
  %2233 = load float, ptr %56, align 4, !tbaa !11
  %2234 = load float, ptr %41, align 4, !tbaa !11
  %2235 = fsub float %2233, %2234
  %2236 = load float, ptr %42, align 4, !tbaa !11
  %2237 = fmul float %2235, %2236
  %2238 = fcmp ogt float %2232, %2237
  br i1 %2238, label %2239, label %2338

2239:                                             ; preds = %2224
  %2240 = load float, ptr %42, align 4, !tbaa !11
  %2241 = fmul float %2240, 5.000000e-01
  store float %2241, ptr %42, align 4, !tbaa !11
  %2242 = load i64, ptr %60, align 8, !tbaa !9
  %2243 = icmp ne i64 %2242, 0
  br i1 %2243, label %2244, label %2268

2244:                                             ; preds = %2239
  %2245 = load ptr, ptr %18, align 8, !tbaa !5
  %2246 = load i64, ptr %40, align 8, !tbaa !9
  %2247 = load i64, ptr %40, align 8, !tbaa !9
  %2248 = load i64, ptr %24, align 8, !tbaa !9
  %2249 = mul nsw i64 %2247, %2248
  %2250 = add nsw i64 %2246, %2249
  %2251 = getelementptr inbounds %struct.complex, ptr %2245, i64 %2250
  call void @r_cnjg(ptr noundef %36, ptr noundef %2251)
  %2252 = load float, ptr %51, align 4, !tbaa !11
  %2253 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 0
  %2254 = load float, ptr %2253, align 4, !tbaa !16
  %2255 = fmul float %2252, %2254
  %2256 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  store float %2255, ptr %2256, align 4, !tbaa !16
  %2257 = load float, ptr %51, align 4, !tbaa !11
  %2258 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 1
  %2259 = load float, ptr %2258, align 4, !tbaa !19
  %2260 = fmul float %2257, %2259
  %2261 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  store float %2260, ptr %2261, align 4, !tbaa !19
  %2262 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %2263 = load float, ptr %2262, align 4, !tbaa !16
  %2264 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 0
  store float %2263, ptr %2264, align 4, !tbaa !16
  %2265 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %2266 = load float, ptr %2265, align 4, !tbaa !19
  %2267 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 1
  store float %2266, ptr %2267, align 4, !tbaa !19
  br label %2272

2268:                                             ; preds = %2239
  %2269 = load float, ptr %51, align 4, !tbaa !11
  %2270 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 0
  store float %2269, ptr %2270, align 4, !tbaa !16
  %2271 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 1
  store float 0.000000e+00, ptr %2271, align 4, !tbaa !19
  br label %2272

2272:                                             ; preds = %2268, %2244
  %2273 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 0
  %2274 = load float, ptr %2273, align 4, !tbaa !16
  store float %2274, ptr %31, align 4, !tbaa !11
  %2275 = load float, ptr %31, align 4, !tbaa !11
  %2276 = fcmp oge float %2275, 0.000000e+00
  br i1 %2276, label %2277, label %2279

2277:                                             ; preds = %2272
  %2278 = load float, ptr %31, align 4, !tbaa !11
  br label %2282

2279:                                             ; preds = %2272
  %2280 = load float, ptr %31, align 4, !tbaa !11
  %2281 = fneg float %2280
  br label %2282

2282:                                             ; preds = %2279, %2277
  %2283 = phi float [ %2278, %2277 ], [ %2281, %2279 ]
  %2284 = fpext float %2283 to double
  %2285 = call double @r_imag(ptr noundef %48)
  %2286 = fptrunc double %2285 to float
  store float %2286, ptr %32, align 4, !tbaa !11
  %2287 = load float, ptr %32, align 4, !tbaa !11
  %2288 = fcmp oge float %2287, 0.000000e+00
  br i1 %2288, label %2289, label %2291

2289:                                             ; preds = %2282
  %2290 = load float, ptr %32, align 4, !tbaa !11
  br label %2294

2291:                                             ; preds = %2282
  %2292 = load float, ptr %32, align 4, !tbaa !11
  %2293 = fneg float %2292
  br label %2294

2294:                                             ; preds = %2291, %2289
  %2295 = phi float [ %2290, %2289 ], [ %2293, %2291 ]
  %2296 = fpext float %2295 to double
  %2297 = fadd double %2284, %2296
  %2298 = fptrunc double %2297 to float
  store float %2298, ptr %43, align 4, !tbaa !11
  %2299 = load float, ptr %43, align 4, !tbaa !11
  %2300 = fcmp ogt float %2299, 1.000000e+00
  br i1 %2300, label %2301, label %2322

2301:                                             ; preds = %2294
  store float 1.000000e+00, ptr %31, align 4, !tbaa !11
  %2302 = load float, ptr %42, align 4, !tbaa !11
  %2303 = load float, ptr %43, align 4, !tbaa !11
  %2304 = fmul float %2302, %2303
  store float %2304, ptr %32, align 4, !tbaa !11
  %2305 = load float, ptr %31, align 4, !tbaa !11
  %2306 = load float, ptr %32, align 4, !tbaa !11
  %2307 = fcmp ole float %2305, %2306
  br i1 %2307, label %2308, label %2310

2308:                                             ; preds = %2301
  %2309 = load float, ptr %31, align 4, !tbaa !11
  br label %2312

2310:                                             ; preds = %2301
  %2311 = load float, ptr %32, align 4, !tbaa !11
  br label %2312

2312:                                             ; preds = %2310, %2308
  %2313 = phi float [ %2309, %2308 ], [ %2311, %2310 ]
  %2314 = fpext float %2313 to double
  %2315 = fptrunc double %2314 to float
  store float %2315, ptr %42, align 4, !tbaa !11
  call void @cladiv_(ptr noundef %35, ptr noundef %52, ptr noundef %48)
  %2316 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %2317 = load float, ptr %2316, align 4, !tbaa !16
  %2318 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 0
  store float %2317, ptr %2318, align 4, !tbaa !16
  %2319 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %2320 = load float, ptr %2319, align 4, !tbaa !19
  %2321 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 1
  store float %2320, ptr %2321, align 4, !tbaa !19
  br label %2322

2322:                                             ; preds = %2312, %2294
  %2323 = load float, ptr %42, align 4, !tbaa !11
  %2324 = fcmp olt float %2323, 1.000000e+00
  br i1 %2324, label %2325, label %2337

2325:                                             ; preds = %2322
  %2326 = load ptr, ptr %17, align 8, !tbaa !5
  %2327 = load ptr, ptr %20, align 8, !tbaa !5
  %2328 = getelementptr inbounds %struct.complex, ptr %2327, i64 1
  %2329 = call i32 @f2c_csscal(ptr noundef %2326, ptr noundef %42, ptr noundef %2328, ptr noundef @c__1)
  %2330 = load float, ptr %42, align 4, !tbaa !11
  %2331 = load ptr, ptr %21, align 8, !tbaa !5
  %2332 = load float, ptr %2331, align 4, !tbaa !11
  %2333 = fmul float %2332, %2330
  store float %2333, ptr %2331, align 4, !tbaa !11
  %2334 = load float, ptr %42, align 4, !tbaa !11
  %2335 = load float, ptr %49, align 4, !tbaa !11
  %2336 = fmul float %2335, %2334
  store float %2336, ptr %49, align 4, !tbaa !11
  br label %2337

2337:                                             ; preds = %2325, %2322
  br label %2338

2338:                                             ; preds = %2337, %2224
  %2339 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 0
  store float 0.000000e+00, ptr %2339, align 4, !tbaa !16
  %2340 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 1
  store float 0.000000e+00, ptr %2340, align 4, !tbaa !19
  %2341 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 0
  %2342 = load float, ptr %2341, align 4, !tbaa !16
  %2343 = fcmp oeq float %2342, 1.000000e+00
  br i1 %2343, label %2344, label %2398

2344:                                             ; preds = %2338
  %2345 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 1
  %2346 = load float, ptr %2345, align 4, !tbaa !19
  %2347 = fcmp oeq float %2346, 0.000000e+00
  br i1 %2347, label %2348, label %2398

2348:                                             ; preds = %2344
  %2349 = load i64, ptr %55, align 8, !tbaa !9
  %2350 = icmp ne i64 %2349, 0
  br i1 %2350, label %2351, label %2368

2351:                                             ; preds = %2348
  %2352 = load i64, ptr %40, align 8, !tbaa !9
  %2353 = sub nsw i64 %2352, 1
  store i64 %2353, ptr %28, align 8, !tbaa !9
  %2354 = load ptr, ptr %18, align 8, !tbaa !5
  %2355 = load i64, ptr %40, align 8, !tbaa !9
  %2356 = load i64, ptr %24, align 8, !tbaa !9
  %2357 = mul nsw i64 %2355, %2356
  %2358 = add nsw i64 %2357, 1
  %2359 = getelementptr inbounds %struct.complex, ptr %2354, i64 %2358
  %2360 = load ptr, ptr %20, align 8, !tbaa !5
  %2361 = getelementptr inbounds %struct.complex, ptr %2360, i64 1
  call void @f2c_cdotc(ptr noundef %35, ptr noundef %28, ptr noundef %2359, ptr noundef @c__1, ptr noundef %2361, ptr noundef @c__1)
  %2362 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %2363 = load float, ptr %2362, align 4, !tbaa !16
  %2364 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 0
  store float %2363, ptr %2364, align 4, !tbaa !16
  %2365 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %2366 = load float, ptr %2365, align 4, !tbaa !19
  %2367 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 1
  store float %2366, ptr %2367, align 4, !tbaa !19
  br label %2397

2368:                                             ; preds = %2348
  %2369 = load i64, ptr %40, align 8, !tbaa !9
  %2370 = load ptr, ptr %17, align 8, !tbaa !5
  %2371 = load i64, ptr %2370, align 8, !tbaa !9
  %2372 = icmp slt i64 %2369, %2371
  br i1 %2372, label %2373, label %2396

2373:                                             ; preds = %2368
  %2374 = load ptr, ptr %17, align 8, !tbaa !5
  %2375 = load i64, ptr %2374, align 8, !tbaa !9
  %2376 = load i64, ptr %40, align 8, !tbaa !9
  %2377 = sub nsw i64 %2375, %2376
  store i64 %2377, ptr %28, align 8, !tbaa !9
  %2378 = load ptr, ptr %18, align 8, !tbaa !5
  %2379 = load i64, ptr %40, align 8, !tbaa !9
  %2380 = add nsw i64 %2379, 1
  %2381 = load i64, ptr %40, align 8, !tbaa !9
  %2382 = load i64, ptr %24, align 8, !tbaa !9
  %2383 = mul nsw i64 %2381, %2382
  %2384 = add nsw i64 %2380, %2383
  %2385 = getelementptr inbounds %struct.complex, ptr %2378, i64 %2384
  %2386 = load ptr, ptr %20, align 8, !tbaa !5
  %2387 = load i64, ptr %40, align 8, !tbaa !9
  %2388 = add nsw i64 %2387, 1
  %2389 = getelementptr inbounds %struct.complex, ptr %2386, i64 %2388
  call void @f2c_cdotc(ptr noundef %35, ptr noundef %28, ptr noundef %2385, ptr noundef @c__1, ptr noundef %2389, ptr noundef @c__1)
  %2390 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %2391 = load float, ptr %2390, align 4, !tbaa !16
  %2392 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 0
  store float %2391, ptr %2392, align 4, !tbaa !16
  %2393 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %2394 = load float, ptr %2393, align 4, !tbaa !19
  %2395 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 1
  store float %2394, ptr %2395, align 4, !tbaa !19
  br label %2396

2396:                                             ; preds = %2373, %2368
  br label %2397

2397:                                             ; preds = %2396, %2351
  br label %2602

2398:                                             ; preds = %2344, %2338
  %2399 = load i64, ptr %55, align 8, !tbaa !9
  %2400 = icmp ne i64 %2399, 0
  br i1 %2400, label %2401, label %2497

2401:                                             ; preds = %2398
  %2402 = load i64, ptr %40, align 8, !tbaa !9
  %2403 = sub nsw i64 %2402, 1
  store i64 %2403, ptr %28, align 8, !tbaa !9
  store i64 1, ptr %39, align 8, !tbaa !9
  br label %2404

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

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

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

2496:                                             ; preds = %2404
  br label %2601

2497:                                             ; preds = %2398
  %2498 = load i64, ptr %40, align 8, !tbaa !9
  %2499 = load ptr, ptr %17, align 8, !tbaa !5
  %2500 = load i64, ptr %2499, align 8, !tbaa !9
  %2501 = icmp slt i64 %2498, %2500
  br i1 %2501, label %2502, label %2600

2502:                                             ; preds = %2497
  %2503 = load ptr, ptr %17, align 8, !tbaa !5
  %2504 = load i64, ptr %2503, align 8, !tbaa !9
  store i64 %2504, ptr %28, align 8, !tbaa !9
  %2505 = load i64, ptr %40, align 8, !tbaa !9
  %2506 = add nsw i64 %2505, 1
  store i64 %2506, ptr %39, align 8, !tbaa !9
  br label %2507

2507:                                             ; preds = %2596, %2502
  %2508 = load i64, ptr %39, align 8, !tbaa !9
  %2509 = load i64, ptr %28, align 8, !tbaa !9
  %2510 = icmp sle i64 %2508, %2509
  br i1 %2510, label %2511, label %2599

2511:                                             ; preds = %2507
  %2512 = load ptr, ptr %18, align 8, !tbaa !5
  %2513 = load i64, ptr %39, align 8, !tbaa !9
  %2514 = load i64, ptr %40, align 8, !tbaa !9
  %2515 = load i64, ptr %24, align 8, !tbaa !9
  %2516 = mul nsw i64 %2514, %2515
  %2517 = add nsw i64 %2513, %2516
  %2518 = getelementptr inbounds %struct.complex, ptr %2512, i64 %2517
  call void @r_cnjg(ptr noundef %38, ptr noundef %2518)
  %2519 = getelementptr inbounds %struct.complex, ptr %38, i32 0, i32 0
  %2520 = load float, ptr %2519, align 4, !tbaa !16
  %2521 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 0
  %2522 = load float, ptr %2521, align 4, !tbaa !16
  %2523 = getelementptr inbounds %struct.complex, ptr %38, i32 0, i32 1
  %2524 = load float, ptr %2523, align 4, !tbaa !19
  %2525 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 1
  %2526 = load float, ptr %2525, align 4, !tbaa !19
  %2527 = fmul float %2524, %2526
  %2528 = fneg float %2527
  %2529 = call float @llvm.fmuladd.f32(float %2520, float %2522, float %2528)
  %2530 = getelementptr inbounds %struct.complex, ptr %37, i32 0, i32 0
  store float %2529, ptr %2530, align 4, !tbaa !16
  %2531 = getelementptr inbounds %struct.complex, ptr %38, i32 0, i32 0
  %2532 = load float, ptr %2531, align 4, !tbaa !16
  %2533 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 1
  %2534 = load float, ptr %2533, align 4, !tbaa !19
  %2535 = getelementptr inbounds %struct.complex, ptr %38, i32 0, i32 1
  %2536 = load float, ptr %2535, align 4, !tbaa !19
  %2537 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 0
  %2538 = load float, ptr %2537, align 4, !tbaa !16
  %2539 = fmul float %2536, %2538
  %2540 = call float @llvm.fmuladd.f32(float %2532, float %2534, float %2539)
  %2541 = getelementptr inbounds %struct.complex, ptr %37, i32 0, i32 1
  store float %2540, ptr %2541, align 4, !tbaa !19
  %2542 = load i64, ptr %39, align 8, !tbaa !9
  store i64 %2542, ptr %29, align 8, !tbaa !9
  %2543 = getelementptr inbounds %struct.complex, ptr %37, i32 0, i32 0
  %2544 = load float, ptr %2543, align 4, !tbaa !16
  %2545 = load ptr, ptr %20, align 8, !tbaa !5
  %2546 = load i64, ptr %29, align 8, !tbaa !9
  %2547 = getelementptr inbounds %struct.complex, ptr %2545, i64 %2546
  %2548 = getelementptr inbounds %struct.complex, ptr %2547, i32 0, i32 0
  %2549 = load float, ptr %2548, align 4, !tbaa !16
  %2550 = getelementptr inbounds %struct.complex, ptr %37, i32 0, i32 1
  %2551 = load float, ptr %2550, align 4, !tbaa !19
  %2552 = load ptr, ptr %20, align 8, !tbaa !5
  %2553 = load i64, ptr %29, align 8, !tbaa !9
  %2554 = getelementptr inbounds %struct.complex, ptr %2552, i64 %2553
  %2555 = getelementptr inbounds %struct.complex, ptr %2554, i32 0, i32 1
  %2556 = load float, ptr %2555, align 4, !tbaa !19
  %2557 = fmul float %2551, %2556
  %2558 = fneg float %2557
  %2559 = call float @llvm.fmuladd.f32(float %2544, float %2549, float %2558)
  %2560 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 0
  store float %2559, ptr %2560, align 4, !tbaa !16
  %2561 = getelementptr inbounds %struct.complex, ptr %37, i32 0, i32 0
  %2562 = load float, ptr %2561, align 4, !tbaa !16
  %2563 = load ptr, ptr %20, align 8, !tbaa !5
  %2564 = load i64, ptr %29, align 8, !tbaa !9
  %2565 = getelementptr inbounds %struct.complex, ptr %2563, i64 %2564
  %2566 = getelementptr inbounds %struct.complex, ptr %2565, i32 0, i32 1
  %2567 = load float, ptr %2566, align 4, !tbaa !19
  %2568 = getelementptr inbounds %struct.complex, ptr %37, i32 0, i32 1
  %2569 = load float, ptr %2568, align 4, !tbaa !19
  %2570 = load ptr, ptr %20, align 8, !tbaa !5
  %2571 = load i64, ptr %29, align 8, !tbaa !9
  %2572 = getelementptr inbounds %struct.complex, ptr %2570, i64 %2571
  %2573 = getelementptr inbounds %struct.complex, ptr %2572, i32 0, i32 0
  %2574 = load float, ptr %2573, align 4, !tbaa !16
  %2575 = fmul float %2569, %2574
  %2576 = call float @llvm.fmuladd.f32(float %2562, float %2567, float %2575)
  %2577 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 1
  store float %2576, ptr %2577, align 4, !tbaa !19
  %2578 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 0
  %2579 = load float, ptr %2578, align 4, !tbaa !16
  %2580 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 0
  %2581 = load float, ptr %2580, align 4, !tbaa !16
  %2582 = fadd float %2579, %2581
  %2583 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  store float %2582, ptr %2583, align 4, !tbaa !16
  %2584 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 1
  %2585 = load float, ptr %2584, align 4, !tbaa !19
  %2586 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 1
  %2587 = load float, ptr %2586, align 4, !tbaa !19
  %2588 = fadd float %2585, %2587
  %2589 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  store float %2588, ptr %2589, align 4, !tbaa !19
  %2590 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %2591 = load float, ptr %2590, align 4, !tbaa !16
  %2592 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 0
  store float %2591, ptr %2592, align 4, !tbaa !16
  %2593 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %2594 = load float, ptr %2593, align 4, !tbaa !19
  %2595 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 1
  store float %2594, ptr %2595, align 4, !tbaa !19
  br label %2596

2596:                                             ; preds = %2511
  %2597 = load i64, ptr %39, align 8, !tbaa !9
  %2598 = add nsw i64 %2597, 1
  store i64 %2598, ptr %39, align 8, !tbaa !9
  br label %2507, !llvm.loop !31

2599:                                             ; preds = %2507
  br label %2600

2600:                                             ; preds = %2599, %2497
  br label %2601

2601:                                             ; preds = %2600, %2496
  br label %2602

2602:                                             ; preds = %2601, %2397
  %2603 = load float, ptr %51, align 4, !tbaa !11
  %2604 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  store float %2603, ptr %2604, align 4, !tbaa !16
  %2605 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  store float 0.000000e+00, ptr %2605, align 4, !tbaa !19
  %2606 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 0
  %2607 = load float, ptr %2606, align 4, !tbaa !16
  %2608 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %2609 = load float, ptr %2608, align 4, !tbaa !16
  %2610 = fcmp oeq float %2607, %2609
  br i1 %2610, label %2611, label %2865

2611:                                             ; preds = %2602
  %2612 = getelementptr inbounds %struct.complex, ptr %52, i32 0, i32 1
  %2613 = load float, ptr %2612, align 4, !tbaa !19
  %2614 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %2615 = load float, ptr %2614, align 4, !tbaa !19
  %2616 = fcmp oeq float %2613, %2615
  br i1 %2616, label %2617, label %2865

2617:                                             ; preds = %2611
  %2618 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %2618, ptr %28, align 8, !tbaa !9
  %2619 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %2619, ptr %29, align 8, !tbaa !9
  %2620 = load ptr, ptr %20, align 8, !tbaa !5
  %2621 = load i64, ptr %29, align 8, !tbaa !9
  %2622 = getelementptr inbounds %struct.complex, ptr %2620, i64 %2621
  %2623 = getelementptr inbounds %struct.complex, ptr %2622, i32 0, i32 0
  %2624 = load float, ptr %2623, align 4, !tbaa !16
  %2625 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 0
  %2626 = load float, ptr %2625, align 4, !tbaa !16
  %2627 = fsub float %2624, %2626
  %2628 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  store float %2627, ptr %2628, align 4, !tbaa !16
  %2629 = load ptr, ptr %20, align 8, !tbaa !5
  %2630 = load i64, ptr %29, align 8, !tbaa !9
  %2631 = getelementptr inbounds %struct.complex, ptr %2629, i64 %2630
  %2632 = getelementptr inbounds %struct.complex, ptr %2631, i32 0, i32 1
  %2633 = load float, ptr %2632, align 4, !tbaa !19
  %2634 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 1
  %2635 = load float, ptr %2634, align 4, !tbaa !19
  %2636 = fsub float %2633, %2635
  %2637 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  store float %2636, ptr %2637, align 4, !tbaa !19
  %2638 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %2639 = load float, ptr %2638, align 4, !tbaa !16
  %2640 = load ptr, ptr %20, align 8, !tbaa !5
  %2641 = load i64, ptr %28, align 8, !tbaa !9
  %2642 = getelementptr inbounds %struct.complex, ptr %2640, i64 %2641
  %2643 = getelementptr inbounds %struct.complex, ptr %2642, i32 0, i32 0
  store float %2639, ptr %2643, align 4, !tbaa !16
  %2644 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %2645 = load float, ptr %2644, align 4, !tbaa !19
  %2646 = load ptr, ptr %20, align 8, !tbaa !5
  %2647 = load i64, ptr %28, align 8, !tbaa !9
  %2648 = getelementptr inbounds %struct.complex, ptr %2646, i64 %2647
  %2649 = getelementptr inbounds %struct.complex, ptr %2648, i32 0, i32 1
  store float %2645, ptr %2649, align 4, !tbaa !19
  %2650 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %2650, ptr %28, align 8, !tbaa !9
  %2651 = load ptr, ptr %20, align 8, !tbaa !5
  %2652 = load i64, ptr %28, align 8, !tbaa !9
  %2653 = getelementptr inbounds %struct.complex, ptr %2651, i64 %2652
  %2654 = getelementptr inbounds %struct.complex, ptr %2653, i32 0, i32 0
  %2655 = load float, ptr %2654, align 4, !tbaa !16
  store float %2655, ptr %31, align 4, !tbaa !11
  %2656 = load float, ptr %31, align 4, !tbaa !11
  %2657 = fcmp oge float %2656, 0.000000e+00
  br i1 %2657, label %2658, label %2660

2658:                                             ; preds = %2617
  %2659 = load float, ptr %31, align 4, !tbaa !11
  br label %2663

2660:                                             ; preds = %2617
  %2661 = load float, ptr %31, align 4, !tbaa !11
  %2662 = fneg float %2661
  br label %2663

2663:                                             ; preds = %2660, %2658
  %2664 = phi float [ %2659, %2658 ], [ %2662, %2660 ]
  %2665 = fpext float %2664 to double
  %2666 = load ptr, ptr %20, align 8, !tbaa !5
  %2667 = load i64, ptr %40, align 8, !tbaa !9
  %2668 = getelementptr inbounds %struct.complex, ptr %2666, i64 %2667
  %2669 = call double @r_imag(ptr noundef %2668)
  %2670 = fptrunc double %2669 to float
  store float %2670, ptr %32, align 4, !tbaa !11
  %2671 = load float, ptr %32, align 4, !tbaa !11
  %2672 = fcmp oge float %2671, 0.000000e+00
  br i1 %2672, label %2673, label %2675

2673:                                             ; preds = %2663
  %2674 = load float, ptr %32, align 4, !tbaa !11
  br label %2678

2675:                                             ; preds = %2663
  %2676 = load float, ptr %32, align 4, !tbaa !11
  %2677 = fneg float %2676
  br label %2678

2678:                                             ; preds = %2675, %2673
  %2679 = phi float [ %2674, %2673 ], [ %2677, %2675 ]
  %2680 = fpext float %2679 to double
  %2681 = fadd double %2665, %2680
  %2682 = fptrunc double %2681 to float
  store float %2682, ptr %41, align 4, !tbaa !11
  %2683 = load i64, ptr %60, align 8, !tbaa !9
  %2684 = icmp ne i64 %2683, 0
  br i1 %2684, label %2685, label %2709

2685:                                             ; preds = %2678
  %2686 = load ptr, ptr %18, align 8, !tbaa !5
  %2687 = load i64, ptr %40, align 8, !tbaa !9
  %2688 = load i64, ptr %40, align 8, !tbaa !9
  %2689 = load i64, ptr %24, align 8, !tbaa !9
  %2690 = mul nsw i64 %2688, %2689
  %2691 = add nsw i64 %2687, %2690
  %2692 = getelementptr inbounds %struct.complex, ptr %2686, i64 %2691
  call void @r_cnjg(ptr noundef %36, ptr noundef %2692)
  %2693 = load float, ptr %51, align 4, !tbaa !11
  %2694 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 0
  %2695 = load float, ptr %2694, align 4, !tbaa !16
  %2696 = fmul float %2693, %2695
  %2697 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  store float %2696, ptr %2697, align 4, !tbaa !16
  %2698 = load float, ptr %51, align 4, !tbaa !11
  %2699 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 1
  %2700 = load float, ptr %2699, align 4, !tbaa !19
  %2701 = fmul float %2698, %2700
  %2702 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  store float %2701, ptr %2702, align 4, !tbaa !19
  %2703 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %2704 = load float, ptr %2703, align 4, !tbaa !16
  %2705 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 0
  store float %2704, ptr %2705, align 4, !tbaa !16
  %2706 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %2707 = load float, ptr %2706, align 4, !tbaa !19
  %2708 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 1
  store float %2707, ptr %2708, align 4, !tbaa !19
  br label %2717

2709:                                             ; preds = %2678
  %2710 = load float, ptr %51, align 4, !tbaa !11
  %2711 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 0
  store float %2710, ptr %2711, align 4, !tbaa !16
  %2712 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 1
  store float 0.000000e+00, ptr %2712, align 4, !tbaa !19
  %2713 = load float, ptr %51, align 4, !tbaa !11
  %2714 = fcmp oeq float %2713, 1.000000e+00
  br i1 %2714, label %2715, label %2716

2715:                                             ; preds = %2709
  br label %2864

2716:                                             ; preds = %2709
  br label %2717

2717:                                             ; preds = %2716, %2685
  %2718 = getelementptr inbounds %struct.complex, ptr %48, i32 0, i32 0
  %2719 = load float, ptr %2718, align 4, !tbaa !16
  store float %2719, ptr %31, align 4, !tbaa !11
  %2720 = load float, ptr %31, align 4, !tbaa !11
  %2721 = fcmp oge float %2720, 0.000000e+00
  br i1 %2721, label %2722, label %2724

2722:                                             ; preds = %2717
  %2723 = load float, ptr %31, align 4, !tbaa !11
  br label %2727

2724:                                             ; preds = %2717
  %2725 = load float, ptr %31, align 4, !tbaa !11
  %2726 = fneg float %2725
  br label %2727

2727:                                             ; preds = %2724, %2722
  %2728 = phi float [ %2723, %2722 ], [ %2726, %2724 ]
  %2729 = fpext float %2728 to double
  %2730 = call double @r_imag(ptr noundef %48)
  %2731 = fptrunc double %2730 to float
  store float %2731, ptr %32, align 4, !tbaa !11
  %2732 = load float, ptr %32, align 4, !tbaa !11
  %2733 = fcmp oge float %2732, 0.000000e+00
  br i1 %2733, label %2734, label %2736

2734:                                             ; preds = %2727
  %2735 = load float, ptr %32, align 4, !tbaa !11
  br label %2739

2736:                                             ; preds = %2727
  %2737 = load float, ptr %32, align 4, !tbaa !11
  %2738 = fneg float %2737
  br label %2739

2739:                                             ; preds = %2736, %2734
  %2740 = phi float [ %2735, %2734 ], [ %2738, %2736 ]
  %2741 = fpext float %2740 to double
  %2742 = fadd double %2729, %2741
  %2743 = fptrunc double %2742 to float
  store float %2743, ptr %43, align 4, !tbaa !11
  %2744 = load float, ptr %43, align 4, !tbaa !11
  %2745 = load float, ptr %59, align 4, !tbaa !11
  %2746 = fcmp ogt float %2744, %2745
  br i1 %2746, label %2747, label %2788

2747:                                             ; preds = %2739
  %2748 = load float, ptr %43, align 4, !tbaa !11
  %2749 = fcmp olt float %2748, 1.000000e+00
  br i1 %2749, label %2750, label %2771

2750:                                             ; preds = %2747
  %2751 = load float, ptr %41, align 4, !tbaa !11
  %2752 = load float, ptr %43, align 4, !tbaa !11
  %2753 = load float, ptr %56, align 4, !tbaa !11
  %2754 = fmul float %2752, %2753
  %2755 = fcmp ogt float %2751, %2754
  br i1 %2755, label %2756, label %2770

2756:                                             ; preds = %2750
  %2757 = load float, ptr %41, align 4, !tbaa !11
  %2758 = fdiv float 1.000000e+00, %2757
  store float %2758, ptr %42, align 4, !tbaa !11
  %2759 = load ptr, ptr %17, align 8, !tbaa !5
  %2760 = load ptr, ptr %20, align 8, !tbaa !5
  %2761 = getelementptr inbounds %struct.complex, ptr %2760, i64 1
  %2762 = call i32 @f2c_csscal(ptr noundef %2759, ptr noundef %42, ptr noundef %2761, ptr noundef @c__1)
  %2763 = load float, ptr %42, align 4, !tbaa !11
  %2764 = load ptr, ptr %21, align 8, !tbaa !5
  %2765 = load float, ptr %2764, align 4, !tbaa !11
  %2766 = fmul float %2765, %2763
  store float %2766, ptr %2764, align 4, !tbaa !11
  %2767 = load float, ptr %42, align 4, !tbaa !11
  %2768 = load float, ptr %49, align 4, !tbaa !11
  %2769 = fmul float %2768, %2767
  store float %2769, ptr %49, align 4, !tbaa !11
  br label %2770

2770:                                             ; preds = %2756, %2750
  br label %2771

2771:                                             ; preds = %2770, %2747
  %2772 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %2772, ptr %28, align 8, !tbaa !9
  %2773 = load ptr, ptr %20, align 8, !tbaa !5
  %2774 = load i64, ptr %40, align 8, !tbaa !9
  %2775 = getelementptr inbounds %struct.complex, ptr %2773, i64 %2774
  call void @cladiv_(ptr noundef %35, ptr noundef %2775, ptr noundef %48)
  %2776 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %2777 = load float, ptr %2776, align 4, !tbaa !16
  %2778 = load ptr, ptr %20, align 8, !tbaa !5
  %2779 = load i64, ptr %28, align 8, !tbaa !9
  %2780 = getelementptr inbounds %struct.complex, ptr %2778, i64 %2779
  %2781 = getelementptr inbounds %struct.complex, ptr %2780, i32 0, i32 0
  store float %2777, ptr %2781, align 4, !tbaa !16
  %2782 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %2783 = load float, ptr %2782, align 4, !tbaa !19
  %2784 = load ptr, ptr %20, align 8, !tbaa !5
  %2785 = load i64, ptr %28, align 8, !tbaa !9
  %2786 = getelementptr inbounds %struct.complex, ptr %2784, i64 %2785
  %2787 = getelementptr inbounds %struct.complex, ptr %2786, i32 0, i32 1
  store float %2783, ptr %2787, align 4, !tbaa !19
  br label %2863

2788:                                             ; preds = %2739
  %2789 = load float, ptr %43, align 4, !tbaa !11
  %2790 = fcmp ogt float %2789, 0.000000e+00
  br i1 %2790, label %2791, label %2831

2791:                                             ; preds = %2788
  %2792 = load float, ptr %41, align 4, !tbaa !11
  %2793 = load float, ptr %43, align 4, !tbaa !11
  %2794 = load float, ptr %56, align 4, !tbaa !11
  %2795 = fmul float %2793, %2794
  %2796 = fcmp ogt float %2792, %2795
  br i1 %2796, label %2797, label %2814

2797:                                             ; preds = %2791
  %2798 = load float, ptr %43, align 4, !tbaa !11
  %2799 = load float, ptr %56, align 4, !tbaa !11
  %2800 = fmul float %2798, %2799
  %2801 = load float, ptr %41, align 4, !tbaa !11
  %2802 = fdiv float %2800, %2801
  store float %2802, ptr %42, align 4, !tbaa !11
  %2803 = load ptr, ptr %17, align 8, !tbaa !5
  %2804 = load ptr, ptr %20, align 8, !tbaa !5
  %2805 = getelementptr inbounds %struct.complex, ptr %2804, i64 1
  %2806 = call i32 @f2c_csscal(ptr noundef %2803, ptr noundef %42, ptr noundef %2805, ptr noundef @c__1)
  %2807 = load float, ptr %42, align 4, !tbaa !11
  %2808 = load ptr, ptr %21, align 8, !tbaa !5
  %2809 = load float, ptr %2808, align 4, !tbaa !11
  %2810 = fmul float %2809, %2807
  store float %2810, ptr %2808, align 4, !tbaa !11
  %2811 = load float, ptr %42, align 4, !tbaa !11
  %2812 = load float, ptr %49, align 4, !tbaa !11
  %2813 = fmul float %2812, %2811
  store float %2813, ptr %49, align 4, !tbaa !11
  br label %2814

2814:                                             ; preds = %2797, %2791
  %2815 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %2815, ptr %28, align 8, !tbaa !9
  %2816 = load ptr, ptr %20, align 8, !tbaa !5
  %2817 = load i64, ptr %40, align 8, !tbaa !9
  %2818 = getelementptr inbounds %struct.complex, ptr %2816, i64 %2817
  call void @cladiv_(ptr noundef %35, ptr noundef %2818, ptr noundef %48)
  %2819 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %2820 = load float, ptr %2819, align 4, !tbaa !16
  %2821 = load ptr, ptr %20, align 8, !tbaa !5
  %2822 = load i64, ptr %28, align 8, !tbaa !9
  %2823 = getelementptr inbounds %struct.complex, ptr %2821, i64 %2822
  %2824 = getelementptr inbounds %struct.complex, ptr %2823, i32 0, i32 0
  store float %2820, ptr %2824, align 4, !tbaa !16
  %2825 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %2826 = load float, ptr %2825, align 4, !tbaa !19
  %2827 = load ptr, ptr %20, align 8, !tbaa !5
  %2828 = load i64, ptr %28, align 8, !tbaa !9
  %2829 = getelementptr inbounds %struct.complex, ptr %2827, i64 %2828
  %2830 = getelementptr inbounds %struct.complex, ptr %2829, i32 0, i32 1
  store float %2826, ptr %2830, align 4, !tbaa !19
  br label %2862

2831:                                             ; preds = %2788
  %2832 = load ptr, ptr %17, align 8, !tbaa !5
  %2833 = load i64, ptr %2832, align 8, !tbaa !9
  store i64 %2833, ptr %28, align 8, !tbaa !9
  store i64 1, ptr %39, align 8, !tbaa !9
  br label %2834

2834:                                             ; preds = %2848, %2831
  %2835 = load i64, ptr %39, align 8, !tbaa !9
  %2836 = load i64, ptr %28, align 8, !tbaa !9
  %2837 = icmp sle i64 %2835, %2836
  br i1 %2837, label %2838, label %2851

2838:                                             ; preds = %2834
  %2839 = load i64, ptr %39, align 8, !tbaa !9
  store i64 %2839, ptr %29, align 8, !tbaa !9
  %2840 = load ptr, ptr %20, align 8, !tbaa !5
  %2841 = load i64, ptr %29, align 8, !tbaa !9
  %2842 = getelementptr inbounds %struct.complex, ptr %2840, i64 %2841
  %2843 = getelementptr inbounds %struct.complex, ptr %2842, i32 0, i32 0
  store float 0.000000e+00, ptr %2843, align 4, !tbaa !16
  %2844 = load ptr, ptr %20, align 8, !tbaa !5
  %2845 = load i64, ptr %29, align 8, !tbaa !9
  %2846 = getelementptr inbounds %struct.complex, ptr %2844, i64 %2845
  %2847 = getelementptr inbounds %struct.complex, ptr %2846, i32 0, i32 1
  store float 0.000000e+00, ptr %2847, align 4, !tbaa !19
  br label %2848

2848:                                             ; preds = %2838
  %2849 = load i64, ptr %39, align 8, !tbaa !9
  %2850 = add nsw i64 %2849, 1
  store i64 %2850, ptr %39, align 8, !tbaa !9
  br label %2834, !llvm.loop !32

2851:                                             ; preds = %2834
  %2852 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %2852, ptr %28, align 8, !tbaa !9
  %2853 = load ptr, ptr %20, align 8, !tbaa !5
  %2854 = load i64, ptr %28, align 8, !tbaa !9
  %2855 = getelementptr inbounds %struct.complex, ptr %2853, i64 %2854
  %2856 = getelementptr inbounds %struct.complex, ptr %2855, i32 0, i32 0
  store float 1.000000e+00, ptr %2856, align 4, !tbaa !16
  %2857 = load ptr, ptr %20, align 8, !tbaa !5
  %2858 = load i64, ptr %28, align 8, !tbaa !9
  %2859 = getelementptr inbounds %struct.complex, ptr %2857, i64 %2858
  %2860 = getelementptr inbounds %struct.complex, ptr %2859, i32 0, i32 1
  store float 0.000000e+00, ptr %2860, align 4, !tbaa !19
  %2861 = load ptr, ptr %21, align 8, !tbaa !5
  store float 0.000000e+00, ptr %2861, align 4, !tbaa !11
  store float 0.000000e+00, ptr %49, align 4, !tbaa !11
  br label %2862

2862:                                             ; preds = %2851, %2814
  br label %2863

2863:                                             ; preds = %2862, %2771
  br label %2864

2864:                                             ; preds = %2863, %2715
  br label %2894

2865:                                             ; preds = %2611, %2602
  %2866 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %2866, ptr %28, align 8, !tbaa !9
  %2867 = load ptr, ptr %20, align 8, !tbaa !5
  %2868 = load i64, ptr %40, align 8, !tbaa !9
  %2869 = getelementptr inbounds %struct.complex, ptr %2867, i64 %2868
  call void @cladiv_(ptr noundef %36, ptr noundef %2869, ptr noundef %48)
  %2870 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 0
  %2871 = load float, ptr %2870, align 4, !tbaa !16
  %2872 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 0
  %2873 = load float, ptr %2872, align 4, !tbaa !16
  %2874 = fsub float %2871, %2873
  %2875 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  store float %2874, ptr %2875, align 4, !tbaa !16
  %2876 = getelementptr inbounds %struct.complex, ptr %36, i32 0, i32 1
  %2877 = load float, ptr %2876, align 4, !tbaa !19
  %2878 = getelementptr inbounds %struct.complex, ptr %54, i32 0, i32 1
  %2879 = load float, ptr %2878, align 4, !tbaa !19
  %2880 = fsub float %2877, %2879
  %2881 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  store float %2880, ptr %2881, align 4, !tbaa !19
  %2882 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 0
  %2883 = load float, ptr %2882, align 4, !tbaa !16
  %2884 = load ptr, ptr %20, align 8, !tbaa !5
  %2885 = load i64, ptr %28, align 8, !tbaa !9
  %2886 = getelementptr inbounds %struct.complex, ptr %2884, i64 %2885
  %2887 = getelementptr inbounds %struct.complex, ptr %2886, i32 0, i32 0
  store float %2883, ptr %2887, align 4, !tbaa !16
  %2888 = getelementptr inbounds %struct.complex, ptr %35, i32 0, i32 1
  %2889 = load float, ptr %2888, align 4, !tbaa !19
  %2890 = load ptr, ptr %20, align 8, !tbaa !5
  %2891 = load i64, ptr %28, align 8, !tbaa !9
  %2892 = getelementptr inbounds %struct.complex, ptr %2890, i64 %2891
  %2893 = getelementptr inbounds %struct.complex, ptr %2892, i32 0, i32 1
  store float %2889, ptr %2893, align 4, !tbaa !19
  br label %2894

2894:                                             ; preds = %2865, %2864
  %2895 = load i64, ptr %40, align 8, !tbaa !9
  store i64 %2895, ptr %28, align 8, !tbaa !9
  %2896 = load float, ptr %49, align 4, !tbaa !11
  store float %2896, ptr %33, align 4, !tbaa !11
  %2897 = load ptr, ptr %20, align 8, !tbaa !5
  %2898 = load i64, ptr %28, align 8, !tbaa !9
  %2899 = getelementptr inbounds %struct.complex, ptr %2897, i64 %2898
  %2900 = getelementptr inbounds %struct.complex, ptr %2899, i32 0, i32 0
  %2901 = load float, ptr %2900, align 4, !tbaa !16
  store float %2901, ptr %31, align 4, !tbaa !11
  %2902 = load float, ptr %31, align 4, !tbaa !11
  %2903 = fcmp oge float %2902, 0.000000e+00
  br i1 %2903, label %2904, label %2906

2904:                                             ; preds = %2894
  %2905 = load float, ptr %31, align 4, !tbaa !11
  br label %2909

2906:                                             ; preds = %2894
  %2907 = load float, ptr %31, align 4, !tbaa !11
  %2908 = fneg float %2907
  br label %2909

2909:                                             ; preds = %2906, %2904
  %2910 = phi float [ %2905, %2904 ], [ %2908, %2906 ]
  %2911 = fpext float %2910 to double
  %2912 = load ptr, ptr %20, align 8, !tbaa !5
  %2913 = load i64, ptr %40, align 8, !tbaa !9
  %2914 = getelementptr inbounds %struct.complex, ptr %2912, i64 %2913
  %2915 = call double @r_imag(ptr noundef %2914)
  %2916 = fptrunc double %2915 to float
  store float %2916, ptr %32, align 4, !tbaa !11
  %2917 = load float, ptr %32, align 4, !tbaa !11
  %2918 = fcmp oge float %2917, 0.000000e+00
  br i1 %2918, label %2919, label %2921

2919:                                             ; preds = %2909
  %2920 = load float, ptr %32, align 4, !tbaa !11
  br label %2924

2921:                                             ; preds = %2909
  %2922 = load float, ptr %32, align 4, !tbaa !11
  %2923 = fneg float %2922
  br label %2924

2924:                                             ; preds = %2921, %2919
  %2925 = phi float [ %2920, %2919 ], [ %2923, %2921 ]
  %2926 = fpext float %2925 to double
  %2927 = fadd double %2911, %2926
  %2928 = fptrunc double %2927 to float
  store float %2928, ptr %34, align 4, !tbaa !11
  %2929 = load float, ptr %33, align 4, !tbaa !11
  %2930 = load float, ptr %34, align 4, !tbaa !11
  %2931 = fcmp oge float %2929, %2930
  br i1 %2931, label %2932, label %2934

2932:                                             ; preds = %2924
  %2933 = load float, ptr %33, align 4, !tbaa !11
  br label %2936

2934:                                             ; preds = %2924
  %2935 = load float, ptr %34, align 4, !tbaa !11
  br label %2936

2936:                                             ; preds = %2934, %2932
  %2937 = phi float [ %2933, %2932 ], [ %2935, %2934 ]
  %2938 = fpext float %2937 to double
  %2939 = fptrunc double %2938 to float
  store float %2939, ptr %49, align 4, !tbaa !11
  br label %2940

2940:                                             ; preds = %2936
  %2941 = load i64, ptr %27, align 8, !tbaa !9
  %2942 = load i64, ptr %40, align 8, !tbaa !9
  %2943 = add nsw i64 %2942, %2941
  store i64 %2943, ptr %40, align 8, !tbaa !9
  br label %2166, !llvm.loop !33

2944:                                             ; preds = %2179
  br label %2945

2945:                                             ; preds = %2944, %2161
  br label %2946

2946:                                             ; preds = %2945, %1346
  %2947 = load float, ptr %51, align 4, !tbaa !11
  %2948 = load ptr, ptr %21, align 8, !tbaa !5
  %2949 = load float, ptr %2948, align 4, !tbaa !11
  %2950 = fdiv float %2949, %2947
  store float %2950, ptr %2948, align 4, !tbaa !11
  br label %2951

2951:                                             ; preds = %2946, %765
  %2952 = load float, ptr %51, align 4, !tbaa !11
  %2953 = fcmp une float %2952, 1.000000e+00
  br i1 %2953, label %2954, label %2961

2954:                                             ; preds = %2951
  %2955 = load float, ptr %51, align 4, !tbaa !11
  %2956 = fdiv float 1.000000e+00, %2955
  store float %2956, ptr %31, align 4, !tbaa !11
  %2957 = load ptr, ptr %17, align 8, !tbaa !5
  %2958 = load ptr, ptr %22, align 8, !tbaa !5
  %2959 = getelementptr inbounds float, ptr %2958, i64 1
  %2960 = call i32 @f2c_sscal(ptr noundef %2957, ptr noundef %31, ptr noundef %2959, ptr noundef @c__1)
  br label %2961

2961:                                             ; preds = %2954, %2951
  store i32 0, ptr %12, align 4
  store i32 1, ptr %61, align 4
  br label %2962

2962:                                             ; preds = %2961, %160, %151
  call void @llvm.lifetime.end.p0(i64 8, ptr %60) #4
  call void @llvm.lifetime.end.p0(i64 4, ptr %59) #4
  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 4, 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 8, ptr %52) #4
  call void @llvm.lifetime.end.p0(i64 4, ptr %51) #4
  call void @llvm.lifetime.end.p0(i64 4, ptr %50) #4
  call void @llvm.lifetime.end.p0(i64 4, ptr %49) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %48) #4
  call void @llvm.lifetime.end.p0(i64 4, ptr %47) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %46) #4
  call void @llvm.lifetime.end.p0(i64 4, ptr %45) #4
  call void @llvm.lifetime.end.p0(i64 8, ptr %44) #4
  call void @llvm.lifetime.end.p0(i64 4, ptr %43) #4
  call void @llvm.lifetime.end.p0(i64 4, ptr %42) #4
  call void @llvm.lifetime.end.p0(i64 4, 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 4, ptr %34) #4
  call void @llvm.lifetime.end.p0(i64 4, ptr %33) #4
  call void @llvm.lifetime.end.p0(i64 4, ptr %32) #4
  call void @llvm.lifetime.end.p0(i64 4, 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
  %2963 = load i32, ptr %12, align 4
  ret i32 %2963
}

; 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 @slamch_(ptr noundef) #2

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

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

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

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

declare double @r_imag(ptr noundef) #2

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

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

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

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

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

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

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

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

declare void @f2c_cdotc(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 = !{!"float", !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 4}
!18 = distinct !{!18, !14}
!19 = !{!17, !12, i64 4}
!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.complex = type { float, float }

@.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 float, align 4

; Function Attrs: nounwind uwtable
define dso_local noundef i32 @clatrs_(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, ptr nocapture noundef %10) local_unnamed_addr #0 {
  %12 = alloca i64, align 8
  %13 = alloca i64, align 8
  %14 = alloca i64, align 8
  %15 = alloca float, align 4
  %16 = alloca %struct.complex, align 8
  %17 = alloca %struct.complex, align 8
  %18 = alloca %struct.complex, align 4
  %19 = alloca float, align 4
  %20 = alloca %struct.complex, align 8
  %21 = alloca float, align 4
  %22 = alloca %struct.complex, align 8
  %23 = alloca float, align 4
  %24 = alloca float, align 4
  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 4, ptr nonnull %15) #6
  call void @llvm.lifetime.start.p0(i64 8, ptr nonnull %16) #6
  call void @llvm.lifetime.start.p0(i64 8, ptr nonnull %17) #6
  call void @llvm.lifetime.start.p0(i64 8, ptr nonnull %18) #6
  call void @llvm.lifetime.start.p0(i64 4, ptr nonnull %19) #6
  call void @llvm.lifetime.start.p0(i64 8, ptr nonnull %20) #6
  call void @llvm.lifetime.start.p0(i64 4, ptr nonnull %21) #6
  call void @llvm.lifetime.start.p0(i64 8, ptr nonnull %22) #6
  call void @llvm.lifetime.start.p0(i64 4, ptr nonnull %23) #6
  call void @llvm.lifetime.start.p0(i64 4, ptr nonnull %24) #6
  %25 = load i64, ptr %6, align 8, !tbaa !5
  %26 = xor i64 %25, -1
  %27 = getelementptr inbounds %struct.complex, ptr %5, i64 %26
  %28 = getelementptr inbounds i8, ptr %7, i64 -8
  %29 = getelementptr inbounds i8, ptr %9, i64 -4
  store i64 0, ptr %10, align 8, !tbaa !5
  %30 = tail call i64 @lsame_(ptr noundef %0, ptr noundef nonnull @.str) #6
  %31 = tail call i64 @lsame_(ptr noundef %1, ptr noundef nonnull @.str.1) #6
  %32 = tail call i64 @lsame_(ptr noundef %2, ptr noundef nonnull @.str.1) #6
  %.not.not.not = icmp eq i64 %30, 0
  br i1 %.not.not.not, label %33, label %35

33:                                               ; preds = %11
  %34 = tail call i64 @lsame_(ptr noundef %0, ptr noundef nonnull @.str.2) #6
  %.not803 = icmp eq i64 %34, 0
  br i1 %.not803, label %.thread.sink.split, label %35

35:                                               ; preds = %33, %11
  %.not804 = icmp eq i64 %31, 0
  br i1 %.not804, label %36, label %40

36:                                               ; preds = %35
  %37 = tail call i64 @lsame_(ptr noundef %1, ptr noundef nonnull @.str.3) #6
  %.not805 = icmp eq i64 %37, 0
  br i1 %.not805, label %38, label %40

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

40:                                               ; preds = %38, %36, %35
  %.not807 = icmp eq i64 %32, 0
  br i1 %.not807, label %41, label %43

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

43:                                               ; preds = %41, %40
  %44 = tail call i64 @lsame_(ptr noundef %3, ptr noundef nonnull @.str.5) #6
  %.not809 = icmp eq i64 %44, 0
  br i1 %.not809, label %45, label %47

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

47:                                               ; preds = %45, %43
  %48 = load i64, ptr %4, align 8, !tbaa !5
  %49 = icmp slt i64 %48, 0
  br i1 %49, label %.thread.sink.split, label %50

50:                                               ; preds = %47
  %51 = load i64, ptr %6, align 8, !tbaa !5
  %spec.select = tail call i64 @llvm.umax.i64(i64 %48, i64 1)
  %52 = icmp slt i64 %51, %spec.select
  br i1 %52, label %.thread.sink.split, label %53

53:                                               ; preds = %50
  %.pr = load i64, ptr %10, align 8, !tbaa !5
  %.not811 = icmp eq i64 %.pr, 0
  br i1 %.not811, label %57, label %.thread

.thread.sink.split:                               ; preds = %50, %47, %45, %41, %38, %33
  %.sink = phi i64 [ -1, %33 ], [ -2, %38 ], [ -3, %41 ], [ -4, %45 ], [ -5, %47 ], [ -7, %50 ]
  store i64 %.sink, ptr %10, align 8, !tbaa !5
  br label %.thread

.thread:                                          ; preds = %.thread.sink.split, %53
  %54 = phi i64 [ %.pr, %53 ], [ %.sink, %.thread.sink.split ]
  %55 = sub nsw i64 0, %54
  store i64 %55, ptr %12, align 8, !tbaa !5
  %56 = call i32 @xerbla_(ptr noundef nonnull @.str.6, ptr noundef nonnull %12) #6
  br label %933

57:                                               ; preds = %53
  %58 = icmp eq i64 %48, 0
  br i1 %58, label %933, label %59

59:                                               ; preds = %57
  %60 = tail call double @slamch_(ptr noundef nonnull @.str.7) #6
  %61 = fptrunc double %60 to float
  store float %61, ptr %24, align 4, !tbaa !9
  %62 = fdiv float 1.000000e+00, %61
  store float %62, ptr %23, align 4, !tbaa !9
  %63 = call i32 @slabad_(ptr noundef nonnull %24, ptr noundef nonnull %23) #6
  %64 = call double @slamch_(ptr noundef nonnull @.str.8) #6
  %65 = load float, ptr %24, align 4, !tbaa !9
  %66 = fpext float %65 to double
  %67 = fdiv double %66, %64
  %68 = fptrunc double %67 to float
  store float %68, ptr %24, align 4, !tbaa !9
  %69 = fdiv float 1.000000e+00, %68
  store float %69, ptr %23, align 4, !tbaa !9
  store float 1.000000e+00, ptr %8, align 4, !tbaa !9
  %70 = call i64 @lsame_(ptr noundef %3, ptr noundef nonnull @.str.1) #6
  %.not812 = icmp eq i64 %70, 0
  br i1 %.not812, label %.loopexit864, label %71

71:                                               ; preds = %59
  %72 = load i64, ptr %4, align 8, !tbaa !5
  br i1 %.not.not.not, label %80, label %73

73:                                               ; preds = %71
  store i64 %72, ptr %12, align 8, !tbaa !5
  %invariant.gep = getelementptr i8, ptr %27, i64 8
  %.not814867 = icmp slt i64 %72, 1
  br i1 %.not814867, label %.loopexit864, label %.lr.ph

.lr.ph:                                           ; preds = %73, %.lr.ph
  %.0755868 = phi i64 [ %79, %.lr.ph ], [ 1, %73 ]
  %74 = add nsw i64 %.0755868, -1
  store i64 %74, ptr %13, align 8, !tbaa !5
  %75 = mul nsw i64 %.0755868, %25
  %gep = getelementptr %struct.complex, ptr %invariant.gep, i64 %75
  %76 = call double @f2c_scasum(ptr noundef nonnull %13, ptr noundef %gep, ptr noundef nonnull @c__1) #6
  %77 = fptrunc double %76 to float
  %78 = getelementptr inbounds float, ptr %29, i64 %.0755868
  store float %77, ptr %78, align 4, !tbaa !9
  %79 = add nuw nsw i64 %.0755868, 1
  %.not814.not = icmp slt i64 %.0755868, %72
  br i1 %.not814.not, label %.lr.ph, label %.loopexit864, !llvm.loop !11

80:                                               ; preds = %71
  %81 = add nsw i64 %72, -1
  store i64 %81, ptr %12, align 8, !tbaa !5
  %.not813869 = icmp slt i64 %72, 2
  br i1 %.not813869, label %._crit_edge, label %.lr.ph871

.lr.ph871:                                        ; preds = %80, %.lr.ph871
  %.1756870 = phi i64 [ %84, %.lr.ph871 ], [ 1, %80 ]
  %82 = load i64, ptr %4, align 8, !tbaa !5
  %83 = sub nsw i64 %82, %.1756870
  store i64 %83, ptr %13, align 8, !tbaa !5
  %84 = add nuw nsw i64 %.1756870, 1
  %85 = mul nsw i64 %.1756870, %25
  %86 = getelementptr %struct.complex, ptr %27, i64 %84
  %87 = getelementptr %struct.complex, ptr %86, i64 %85
  %88 = call double @f2c_scasum(ptr noundef nonnull %13, ptr noundef %87, ptr noundef nonnull @c__1) #6
  %89 = fptrunc double %88 to float
  %90 = getelementptr inbounds float, ptr %29, i64 %.1756870
  store float %89, ptr %90, align 4, !tbaa !9
  %.not813.not = icmp slt i64 %.1756870, %81
  br i1 %.not813.not, label %.lr.ph871, label %._crit_edge.loopexit, !llvm.loop !13

._crit_edge.loopexit:                             ; preds = %.lr.ph871
  %.pre = load i64, ptr %4, align 8, !tbaa !5
  br label %._crit_edge

._crit_edge:                                      ; preds = %._crit_edge.loopexit, %80
  %91 = phi i64 [ %.pre, %._crit_edge.loopexit ], [ %72, %80 ]
  %92 = getelementptr inbounds float, ptr %29, i64 %91
  store float 0.000000e+00, ptr %92, align 4, !tbaa !9
  br label %.loopexit864

.loopexit864:                                     ; preds = %.lr.ph, %73, %._crit_edge, %59
  %93 = call i64 @f2c_isamax(ptr noundef nonnull %4, ptr noundef %9, ptr noundef nonnull @c__1) #6
  %94 = getelementptr inbounds float, ptr %29, i64 %93
  %95 = load float, ptr %94, align 4, !tbaa !9
  %96 = load float, ptr %23, align 4, !tbaa !9
  %97 = fmul float %96, 5.000000e-01
  %98 = fcmp ugt float %95, %97
  br i1 %98, label %100, label %99

99:                                               ; preds = %.loopexit864
  store float 1.000000e+00, ptr %21, align 4, !tbaa !9
  br label %105

100:                                              ; preds = %.loopexit864
  %101 = load float, ptr %24, align 4, !tbaa !9
  %102 = fmul float %95, %101
  %103 = fdiv float 5.000000e-01, %102
  store float %103, ptr %21, align 4, !tbaa !9
  %104 = call i32 @f2c_sscal(ptr noundef nonnull %4, ptr noundef nonnull %21, ptr noundef nonnull %9, ptr noundef nonnull @c__1) #6
  br label %105

105:                                              ; preds = %100, %99
  %106 = load i64, ptr %4, align 8, !tbaa !5
  %.not815872 = icmp slt i64 %106, 1
  br i1 %.not815872, label %._crit_edge877, label %.lr.ph876

.lr.ph876:                                        ; preds = %105, %.lr.ph876
  %.0741874 = phi float [ %121, %.lr.ph876 ], [ 0.000000e+00, %105 ]
  %.2757873 = phi i64 [ %122, %.lr.ph876 ], [ 1, %105 ]
  store i64 %.2757873, ptr %13, align 8, !tbaa !5
  %107 = getelementptr inbounds %struct.complex, ptr %28, i64 %.2757873
  %108 = load float, ptr %107, align 4, !tbaa !14
  %109 = fmul float %108, 5.000000e-01
  store float %109, ptr %15, align 4, !tbaa !9
  %110 = call double @r_imag(ptr noundef nonnull %107) #6
  %111 = fmul double %110, 5.000000e-01
  %112 = fptrunc double %111 to float
  %113 = insertelement <2 x float> poison, float %109, i64 0
  %114 = insertelement <2 x float> %113, float %112, i64 1
  %115 = fcmp oge <2 x float> %114, zeroinitializer
  %116 = fneg <2 x float> %114
  %117 = select <2 x i1> %115, <2 x float> %114, <2 x float> %116
  %shift = shufflevector <2 x float> %117, <2 x float> poison, <2 x i32> <i32 1, i32 poison>
  %118 = fadd <2 x float> %117, %shift
  %119 = extractelement <2 x float> %118, i64 0
  %120 = fcmp oge float %.0741874, %119
  %121 = select i1 %120, float %.0741874, float %119
  %122 = add nuw nsw i64 %.2757873, 1
  %.not815.not = icmp slt i64 %.2757873, %106
  br i1 %.not815.not, label %.lr.ph876, label %._crit_edge877, !llvm.loop !16

._crit_edge877:                                   ; preds = %.lr.ph876, %105
  %.0741.lcssa = phi float [ 0.000000e+00, %105 ], [ %121, %.lr.ph876 ]
  %123 = load i64, ptr %4, align 8, !tbaa !5
  %124 = load float, ptr %21, align 4, !tbaa !9
  %125 = fcmp une float %124, 1.000000e+00
  br i1 %.not804, label %188, label %126

126:                                              ; preds = %._crit_edge877
  %. = select i1 %.not.not.not, i64 1, i64 -1
  %.1043 = select i1 %.not.not.not, i64 %123, i64 1
  %.1044 = select i1 %.not.not.not, i64 1, i64 %123
  br i1 %125, label %.loopexit860, label %127

127:                                              ; preds = %126
  %128 = load float, ptr %24, align 4
  %129 = fcmp oge float %.0741.lcssa, %128
  %130 = select i1 %129, float %.0741.lcssa, float %128
  %131 = fdiv float 5.000000e-01, %130
  br i1 %.not807, label %173, label %132

132:                                              ; preds = %127
  store i64 %., ptr %13, align 8, !tbaa !5
  %133 = icmp sge i64 %.1044, %.1043
  %134 = icmp sle i64 %.1044, %.1043
  %.in821878 = select i1 %.not.not.not, i1 %134, i1 %133
  br i1 %.in821878, label %.lr.ph883, label %.loopexit860

.lr.ph883:                                        ; preds = %132
  %135 = add i64 %25, 1
  br label %136

136:                                              ; preds = %.lr.ph883, %161
  %137 = phi float [ %128, %.lr.ph883 ], [ %153, %161 ]
  %.0738881 = phi float [ %131, %.lr.ph883 ], [ %.1739, %161 ]
  %.0747880 = phi float [ %131, %.lr.ph883 ], [ %.1748, %161 ]
  %.3758879 = phi i64 [ %.1044, %.lr.ph883 ], [ %169, %161 ]
  %138 = fcmp ugt float %.0738881, %137
  br i1 %138, label %139, label %.loopexit860

139:                                              ; preds = %136
  %140 = mul i64 %.3758879, %135
  store i64 %140, ptr %14, align 8, !tbaa !5
  %141 = getelementptr inbounds %struct.complex, ptr %27, i64 %140
  %142 = load <2 x float>, ptr %141, align 4, !tbaa !9
  store <2 x float> %142, ptr %20, align 8, !tbaa !9
  %143 = extractelement <2 x float> %142, i64 0
  store float %143, ptr %15, align 4, !tbaa !9
  %144 = fcmp oge float %143, 0.000000e+00
  %145 = fneg float %143
  %146 = select i1 %144, float %143, float %145
  %147 = call double @r_imag(ptr noundef nonnull %20) #6
  %148 = fptrunc double %147 to float
  %149 = fcmp oge float %148, 0.000000e+00
  %150 = fneg float %148
  %151 = select i1 %149, float %148, float %150
  %152 = fadd float %146, %151
  %153 = load float, ptr %24, align 4, !tbaa !9
  %154 = fcmp ult float %152, %153
  br i1 %154, label %161, label %155

155:                                              ; preds = %139
  store float %.0747880, ptr %15, align 4, !tbaa !9
  %156 = fcmp oge float %152, 1.000000e+00
  %157 = select i1 %156, float 1.000000e+00, float %152
  %158 = fmul float %.0738881, %157
  %159 = fcmp ole float %.0747880, %158
  %160 = select i1 %159, float %.0747880, float %158
  br label %161

161:                                              ; preds = %139, %155
  %.1748 = phi float [ %160, %155 ], [ 0.000000e+00, %139 ]
  %162 = getelementptr inbounds float, ptr %29, i64 %.3758879
  %163 = load float, ptr %162, align 4, !tbaa !9
  %164 = fadd float %152, %163
  %165 = fcmp ult float %164, %153
  %166 = fdiv float %152, %164
  %167 = fmul float %.0738881, %166
  %.1739 = select i1 %165, float 0.000000e+00, float %167
  %168 = load i64, ptr %13, align 8, !tbaa !5
  %169 = add nsw i64 %168, %.3758879
  %170 = icmp slt i64 %168, 0
  %171 = icmp sge i64 %169, %.1043
  %172 = icmp sle i64 %169, %.1043
  %.in821 = select i1 %170, i1 %171, i1 %172
  br i1 %.in821, label %136, label %.loopexit860, !llvm.loop !17

173:                                              ; preds = %127
  %174 = fcmp oge float %131, 1.000000e+00
  %175 = select i1 %174, float 1.000000e+00, float %131
  store i64 %.1043, ptr %13, align 8, !tbaa !5
  %176 = icmp sge i64 %.1044, %.1043
  %177 = icmp sle i64 %.1044, %.1043
  %.in820887 = select i1 %.not.not.not, i1 %177, i1 %176
  %178 = fcmp ugt float %175, %128
  %or.cond839888 = select i1 %.in820887, i1 %178, i1 false
  br i1 %or.cond839888, label %.lr.ph892, label %.loopexit860

.lr.ph892:                                        ; preds = %173, %.lr.ph892
  %.2740890 = phi float [ %183, %.lr.ph892 ], [ %175, %173 ]
  %.4759889 = phi i64 [ %184, %.lr.ph892 ], [ %.1044, %173 ]
  %179 = getelementptr inbounds float, ptr %29, i64 %.4759889
  %180 = load float, ptr %179, align 4, !tbaa !9
  %181 = fadd float %180, 1.000000e+00
  %182 = fdiv float 1.000000e+00, %181
  %183 = fmul float %.2740890, %182
  %184 = add nsw i64 %.4759889, %.
  %185 = icmp sge i64 %184, %.1043
  %186 = icmp sle i64 %184, %.1043
  %.in820 = select i1 %.not.not.not, i1 %186, i1 %185
  %187 = fcmp ugt float %183, %128
  %or.cond839 = select i1 %.in820, i1 %187, i1 false
  br i1 %or.cond839, label %.lr.ph892, label %.loopexit860, !llvm.loop !18

188:                                              ; preds = %._crit_edge877
  %.1045 = select i1 %.not.not.not, i64 -1, i64 1
  %.1046 = select i1 %.not.not.not, i64 1, i64 %123
  %.1047 = select i1 %.not.not.not, i64 %123, i64 1
  br i1 %125, label %.loopexit860, label %189

189:                                              ; preds = %188
  %190 = load float, ptr %24, align 4
  %191 = fcmp oge float %.0741.lcssa, %190
  %192 = select i1 %191, float %.0741.lcssa, float %190
  %193 = fdiv float 5.000000e-01, %192
  br i1 %.not807, label %236, label %194

194:                                              ; preds = %189
  store i64 %.1046, ptr %12, align 8, !tbaa !5
  store i64 %.1045, ptr %13, align 8, !tbaa !5
  %195 = icmp sge i64 %.1047, %.1046
  %196 = icmp sle i64 %.1047, %.1046
  %.in818894 = select i1 %.not.not.not, i1 %195, i1 %196
  br i1 %.in818894, label %.lr.ph899, label %._crit_edge900

.lr.ph899:                                        ; preds = %194
  %197 = add i64 %25, 1
  br label %198

198:                                              ; preds = %.lr.ph899, %228
  %199 = phi float [ %190, %.lr.ph899 ], [ %221, %228 ]
  %.3897 = phi float [ %193, %.lr.ph899 ], [ %207, %228 ]
  %.2749896 = phi float [ %193, %.lr.ph899 ], [ %.3750, %228 ]
  %.5760895 = phi i64 [ %.1047, %.lr.ph899 ], [ %230, %228 ]
  %200 = fcmp ugt float %.3897, %199
  br i1 %200, label %201, label %.loopexit860

201:                                              ; preds = %198
  %202 = getelementptr inbounds float, ptr %29, i64 %.5760895
  %203 = load float, ptr %202, align 4, !tbaa !9
  %204 = fadd float %203, 1.000000e+00
  %205 = fdiv float %.2749896, %204
  %206 = fcmp ole float %.3897, %205
  %207 = select i1 %206, float %.3897, float %205
  %208 = mul i64 %.5760895, %197
  store i64 %208, ptr %14, align 8, !tbaa !5
  %209 = getelementptr inbounds %struct.complex, ptr %27, i64 %208
  %210 = load <2 x float>, ptr %209, align 4, !tbaa !9
  store <2 x float> %210, ptr %20, align 8, !tbaa !9
  %211 = extractelement <2 x float> %210, i64 0
  store float %211, ptr %15, align 4, !tbaa !9
  %212 = fcmp oge float %211, 0.000000e+00
  %213 = fneg float %211
  %214 = select i1 %212, float %211, float %213
  %215 = call double @r_imag(ptr noundef nonnull %20) #6
  %216 = fptrunc double %215 to float
  %217 = fcmp oge float %216, 0.000000e+00
  %218 = fneg float %216
  %219 = select i1 %217, float %216, float %218
  %220 = fadd float %214, %219
  %221 = load float, ptr %24, align 4, !tbaa !9
  %222 = fcmp ult float %220, %221
  br i1 %222, label %228, label %223

223:                                              ; preds = %201
  %224 = fcmp ogt float %204, %220
  br i1 %224, label %225, label %228

225:                                              ; preds = %223
  %226 = fdiv float %220, %204
  %227 = fmul float %.2749896, %226
  br label %228

228:                                              ; preds = %201, %225, %223
  %.3750 = phi float [ %227, %225 ], [ %.2749896, %223 ], [ 0.000000e+00, %201 ]
  %229 = load i64, ptr %13, align 8, !tbaa !5
  %230 = add nsw i64 %229, %.5760895
  %231 = icmp slt i64 %229, 0
  %232 = icmp sge i64 %230, %.1046
  %233 = icmp sle i64 %230, %.1046
  %.in818 = select i1 %231, i1 %232, i1 %233
  br i1 %.in818, label %198, label %._crit_edge900, !llvm.loop !19

._crit_edge900:                                   ; preds = %228, %194
  %.2749.lcssa = phi float [ %193, %194 ], [ %.3750, %228 ]
  %.3.lcssa = phi float [ %193, %194 ], [ %207, %228 ]
  %234 = fcmp ole float %.3.lcssa, %.2749.lcssa
  %235 = select i1 %234, float %.3.lcssa, float %.2749.lcssa
  br label %.loopexit860

236:                                              ; preds = %189
  %237 = fcmp oge float %193, 1.000000e+00
  %238 = select i1 %237, float 1.000000e+00, float %193
  store i64 %.1046, ptr %13, align 8, !tbaa !5
  %239 = icmp sge i64 %.1047, %.1046
  %240 = icmp sle i64 %.1047, %.1046
  %.in903 = select i1 %.not.not.not, i1 %239, i1 %240
  %241 = fcmp ugt float %238, %190
  %or.cond841904 = select i1 %.in903, i1 %241, i1 false
  br i1 %or.cond841904, label %.lr.ph908, label %.loopexit860

.lr.ph908:                                        ; preds = %236, %.lr.ph908
  %.4906 = phi float [ %245, %.lr.ph908 ], [ %238, %236 ]
  %.6761905 = phi i64 [ %246, %.lr.ph908 ], [ %.1047, %236 ]
  %242 = getelementptr inbounds float, ptr %29, i64 %.6761905
  %243 = load float, ptr %242, align 4, !tbaa !9
  %244 = fadd float %243, 1.000000e+00
  %245 = fdiv float %.4906, %244
  %246 = add nsw i64 %.6761905, %.1045
  %247 = icmp sge i64 %246, %.1046
  %248 = icmp sle i64 %246, %.1046
  %.in = select i1 %.not.not.not, i1 %247, i1 %248
  %249 = fcmp ugt float %245, %190
  %or.cond841 = select i1 %.in, i1 %249, i1 false
  br i1 %or.cond841, label %.lr.ph908, label %.loopexit860, !llvm.loop !20

.loopexit860:                                     ; preds = %136, %161, %.lr.ph892, %198, %.lr.ph908, %132, %173, %236, %188, %126, %._crit_edge900
  %250 = phi i64 [ %.1045, %._crit_edge900 ], [ %., %126 ], [ %.1045, %188 ], [ %.1045, %236 ], [ %., %173 ], [ %., %132 ], [ %.1045, %.lr.ph908 ], [ %.1045, %198 ], [ %., %.lr.ph892 ], [ %., %161 ], [ %., %136 ]
  %.5 = phi float [ %235, %._crit_edge900 ], [ 0.000000e+00, %126 ], [ 0.000000e+00, %188 ], [ %238, %236 ], [ %175, %173 ], [ %131, %132 ], [ %245, %.lr.ph908 ], [ %.3897, %198 ], [ %183, %.lr.ph892 ], [ %.0738881, %136 ], [ %.1748, %161 ]
  %251 = phi i64 [ %.1046, %._crit_edge900 ], [ %.1043, %126 ], [ %.1046, %188 ], [ %.1046, %236 ], [ %.1043, %173 ], [ %.1043, %132 ], [ %.1046, %.lr.ph908 ], [ %.1046, %198 ], [ %.1043, %.lr.ph892 ], [ %.1043, %161 ], [ %.1043, %136 ]
  %.2 = phi i64 [ %.1047, %._crit_edge900 ], [ %.1044, %126 ], [ %.1047, %188 ], [ %.1047, %236 ], [ %.1044, %173 ], [ %.1044, %132 ], [ %.1047, %.lr.ph908 ], [ %.1047, %198 ], [ %.1044, %.lr.ph892 ], [ %.1044, %161 ], [ %.1044, %136 ]
  %252 = load float, ptr %21, align 4, !tbaa !9
  %253 = fmul float %.5, %252
  %254 = load float, ptr %24, align 4, !tbaa !9
  %255 = fcmp ogt float %253, %254
  br i1 %255, label %256, label %258

256:                                              ; preds = %.loopexit860
  %257 = call i32 @f2c_ctrsv(ptr noundef %0, ptr noundef %1, ptr noundef %2, ptr noundef nonnull %4, ptr noundef %5, ptr noundef nonnull %6, ptr noundef %7, ptr noundef nonnull @c__1) #6
  %.pr853 = load float, ptr %21, align 4, !tbaa !9
  br label %927

258:                                              ; preds = %.loopexit860
  %259 = load float, ptr %23, align 4, !tbaa !9
  %260 = fmul float %259, 5.000000e-01
  %261 = fcmp ogt float %.0741.lcssa, %260
  br i1 %261, label %262, label %266

262:                                              ; preds = %258
  %263 = fdiv float %260, %.0741.lcssa
  store float %263, ptr %8, align 4, !tbaa !9
  %264 = call i32 @f2c_csscal(ptr noundef nonnull %4, ptr noundef nonnull %8, ptr noundef %7, ptr noundef nonnull @c__1) #6
  %265 = load float, ptr %23, align 4, !tbaa !9
  br label %268

266:                                              ; preds = %258
  %267 = fmul float %.0741.lcssa, 2.000000e+00
  br label %268

268:                                              ; preds = %266, %262
  %.1742 = phi float [ %265, %262 ], [ %267, %266 ]
  br i1 %.not804, label %437, label %269

269:                                              ; preds = %268
  store i64 %250, ptr %13, align 8, !tbaa !5
  %invariant.gep914 = getelementptr i8, ptr %27, i64 8
  %270 = icmp slt i64 %250, 0
  %271 = icmp sge i64 %.2, %251
  %272 = icmp sle i64 %.2, %251
  %.in835918 = select i1 %270, i1 %271, i1 %272
  br i1 %.in835918, label %.lr.ph922, label %.loopexit855

.lr.ph922:                                        ; preds = %269
  %273 = add i64 %25, 1
  %274 = getelementptr inbounds i8, ptr %16, i64 4
  %275 = getelementptr inbounds i8, ptr %20, i64 4
  br label %276

276:                                              ; preds = %.lr.ph922, %431
  %.2743920 = phi float [ %.1742, %.lr.ph922 ], [ %.6, %431 ]
  %.7762919 = phi i64 [ %.2, %.lr.ph922 ], [ %433, %431 ]
  store i64 %.7762919, ptr %14, align 8, !tbaa !5
  %277 = getelementptr inbounds %struct.complex, ptr %28, i64 %.7762919
  %278 = load float, ptr %277, align 4, !tbaa !14
  %279 = fcmp oge float %278, 0.000000e+00
  %280 = fneg float %278
  %281 = select i1 %279, float %278, float %280
  %282 = call double @r_imag(ptr noundef nonnull %277) #6
  %283 = fptrunc double %282 to float
  %284 = fcmp oge float %283, 0.000000e+00
  %285 = fneg float %283
  %286 = select i1 %284, float %283, float %285
  %287 = fadd float %281, %286
  br i1 %.not807, label %297, label %288

288:                                              ; preds = %276
  %289 = mul i64 %.7762919, %273
  store i64 %289, ptr %14, align 8, !tbaa !5
  %290 = load float, ptr %21, align 4, !tbaa !9
  %291 = getelementptr inbounds %struct.complex, ptr %27, i64 %289
  %292 = load <2 x float>, ptr %291, align 4, !tbaa !9
  %293 = insertelement <2 x float> poison, float %290, i64 0
  %294 = shufflevector <2 x float> %293, <2 x float> poison, <2 x i32> zeroinitializer
  %295 = fmul <2 x float> %294, %292
  store <2 x float> %295, ptr %16, align 8, !tbaa !9
  store <2 x float> %295, ptr %20, align 8, !tbaa !9
  %296 = extractelement <2 x float> %295, i64 0
  br label %300

297:                                              ; preds = %276
  %298 = load float, ptr %21, align 4, !tbaa !9
  store float %298, ptr %20, align 8, !tbaa !14
  store float 0.000000e+00, ptr %275, align 4, !tbaa !21
  %299 = fcmp oeq float %298, 1.000000e+00
  br i1 %299, label %362, label %300

300:                                              ; preds = %297, %288
  %301 = phi float [ %298, %297 ], [ %296, %288 ]
  %302 = call double @r_imag(ptr noundef nonnull %20) #6
  %303 = fptrunc double %302 to float
  %304 = insertelement <2 x float> poison, float %301, i64 0
  %305 = insertelement <2 x float> %304, float %303, i64 1
  %306 = fcmp oge <2 x float> %305, zeroinitializer
  %307 = fneg <2 x float> %305
  %308 = select <2 x i1> %306, <2 x float> %305, <2 x float> %307
  %shift1109 = shufflevector <2 x float> %308, <2 x float> poison, <2 x i32> <i32 1, i32 poison>
  %309 = fadd <2 x float> %308, %shift1109
  %310 = extractelement <2 x float> %309, i64 0
  %311 = load float, ptr %24, align 4, !tbaa !9
  %312 = fcmp ogt float %310, %311
  br i1 %312, label %313, label %327

313:                                              ; preds = %300
  %314 = fcmp olt float %310, 1.000000e+00
  br i1 %314, label %315, label %326

315:                                              ; preds = %313
  %316 = load float, ptr %23, align 4, !tbaa !9
  %317 = fmul float %310, %316
  %318 = fcmp ogt float %287, %317
  br i1 %318, label %319, label %326

319:                                              ; preds = %315
  %320 = fdiv float 1.000000e+00, %287
  store float %320, ptr %19, align 4, !tbaa !9
  %321 = call i32 @f2c_csscal(ptr noundef nonnull %4, ptr noundef nonnull %19, ptr noundef nonnull %7, ptr noundef nonnull @c__1) #6
  %322 = load float, ptr %19, align 4, !tbaa !9
  %323 = load float, ptr %8, align 4, !tbaa !9
  %324 = fmul float %322, %323
  store float %324, ptr %8, align 4, !tbaa !9
  %325 = fmul float %.2743920, %322
  br label %326

326:                                              ; preds = %315, %319, %313
  %.3744 = phi float [ %325, %319 ], [ %.2743920, %315 ], [ %.2743920, %313 ]
  store i64 %.7762919, ptr %14, align 8, !tbaa !5
  call void @cladiv_(ptr noundef nonnull %16, ptr noundef nonnull %277, ptr noundef nonnull %20) #6
  br label %.sink.split

327:                                              ; preds = %300
  %328 = fcmp ogt float %310, 0.000000e+00
  br i1 %328, label %329, label %347

329:                                              ; preds = %327
  %330 = load float, ptr %23, align 4, !tbaa !9
  %331 = fmul float %310, %330
  %332 = fcmp ogt float %287, %331
  br i1 %332, label %333, label %346

333:                                              ; preds = %329
  %334 = fdiv float %331, %287
  store float %334, ptr %19, align 4, !tbaa !9
  %335 = getelementptr inbounds float, ptr %29, i64 %.7762919
  %336 = load float, ptr %335, align 4, !tbaa !9
  %337 = fcmp ogt float %336, 1.000000e+00
  br i1 %337, label %338, label %340

338:                                              ; preds = %333
  %339 = fdiv float %334, %336
  store float %339, ptr %19, align 4, !tbaa !9
  br label %340

340:                                              ; preds = %338, %333
  %341 = call i32 @f2c_csscal(ptr noundef nonnull %4, ptr noundef nonnull %19, ptr noundef nonnull %7, ptr noundef nonnull @c__1) #6
  %342 = load float, ptr %19, align 4, !tbaa !9
  %343 = load float, ptr %8, align 4, !tbaa !9
  %344 = fmul float %342, %343
  store float %344, ptr %8, align 4, !tbaa !9
  %345 = fmul float %.2743920, %342
  br label %346

346:                                              ; preds = %340, %329
  %.4745 = phi float [ %345, %340 ], [ %.2743920, %329 ]
  store i64 %.7762919, ptr %14, align 8, !tbaa !5
  call void @cladiv_(ptr noundef nonnull %16, ptr noundef nonnull %277, ptr noundef nonnull %20) #6
  br label %.sink.split

347:                                              ; preds = %327
  %348 = load i64, ptr %4, align 8, !tbaa !5
  %.not837910 = icmp slt i64 %348, 1
  br i1 %.not837910, label %.thread847, label %.lr.ph913.preheader

.lr.ph913.preheader:                              ; preds = %347
  %349 = shl nuw i64 %348, 3
  call void @llvm.memset.p0.i64(ptr nonnull align 4 %7, i8 0, i64 %349, i1 false), !tbaa !9
  br label %.thread847

.thread847:                                       ; preds = %.lr.ph913.preheader, %347
  store i64 %.7762919, ptr %14, align 8, !tbaa !5
  store <2 x float> <float 1.000000e+00, float 0.000000e+00>, ptr %277, align 4, !tbaa !9
  store float 0.000000e+00, ptr %8, align 4, !tbaa !9
  br label %378

.sink.split:                                      ; preds = %346, %326
  %.5746.ph = phi float [ %.4745, %346 ], [ %.3744, %326 ]
  %.sink1106 = load float, ptr %16, align 8, !tbaa !14
  %.sink1108 = load i64, ptr %14, align 8, !tbaa !5
  %350 = getelementptr inbounds %struct.complex, ptr %28, i64 %.sink1108
  store float %.sink1106, ptr %350, align 4, !tbaa !14
  %351 = load float, ptr %274, align 4, !tbaa !21
  %352 = getelementptr inbounds %struct.complex, ptr %28, i64 %.sink1108, i32 1
  store float %351, ptr %352, align 4, !tbaa !21
  store i64 %.7762919, ptr %14, align 8, !tbaa !5
  %storemerge1078 = load float, ptr %277, align 4, !tbaa !14
  store float %storemerge1078, ptr %15, align 4, !tbaa !9
  %353 = call double @r_imag(ptr noundef nonnull %277) #6
  %354 = fptrunc double %353 to float
  %355 = insertelement <2 x float> poison, float %storemerge1078, i64 0
  %356 = insertelement <2 x float> %355, float %354, i64 1
  %357 = fcmp oge <2 x float> %356, zeroinitializer
  %358 = fneg <2 x float> %356
  %359 = select <2 x i1> %357, <2 x float> %356, <2 x float> %358
  %shift1110 = shufflevector <2 x float> %359, <2 x float> poison, <2 x i32> <i32 1, i32 poison>
  %360 = fadd <2 x float> %359, %shift1110
  %361 = extractelement <2 x float> %360, i64 0
  br label %362

362:                                              ; preds = %.sink.split, %297
  %.0754 = phi float [ %287, %297 ], [ %361, %.sink.split ]
  %.5746 = phi float [ %.2743920, %297 ], [ %.5746.ph, %.sink.split ]
  %363 = fcmp ogt float %.0754, 1.000000e+00
  br i1 %363, label %364, label %378

364:                                              ; preds = %362
  %365 = fdiv float 1.000000e+00, %.0754
  store float %365, ptr %19, align 4, !tbaa !9
  %366 = getelementptr inbounds float, ptr %29, i64 %.7762919
  %367 = load float, ptr %366, align 4, !tbaa !9
  %368 = load float, ptr %23, align 4, !tbaa !9
  %369 = fsub float %368, %.5746
  %370 = fmul float %365, %369
  %371 = fcmp ogt float %367, %370
  br i1 %371, label %372, label %389

372:                                              ; preds = %364
  %373 = fmul float %365, 5.000000e-01
  store float %373, ptr %19, align 4, !tbaa !9
  %374 = call i32 @f2c_csscal(ptr noundef nonnull %4, ptr noundef nonnull %19, ptr noundef nonnull %7, ptr noundef nonnull @c__1) #6
  %375 = load float, ptr %19, align 4, !tbaa !9
  %376 = load float, ptr %8, align 4, !tbaa !9
  %377 = fmul float %375, %376
  br label %.sink.split1061

378:                                              ; preds = %.thread847, %362
  %.5746852 = phi float [ 0.000000e+00, %.thread847 ], [ %.5746, %362 ]
  %.0754850 = phi float [ 1.000000e+00, %.thread847 ], [ %.0754, %362 ]
  %379 = getelementptr inbounds float, ptr %29, i64 %.7762919
  %380 = load float, ptr %379, align 4, !tbaa !9
  %381 = fmul float %.0754850, %380
  %382 = load float, ptr %23, align 4, !tbaa !9
  %383 = fsub float %382, %.5746852
  %384 = fcmp ogt float %381, %383
  br i1 %384, label %385, label %389

385:                                              ; preds = %378
  %386 = call i32 @f2c_csscal(ptr noundef nonnull %4, ptr noundef nonnull @c_b36, ptr noundef nonnull %7, ptr noundef nonnull @c__1) #6
  %387 = load float, ptr %8, align 4, !tbaa !9
  %388 = fmul float %387, 5.000000e-01
  br label %.sink.split1061

.sink.split1061:                                  ; preds = %372, %385
  %.sink1062 = phi float [ %388, %385 ], [ %377, %372 ]
  %.5746851.ph = phi float [ %.5746852, %385 ], [ %.5746, %372 ]
  store float %.sink1062, ptr %8, align 4, !tbaa !9
  br label %389

389:                                              ; preds = %.sink.split1061, %378, %364
  %.5746851 = phi float [ %.5746852, %378 ], [ %.5746, %364 ], [ %.5746851.ph, %.sink.split1061 ]
  br i1 %.not.not.not, label %403, label %390

390:                                              ; preds = %389
  %391 = icmp sgt i64 %.7762919, 1
  br i1 %391, label %392, label %431

392:                                              ; preds = %390
  %393 = add nsw i64 %.7762919, -1
  store i64 %393, ptr %14, align 8, !tbaa !5
  %394 = load <2 x float>, ptr %277, align 4, !tbaa !9
  %395 = fneg <2 x float> %394
  store <2 x float> %395, ptr %17, align 8, !tbaa !9
  %396 = load float, ptr %21, align 4, !tbaa !9
  %397 = insertelement <2 x float> poison, float %396, i64 0
  %398 = shufflevector <2 x float> %397, <2 x float> poison, <2 x i32> zeroinitializer
  %399 = fmul <2 x float> %398, %395
  store <2 x float> %399, ptr %16, align 8, !tbaa !9
  %400 = mul nsw i64 %.7762919, %25
  %gep915 = getelementptr %struct.complex, ptr %invariant.gep914, i64 %400
  %401 = call i32 @f2c_caxpy(ptr noundef nonnull %14, ptr noundef nonnull %16, ptr noundef %gep915, ptr noundef nonnull @c__1, ptr noundef nonnull %7, ptr noundef nonnull @c__1) #6
  store i64 %393, ptr %14, align 8, !tbaa !5
  %402 = call i64 @f2c_icamax(ptr noundef nonnull %14, ptr noundef nonnull %7, ptr noundef nonnull @c__1) #6
  br label %.sink.split1063

403:                                              ; preds = %389
  %404 = load i64, ptr %4, align 8, !tbaa !5
  %405 = icmp slt i64 %.7762919, %404
  br i1 %405, label %406, label %431

406:                                              ; preds = %403
  %407 = sub nsw i64 %404, %.7762919
  store i64 %407, ptr %14, align 8, !tbaa !5
  %408 = load <2 x float>, ptr %277, align 4, !tbaa !9
  %409 = fneg <2 x float> %408
  store <2 x float> %409, ptr %17, align 8, !tbaa !9
  %410 = load float, ptr %21, align 4, !tbaa !9
  %411 = insertelement <2 x float> poison, float %410, i64 0
  %412 = shufflevector <2 x float> %411, <2 x float> poison, <2 x i32> zeroinitializer
  %413 = fmul <2 x float> %412, %409
  store <2 x float> %413, ptr %16, align 8, !tbaa !9
  %414 = mul nsw i64 %.7762919, %25
  %gep917 = getelementptr %struct.complex, ptr %invariant.gep914, i64 %.7762919
  %415 = getelementptr %struct.complex, ptr %gep917, i64 %414
  %416 = getelementptr %struct.complex, ptr %7, i64 %.7762919
  %417 = call i32 @f2c_caxpy(ptr noundef nonnull %14, ptr noundef nonnull %16, ptr noundef %415, ptr noundef nonnull @c__1, ptr noundef %416, ptr noundef nonnull @c__1) #6
  %418 = load i64, ptr %4, align 8, !tbaa !5
  %419 = sub nsw i64 %418, %.7762919
  store i64 %419, ptr %14, align 8, !tbaa !5
  %420 = call i64 @f2c_icamax(ptr noundef nonnull %14, ptr noundef %416, ptr noundef nonnull @c__1) #6
  %421 = add nsw i64 %420, %.7762919
  br label %.sink.split1063

.sink.split1063:                                  ; preds = %406, %392
  %.pn = phi i64 [ %402, %392 ], [ %421, %406 ]
  store i64 %.pn, ptr %14, align 8, !tbaa !5
  %.sink1072 = getelementptr inbounds %struct.complex, ptr %28, i64 %.pn
  %.sink1077 = load float, ptr %.sink1072, align 4, !tbaa !14
  store float %.sink1077, ptr %15, align 4, !tbaa !9
  %422 = call double @r_imag(ptr noundef nonnull %.sink1072) #6
  %423 = fptrunc double %422 to float
  %424 = insertelement <2 x float> poison, float %.sink1077, i64 0
  %425 = insertelement <2 x float> %424, float %423, i64 1
  %426 = fcmp oge <2 x float> %425, zeroinitializer
  %427 = fneg <2 x float> %425
  %428 = select <2 x i1> %426, <2 x float> %425, <2 x float> %427
  %shift1111 = shufflevector <2 x float> %428, <2 x float> poison, <2 x i32> <i32 1, i32 poison>
  %429 = fadd <2 x float> %428, %shift1111
  %430 = extractelement <2 x float> %429, i64 0
  br label %431

431:                                              ; preds = %.sink.split1063, %390, %403
  %.6 = phi float [ %.5746851, %390 ], [ %.5746851, %403 ], [ %430, %.sink.split1063 ]
  %432 = load i64, ptr %13, align 8, !tbaa !5
  %433 = add nsw i64 %432, %.7762919
  %434 = icmp slt i64 %432, 0
  %435 = icmp sge i64 %433, %251
  %436 = icmp sle i64 %433, %251
  %.in835 = select i1 %434, i1 %435, i1 %436
  br i1 %.in835, label %276, label %.loopexit855, !llvm.loop !22

437:                                              ; preds = %268
  %438 = call i64 @lsame_(ptr noundef %1, ptr noundef nonnull @.str.3) #6
  %.not822 = icmp eq i64 %438, 0
  %invariant.gep985 = getelementptr i8, ptr %27, i64 8
  %439 = icmp slt i64 %250, 0
  %440 = icmp sge i64 %.2, %251
  %441 = icmp sle i64 %.2, %251
  %.in823989 = select i1 %439, i1 %440, i1 %441
  br i1 %.not822, label %679, label %442

442:                                              ; preds = %437
  store i64 %251, ptr %13, align 8, !tbaa !5
  store i64 %250, ptr %12, align 8, !tbaa !5
  br i1 %.in823989, label %.lr.ph959, label %.loopexit855

.lr.ph959:                                        ; preds = %442
  %443 = getelementptr inbounds i8, ptr %22, i64 4
  %444 = add i64 %25, 1
  %445 = getelementptr inbounds i8, ptr %16, i64 4
  %446 = getelementptr inbounds i8, ptr %20, i64 4
  br label %447

447:                                              ; preds = %.lr.ph959, %662
  %.7957 = phi float [ %.1742, %.lr.ph959 ], [ %674, %662 ]
  %.8763955 = phi i64 [ %.2, %.lr.ph959 ], [ %675, %662 ]
  store i64 %.8763955, ptr %14, align 8, !tbaa !5
  %448 = getelementptr inbounds %struct.complex, ptr %28, i64 %.8763955
  %449 = load float, ptr %448, align 4, !tbaa !14
  store float %449, ptr %15, align 4, !tbaa !9
  %450 = call double @r_imag(ptr noundef nonnull %448) #6
  %451 = fptrunc double %450 to float
  %452 = insertelement <2 x float> poison, float %449, i64 0
  %453 = insertelement <2 x float> %452, float %451, i64 1
  %454 = fcmp oge <2 x float> %453, zeroinitializer
  %455 = fneg <2 x float> %453
  %456 = select <2 x i1> %454, <2 x float> %453, <2 x float> %455
  %shift1112 = shufflevector <2 x float> %456, <2 x float> poison, <2 x i32> <i32 1, i32 poison>
  %457 = fadd <2 x float> %456, %shift1112
  %458 = extractelement <2 x float> %457, i64 0
  %459 = load float, ptr %21, align 4, !tbaa !9
  store float %459, ptr %22, align 8, !tbaa !14
  store float 0.000000e+00, ptr %443, align 4, !tbaa !21
  %460 = fcmp oge float %.7957, 1.000000e+00
  %461 = select i1 %460, float %.7957, float 1.000000e+00
  %462 = fdiv float 1.000000e+00, %461
  store float %462, ptr %19, align 4, !tbaa !9
  %463 = getelementptr inbounds float, ptr %29, i64 %.8763955
  %464 = load float, ptr %463, align 4, !tbaa !9
  %465 = load float, ptr %23, align 4, !tbaa !9
  %466 = fsub float %465, %458
  %467 = fmul float %462, %466
  %468 = fcmp ogt float %464, %467
  br i1 %468, label %469, label %506

469:                                              ; preds = %447
  %470 = fmul float %462, 5.000000e-01
  store float %470, ptr %19, align 4, !tbaa !9
  %471 = insertelement <2 x float> <float poison, float 0.000000e+00>, float %459, i64 0
  br i1 %.not807, label %478, label %472

472:                                              ; preds = %469
  %473 = mul i64 %.8763955, %444
  store i64 %473, ptr %14, align 8, !tbaa !5
  %474 = getelementptr inbounds %struct.complex, ptr %27, i64 %473
  %475 = load <2 x float>, ptr %474, align 4, !tbaa !9
  %476 = shufflevector <2 x float> %471, <2 x float> poison, <2 x i32> zeroinitializer
  %477 = fmul <2 x float> %476, %475
  store <2 x float> %477, ptr %16, align 8, !tbaa !9
  br label %478

478:                                              ; preds = %469, %472
  %479 = phi <2 x float> [ %477, %472 ], [ %471, %469 ]
  store <2 x float> %479, ptr %20, align 8, !tbaa !9
  %480 = extractelement <2 x float> %479, i64 0
  %481 = fcmp oge float %480, 0.000000e+00
  %482 = fneg float %480
  %483 = select i1 %481, float %480, float %482
  %484 = call double @r_imag(ptr noundef nonnull %20) #6
  %485 = fptrunc double %484 to float
  %486 = fcmp oge float %485, 0.000000e+00
  %487 = fneg float %485
  %488 = select i1 %486, float %485, float %487
  %489 = fadd float %483, %488
  %490 = fcmp ogt float %489, 1.000000e+00
  br i1 %490, label %491, label %497

491:                                              ; preds = %478
  store float 1.000000e+00, ptr %15, align 4, !tbaa !9
  %492 = load float, ptr %19, align 4, !tbaa !9
  %493 = fmul float %489, %492
  %494 = fcmp oge float %493, 1.000000e+00
  %495 = select i1 %494, float 1.000000e+00, float %493
  store float %495, ptr %19, align 4, !tbaa !9
  call void @cladiv_(ptr noundef nonnull %16, ptr noundef nonnull %22, ptr noundef nonnull %20) #6
  %496 = load <2 x float>, ptr %16, align 8, !tbaa !9
  store <2 x float> %496, ptr %22, align 8, !tbaa !9
  br label %497

497:                                              ; preds = %491, %478
  %498 = load float, ptr %19, align 4, !tbaa !9
  %499 = fcmp olt float %498, 1.000000e+00
  br i1 %499, label %500, label %506

500:                                              ; preds = %497
  %501 = call i32 @f2c_csscal(ptr noundef nonnull %4, ptr noundef nonnull %19, ptr noundef nonnull %7, ptr noundef nonnull @c__1) #6
  %502 = load float, ptr %19, align 4, !tbaa !9
  %503 = load float, ptr %8, align 4, !tbaa !9
  %504 = fmul float %502, %503
  store float %504, ptr %8, align 4, !tbaa !9
  %505 = fmul float %.7957, %502
  br label %506

506:                                              ; preds = %497, %500, %447
  %.8 = phi float [ %505, %500 ], [ %.7957, %497 ], [ %.7957, %447 ]
  %507 = load float, ptr %22, align 8, !tbaa !14
  %508 = fcmp oeq float %507, 1.000000e+00
  %509 = load float, ptr %443, align 4
  %510 = fcmp oeq float %509, 0.000000e+00
  %or.cond = select i1 %508, i1 %510, i1 false
  br i1 %or.cond, label %511, label %525

511:                                              ; preds = %506
  br i1 %.not.not.not, label %516, label %512

512:                                              ; preds = %511
  %513 = add nsw i64 %.8763955, -1
  store i64 %513, ptr %14, align 8, !tbaa !5
  %514 = mul nsw i64 %.8763955, %25
  %gep951 = getelementptr %struct.complex, ptr %invariant.gep985, i64 %514
  call void @f2c_cdotu(ptr noundef nonnull %16, ptr noundef nonnull %14, ptr noundef %gep951, ptr noundef nonnull @c__1, ptr noundef nonnull %7, ptr noundef nonnull @c__1) #6
  %515 = load <2 x float>, ptr %16, align 8, !tbaa !9
  br label %.loopexit857

516:                                              ; preds = %511
  %517 = load i64, ptr %4, align 8, !tbaa !5
  %518 = icmp slt i64 %.8763955, %517
  br i1 %518, label %519, label %.loopexit857

519:                                              ; preds = %516
  %520 = sub nsw i64 %517, %.8763955
  store i64 %520, ptr %14, align 8, !tbaa !5
  %521 = mul nsw i64 %.8763955, %25
  %gep953 = getelementptr %struct.complex, ptr %invariant.gep985, i64 %.8763955
  %522 = getelementptr %struct.complex, ptr %gep953, i64 %521
  %523 = getelementptr %struct.complex, ptr %7, i64 %.8763955
  call void @f2c_cdotu(ptr noundef nonnull %16, ptr noundef nonnull %14, ptr noundef %522, ptr noundef nonnull @c__1, ptr noundef %523, ptr noundef nonnull @c__1) #6
  %524 = load <2 x float>, ptr %16, align 8, !tbaa !9
  br label %.loopexit857

525:                                              ; preds = %506
  br i1 %.not.not.not, label %550, label %526

526:                                              ; preds = %525
  %.not832.not923 = icmp sgt i64 %.8763955, 1
  br i1 %.not832.not923, label %.lr.ph928, label %.loopexit857

.lr.ph928:                                        ; preds = %526
  %527 = mul nsw i64 %.8763955, %25
  %invariant.gep931 = getelementptr %struct.complex, ptr %27, i64 %527
  br label %528

528:                                              ; preds = %.lr.ph928, %528
  %.1766924 = phi i64 [ 1, %.lr.ph928 ], [ %549, %528 ]
  %529 = phi <2 x float> [ zeroinitializer, %.lr.ph928 ], [ %548, %528 ]
  %gep932 = getelementptr %struct.complex, ptr %invariant.gep931, i64 %.1766924
  %530 = load float, ptr %gep932, align 4, !tbaa !14
  %531 = getelementptr inbounds i8, ptr %gep932, i64 4
  %532 = load float, ptr %531, align 4, !tbaa !21
  %533 = fneg float %532
  %534 = fmul float %509, %533
  %535 = call float @llvm.fmuladd.f32(float %530, float %507, float %534)
  %536 = fmul float %507, %532
  %537 = call float @llvm.fmuladd.f32(float %530, float %509, float %536)
  %538 = getelementptr inbounds %struct.complex, ptr %28, i64 %.1766924
  %539 = fneg float %537
  %540 = load <2 x float>, ptr %538, align 4, !tbaa !9
  %541 = insertelement <2 x float> poison, float %537, i64 0
  %542 = insertelement <2 x float> %541, float %539, i64 1
  %543 = fmul <2 x float> %540, %542
  %544 = shufflevector <2 x float> %543, <2 x float> poison, <2 x i32> <i32 1, i32 0>
  %545 = insertelement <2 x float> poison, float %535, i64 0
  %546 = shufflevector <2 x float> %545, <2 x float> poison, <2 x i32> zeroinitializer
  %547 = call <2 x float> @llvm.fmuladd.v2f32(<2 x float> %546, <2 x float> %540, <2 x float> %544)
  %548 = fadd <2 x float> %529, %547
  %549 = add nuw nsw i64 %.1766924, 1
  %exitcond.not = icmp eq i64 %549, %.8763955
  br i1 %exitcond.not, label %..loopexit857_crit_edge, label %528, !llvm.loop !23

550:                                              ; preds = %525
  %551 = load i64, ptr %4, align 8, !tbaa !5
  %552 = icmp slt i64 %.8763955, %551
  br i1 %552, label %553, label %.loopexit857

553:                                              ; preds = %550
  %554 = mul nsw i64 %.8763955, %25
  %invariant.gep939 = getelementptr %struct.complex, ptr %27, i64 %554
  br label %555

555:                                              ; preds = %553, %555
  %.2767.in936 = phi i64 [ %.8763955, %553 ], [ %.2767, %555 ]
  %556 = phi <2 x float> [ zeroinitializer, %553 ], [ %575, %555 ]
  %.2767 = add nsw i64 %.2767.in936, 1
  %gep940 = getelementptr %struct.complex, ptr %invariant.gep939, i64 %.2767
  %557 = load float, ptr %gep940, align 4, !tbaa !14
  %558 = getelementptr inbounds i8, ptr %gep940, i64 4
  %559 = load float, ptr %558, align 4, !tbaa !21
  %560 = fneg float %559
  %561 = fmul float %509, %560
  %562 = call float @llvm.fmuladd.f32(float %557, float %507, float %561)
  %563 = fmul float %507, %559
  %564 = call float @llvm.fmuladd.f32(float %557, float %509, float %563)
  %565 = getelementptr %struct.complex, ptr %7, i64 %.2767.in936
  %566 = fneg float %564
  %567 = load <2 x float>, ptr %565, align 4, !tbaa !9
  %568 = insertelement <2 x float> poison, float %564, i64 0
  %569 = insertelement <2 x float> %568, float %566, i64 1
  %570 = fmul <2 x float> %567, %569
  %571 = shufflevector <2 x float> %570, <2 x float> poison, <2 x i32> <i32 1, i32 0>
  %572 = insertelement <2 x float> poison, float %562, i64 0
  %573 = shufflevector <2 x float> %572, <2 x float> poison, <2 x i32> zeroinitializer
  %574 = call <2 x float> @llvm.fmuladd.v2f32(<2 x float> %573, <2 x float> %567, <2 x float> %571)
  %575 = fadd <2 x float> %556, %574
  %exitcond1017.not = icmp eq i64 %.2767, %551
  br i1 %exitcond1017.not, label %.loopexit856, label %555, !llvm.loop !24

.loopexit856:                                     ; preds = %555
  store <2 x float> %574, ptr %17, align 8, !tbaa !9
  br label %.loopexit857

..loopexit857_crit_edge:                          ; preds = %528
  store <2 x float> %547, ptr %17, align 8, !tbaa !9
  br label %.loopexit857

.loopexit857:                                     ; preds = %526, %..loopexit857_crit_edge, %.loopexit856, %550, %512, %519, %516
  %576 = phi <2 x float> [ %515, %512 ], [ %524, %519 ], [ zeroinitializer, %516 ], [ zeroinitializer, %550 ], [ %575, %.loopexit856 ], [ %548, %..loopexit857_crit_edge ], [ zeroinitializer, %526 ]
  %577 = load float, ptr %21, align 4, !tbaa !9
  store float %577, ptr %16, align 8, !tbaa !14
  store float 0.000000e+00, ptr %445, align 4, !tbaa !21
  %578 = load float, ptr %22, align 8, !tbaa !14
  %579 = fcmp oeq float %578, %577
  %580 = load float, ptr %443, align 4
  %581 = fcmp oeq float %580, 0.000000e+00
  %or.cond843 = select i1 %579, i1 %581, i1 false
  br i1 %or.cond843, label %582, label %657

582:                                              ; preds = %.loopexit857
  %583 = load <2 x float>, ptr %448, align 4, !tbaa !9
  %584 = fsub <2 x float> %583, %576
  store <2 x float> %584, ptr %16, align 8, !tbaa !9
  store <2 x float> %584, ptr %448, align 4, !tbaa !9
  store i64 %.8763955, ptr %14, align 8, !tbaa !5
  %585 = extractelement <2 x float> %584, i64 0
  %586 = fcmp oge float %585, 0.000000e+00
  %587 = fneg float %585
  %588 = select i1 %586, float %585, float %587
  %589 = call double @r_imag(ptr noundef nonnull %448) #6
  %590 = fptrunc double %589 to float
  %591 = fcmp oge float %590, 0.000000e+00
  %592 = fneg float %590
  %593 = select i1 %591, float %590, float %592
  %594 = fadd float %588, %593
  br i1 %.not807, label %604, label %595

595:                                              ; preds = %582
  %596 = mul i64 %.8763955, %444
  store i64 %596, ptr %14, align 8, !tbaa !5
  %597 = load float, ptr %21, align 4, !tbaa !9
  %598 = getelementptr inbounds %struct.complex, ptr %27, i64 %596
  %599 = load <2 x float>, ptr %598, align 4, !tbaa !9
  %600 = insertelement <2 x float> poison, float %597, i64 0
  %601 = shufflevector <2 x float> %600, <2 x float> poison, <2 x i32> zeroinitializer
  %602 = fmul <2 x float> %601, %599
  store <2 x float> %602, ptr %16, align 8, !tbaa !9
  store <2 x float> %602, ptr %20, align 8, !tbaa !9
  %603 = extractelement <2 x float> %602, i64 0
  br label %607

604:                                              ; preds = %582
  %605 = load float, ptr %21, align 4, !tbaa !9
  store float %605, ptr %20, align 8, !tbaa !14
  store float 0.000000e+00, ptr %446, align 4, !tbaa !21
  %606 = fcmp oeq float %605, 1.000000e+00
  br i1 %606, label %662, label %607

607:                                              ; preds = %604, %595
  %608 = phi float [ %605, %604 ], [ %603, %595 ]
  store float %608, ptr %15, align 4, !tbaa !9
  %609 = call double @r_imag(ptr noundef nonnull %20) #6
  %610 = fptrunc double %609 to float
  %611 = insertelement <2 x float> poison, float %608, i64 0
  %612 = insertelement <2 x float> %611, float %610, i64 1
  %613 = fcmp oge <2 x float> %612, zeroinitializer
  %614 = fneg <2 x float> %612
  %615 = select <2 x i1> %613, <2 x float> %612, <2 x float> %614
  %shift1113 = shufflevector <2 x float> %615, <2 x float> poison, <2 x i32> <i32 1, i32 poison>
  %616 = fadd <2 x float> %615, %shift1113
  %617 = extractelement <2 x float> %616, i64 0
  %618 = load float, ptr %24, align 4, !tbaa !9
  %619 = fcmp ogt float %617, %618
  br i1 %619, label %620, label %637

620:                                              ; preds = %607
  %621 = fcmp olt float %617, 1.000000e+00
  br i1 %621, label %622, label %633

622:                                              ; preds = %620
  %623 = load float, ptr %23, align 4, !tbaa !9
  %624 = fmul float %617, %623
  %625 = fcmp ogt float %594, %624
  br i1 %625, label %626, label %633

626:                                              ; preds = %622
  %627 = fdiv float 1.000000e+00, %594
  store float %627, ptr %19, align 4, !tbaa !9
  %628 = call i32 @f2c_csscal(ptr noundef nonnull %4, ptr noundef nonnull %19, ptr noundef nonnull %7, ptr noundef nonnull @c__1) #6
  %629 = load float, ptr %19, align 4, !tbaa !9
  %630 = load float, ptr %8, align 4, !tbaa !9
  %631 = fmul float %629, %630
  store float %631, ptr %8, align 4, !tbaa !9
  %632 = fmul float %.8, %629
  br label %633

633:                                              ; preds = %622, %626, %620
  %.9 = phi float [ %632, %626 ], [ %.8, %622 ], [ %.8, %620 ]
  store i64 %.8763955, ptr %14, align 8, !tbaa !5
  call void @cladiv_(ptr noundef nonnull %16, ptr noundef nonnull %448, ptr noundef nonnull %20) #6
  %634 = load i64, ptr %14, align 8, !tbaa !5
  %635 = getelementptr inbounds %struct.complex, ptr %28, i64 %634
  %636 = load <2 x float>, ptr %16, align 8, !tbaa !9
  store <2 x float> %636, ptr %635, align 4, !tbaa !9
  br label %662

637:                                              ; preds = %607
  %638 = fcmp ogt float %617, 0.000000e+00
  br i1 %638, label %639, label %654

639:                                              ; preds = %637
  %640 = load float, ptr %23, align 4, !tbaa !9
  %641 = fmul float %617, %640
  %642 = fcmp ogt float %594, %641
  br i1 %642, label %643, label %650

643:                                              ; preds = %639
  %644 = fdiv float %641, %594
  store float %644, ptr %19, align 4, !tbaa !9
  %645 = call i32 @f2c_csscal(ptr noundef nonnull %4, ptr noundef nonnull %19, ptr noundef nonnull %7, ptr noundef nonnull @c__1) #6
  %646 = load float, ptr %19, align 4, !tbaa !9
  %647 = load float, ptr %8, align 4, !tbaa !9
  %648 = fmul float %646, %647
  store float %648, ptr %8, align 4, !tbaa !9
  %649 = fmul float %.8, %646
  br label %650

650:                                              ; preds = %643, %639
  %.10 = phi float [ %649, %643 ], [ %.8, %639 ]
  store i64 %.8763955, ptr %14, align 8, !tbaa !5
  call void @cladiv_(ptr noundef nonnull %16, ptr noundef nonnull %448, ptr noundef nonnull %20) #6
  %651 = load i64, ptr %14, align 8, !tbaa !5
  %652 = getelementptr inbounds %struct.complex, ptr %28, i64 %651
  %653 = load <2 x float>, ptr %16, align 8, !tbaa !9
  store <2 x float> %653, ptr %652, align 4, !tbaa !9
  br label %662

654:                                              ; preds = %637
  %655 = load i64, ptr %4, align 8, !tbaa !5
  store i64 %655, ptr %14, align 8, !tbaa !5
  %.not834945 = icmp slt i64 %655, 1
  br i1 %.not834945, label %._crit_edge949, label %.lr.ph948.preheader

.lr.ph948.preheader:                              ; preds = %654
  %656 = shl nuw i64 %655, 3
  call void @llvm.memset.p0.i64(ptr nonnull align 4 %7, i8 0, i64 %656, i1 false), !tbaa !9
  br label %._crit_edge949

._crit_edge949:                                   ; preds = %.lr.ph948.preheader, %654
  store <2 x float> <float 1.000000e+00, float 0.000000e+00>, ptr %448, align 4, !tbaa !9
  store float 0.000000e+00, ptr %8, align 4, !tbaa !9
  br label %662

657:                                              ; preds = %.loopexit857
  store i64 %.8763955, ptr %14, align 8, !tbaa !5
  call void @cladiv_(ptr noundef nonnull %17, ptr noundef nonnull %448, ptr noundef nonnull %20) #6
  %658 = load <2 x float>, ptr %17, align 8, !tbaa !9
  %659 = fsub <2 x float> %658, %576
  store <2 x float> %659, ptr %16, align 8, !tbaa !9
  %660 = load i64, ptr %14, align 8, !tbaa !5
  %661 = getelementptr inbounds %struct.complex, ptr %28, i64 %660
  store <2 x float> %659, ptr %661, align 4, !tbaa !9
  br label %662

662:                                              ; preds = %604, %650, %._crit_edge949, %633, %657
  %.11 = phi float [ %.9, %633 ], [ %.10, %650 ], [ 0.000000e+00, %._crit_edge949 ], [ %.8, %604 ], [ %.8, %657 ]
  store i64 %.8763955, ptr %14, align 8, !tbaa !5
  %663 = load float, ptr %448, align 4, !tbaa !14
  store float %663, ptr %15, align 4, !tbaa !9
  %664 = call double @r_imag(ptr noundef nonnull %448) #6
  %665 = fptrunc double %664 to float
  %666 = insertelement <2 x float> poison, float %663, i64 0
  %667 = insertelement <2 x float> %666, float %665, i64 1
  %668 = fcmp oge <2 x float> %667, zeroinitializer
  %669 = fneg <2 x float> %667
  %670 = select <2 x i1> %668, <2 x float> %667, <2 x float> %669
  %shift1114 = shufflevector <2 x float> %670, <2 x float> poison, <2 x i32> <i32 1, i32 poison>
  %671 = fadd <2 x float> %670, %shift1114
  %672 = extractelement <2 x float> %671, i64 0
  %673 = fcmp oge float %.11, %672
  %674 = select i1 %673, float %.11, float %672
  %675 = add nsw i64 %250, %.8763955
  %676 = load i64, ptr %13, align 8
  %677 = icmp sge i64 %675, %676
  %678 = icmp sle i64 %675, %676
  %.in829 = select i1 %439, i1 %677, i1 %678
  br i1 %.in829, label %447, label %.loopexit855, !llvm.loop !25

679:                                              ; preds = %437
  store i64 %251, ptr %12, align 8, !tbaa !5
  store i64 %250, ptr %13, align 8, !tbaa !5
  br i1 %.in823989, label %.lr.ph994, label %.loopexit855

.lr.ph994:                                        ; preds = %679
  %680 = getelementptr inbounds i8, ptr %22, i64 4
  %681 = add i64 %25, 1
  %682 = getelementptr inbounds i8, ptr %16, i64 4
  %683 = getelementptr inbounds i8, ptr %20, i64 4
  %684 = getelementptr inbounds i8, ptr %18, i64 4
  br label %685

685:                                              ; preds = %.lr.ph994, %906
  %.12992 = phi float [ %.1742, %.lr.ph994 ], [ %918, %906 ]
  %.9764990 = phi i64 [ %.2, %.lr.ph994 ], [ %920, %906 ]
  store i64 %.9764990, ptr %14, align 8, !tbaa !5
  %686 = getelementptr inbounds %struct.complex, ptr %28, i64 %.9764990
  %687 = load float, ptr %686, align 4, !tbaa !14
  store float %687, ptr %15, align 4, !tbaa !9
  %688 = call double @r_imag(ptr noundef nonnull %686) #6
  %689 = fptrunc double %688 to float
  %690 = insertelement <2 x float> poison, float %687, i64 0
  %691 = insertelement <2 x float> %690, float %689, i64 1
  %692 = fcmp oge <2 x float> %691, zeroinitializer
  %693 = fneg <2 x float> %691
  %694 = select <2 x i1> %692, <2 x float> %691, <2 x float> %693
  %shift1115 = shufflevector <2 x float> %694, <2 x float> poison, <2 x i32> <i32 1, i32 poison>
  %695 = fadd <2 x float> %694, %shift1115
  %696 = extractelement <2 x float> %695, i64 0
  %697 = load float, ptr %21, align 4, !tbaa !9
  store float %697, ptr %22, align 8, !tbaa !14
  store float 0.000000e+00, ptr %680, align 4, !tbaa !21
  %698 = fcmp oge float %.12992, 1.000000e+00
  %699 = select i1 %698, float %.12992, float 1.000000e+00
  %700 = fdiv float 1.000000e+00, %699
  store float %700, ptr %19, align 4, !tbaa !9
  %701 = getelementptr inbounds float, ptr %29, i64 %.9764990
  %702 = load float, ptr %701, align 4, !tbaa !9
  %703 = load float, ptr %23, align 4, !tbaa !9
  %704 = fsub float %703, %696
  %705 = fmul float %700, %704
  %706 = fcmp ogt float %702, %705
  br i1 %706, label %707, label %746

707:                                              ; preds = %685
  %708 = fmul float %700, 5.000000e-01
  store float %708, ptr %19, align 4, !tbaa !9
  %709 = insertelement <2 x float> <float poison, float 0.000000e+00>, float %697, i64 0
  br i1 %.not807, label %718, label %710

710:                                              ; preds = %707
  %711 = mul i64 %.9764990, %681
  %712 = getelementptr inbounds %struct.complex, ptr %27, i64 %711
  call void @r_cnjg(ptr noundef nonnull %17, ptr noundef %712) #6
  %713 = load float, ptr %21, align 4, !tbaa !9
  %714 = load <2 x float>, ptr %17, align 8, !tbaa !9
  %715 = insertelement <2 x float> poison, float %713, i64 0
  %716 = shufflevector <2 x float> %715, <2 x float> poison, <2 x i32> zeroinitializer
  %717 = fmul <2 x float> %716, %714
  store <2 x float> %717, ptr %16, align 8, !tbaa !9
  br label %718

718:                                              ; preds = %707, %710
  %719 = phi <2 x float> [ %717, %710 ], [ %709, %707 ]
  store <2 x float> %719, ptr %20, align 8, !tbaa !9
  %720 = extractelement <2 x float> %719, i64 0
  %721 = fcmp oge float %720, 0.000000e+00
  %722 = fneg float %720
  %723 = select i1 %721, float %720, float %722
  %724 = call double @r_imag(ptr noundef nonnull %20) #6
  %725 = fptrunc double %724 to float
  %726 = fcmp oge float %725, 0.000000e+00
  %727 = fneg float %725
  %728 = select i1 %726, float %725, float %727
  %729 = fadd float %723, %728
  %730 = fcmp ogt float %729, 1.000000e+00
  br i1 %730, label %731, label %737

731:                                              ; preds = %718
  store float 1.000000e+00, ptr %15, align 4, !tbaa !9
  %732 = load float, ptr %19, align 4, !tbaa !9
  %733 = fmul float %729, %732
  %734 = fcmp oge float %733, 1.000000e+00
  %735 = select i1 %734, float 1.000000e+00, float %733
  store float %735, ptr %19, align 4, !tbaa !9
  call void @cladiv_(ptr noundef nonnull %16, ptr noundef nonnull %22, ptr noundef nonnull %20) #6
  %736 = load <2 x float>, ptr %16, align 8, !tbaa !9
  store <2 x float> %736, ptr %22, align 8, !tbaa !9
  br label %737

737:                                              ; preds = %731, %718
  %738 = load float, ptr %19, align 4, !tbaa !9
  %739 = fcmp olt float %738, 1.000000e+00
  br i1 %739, label %740, label %746

740:                                              ; preds = %737
  %741 = call i32 @f2c_csscal(ptr noundef nonnull %4, ptr noundef nonnull %19, ptr noundef nonnull %7, ptr noundef nonnull @c__1) #6
  %742 = load float, ptr %19, align 4, !tbaa !9
  %743 = load float, ptr %8, align 4, !tbaa !9
  %744 = fmul float %742, %743
  store float %744, ptr %8, align 4, !tbaa !9
  %745 = fmul float %.12992, %742
  br label %746

746:                                              ; preds = %737, %740, %685
  %.13 = phi float [ %745, %740 ], [ %.12992, %737 ], [ %.12992, %685 ]
  %747 = load float, ptr %22, align 8, !tbaa !14
  %748 = fcmp oeq float %747, 1.000000e+00
  %749 = load float, ptr %680, align 4
  %750 = fcmp oeq float %749, 0.000000e+00
  %or.cond5 = select i1 %748, i1 %750, i1 false
  br i1 %or.cond5, label %751, label %765

751:                                              ; preds = %746
  br i1 %.not.not.not, label %756, label %752

752:                                              ; preds = %751
  %753 = add nsw i64 %.9764990, -1
  store i64 %753, ptr %14, align 8, !tbaa !5
  %754 = mul nsw i64 %.9764990, %25
  %gep986 = getelementptr %struct.complex, ptr %invariant.gep985, i64 %754
  call void @f2c_cdotc(ptr noundef nonnull %16, ptr noundef nonnull %14, ptr noundef %gep986, ptr noundef nonnull @c__1, ptr noundef nonnull %7, ptr noundef nonnull @c__1) #6
  %755 = load <2 x float>, ptr %16, align 8, !tbaa !9
  br label %.loopexit

756:                                              ; preds = %751
  %757 = load i64, ptr %4, align 8, !tbaa !5
  %758 = icmp slt i64 %.9764990, %757
  br i1 %758, label %759, label %.loopexit

759:                                              ; preds = %756
  %760 = sub nsw i64 %757, %.9764990
  store i64 %760, ptr %14, align 8, !tbaa !5
  %761 = mul nsw i64 %.9764990, %25
  %gep988 = getelementptr %struct.complex, ptr %invariant.gep985, i64 %.9764990
  %762 = getelementptr %struct.complex, ptr %gep988, i64 %761
  %763 = getelementptr %struct.complex, ptr %7, i64 %.9764990
  call void @f2c_cdotc(ptr noundef nonnull %16, ptr noundef nonnull %14, ptr noundef %762, ptr noundef nonnull @c__1, ptr noundef %763, ptr noundef nonnull @c__1) #6
  %764 = load <2 x float>, ptr %16, align 8, !tbaa !9
  br label %.loopexit

765:                                              ; preds = %746
  br i1 %.not.not.not, label %793, label %766

766:                                              ; preds = %765
  %767 = add nsw i64 %.9764990, -1
  store i64 %767, ptr %14, align 8, !tbaa !5
  %.not826960 = icmp slt i64 %.9764990, 2
  br i1 %.not826960, label %.loopexit, label %.lr.ph965

.lr.ph965:                                        ; preds = %766
  %768 = mul nsw i64 %.9764990, %25
  %invariant.gep968 = getelementptr %struct.complex, ptr %27, i64 %768
  br label %769

769:                                              ; preds = %.lr.ph965, %769
  %.4769961 = phi i64 [ 1, %.lr.ph965 ], [ %791, %769 ]
  %770 = phi <2 x float> [ zeroinitializer, %.lr.ph965 ], [ %790, %769 ]
  %gep969 = getelementptr %struct.complex, ptr %invariant.gep968, i64 %.4769961
  call void @r_cnjg(ptr noundef nonnull %18, ptr noundef %gep969) #6
  %771 = load float, ptr %18, align 4, !tbaa !14
  %772 = load float, ptr %22, align 8, !tbaa !14
  %773 = load float, ptr %684, align 4, !tbaa !21
  %774 = load float, ptr %680, align 4, !tbaa !21
  %775 = fneg float %773
  %776 = fmul float %774, %775
  %777 = call float @llvm.fmuladd.f32(float %771, float %772, float %776)
  %778 = fmul float %772, %773
  %779 = call float @llvm.fmuladd.f32(float %771, float %774, float %778)
  %780 = getelementptr inbounds %struct.complex, ptr %28, i64 %.4769961
  %781 = fneg float %779
  %782 = load <2 x float>, ptr %780, align 4, !tbaa !9
  %783 = insertelement <2 x float> poison, float %779, i64 0
  %784 = insertelement <2 x float> %783, float %781, i64 1
  %785 = fmul <2 x float> %782, %784
  %786 = shufflevector <2 x float> %785, <2 x float> poison, <2 x i32> <i32 1, i32 0>
  %787 = insertelement <2 x float> poison, float %777, i64 0
  %788 = shufflevector <2 x float> %787, <2 x float> poison, <2 x i32> zeroinitializer
  %789 = call <2 x float> @llvm.fmuladd.v2f32(<2 x float> %788, <2 x float> %782, <2 x float> %786)
  store <2 x float> %789, ptr %17, align 8, !tbaa !9
  %790 = fadd <2 x float> %770, %789
  store <2 x float> %790, ptr %16, align 8, !tbaa !9
  %791 = add nuw nsw i64 %.4769961, 1
  %792 = load i64, ptr %14, align 8, !tbaa !5
  %.not826.not = icmp slt i64 %.4769961, %792
  br i1 %.not826.not, label %769, label %.loopexit, !llvm.loop !26

793:                                              ; preds = %765
  %794 = load i64, ptr %4, align 8, !tbaa !5
  %795 = icmp slt i64 %.9764990, %794
  br i1 %795, label %.lr.ph975, label %.loopexit

.lr.ph975:                                        ; preds = %793
  store i64 %794, ptr %14, align 8, !tbaa !5
  %796 = mul nsw i64 %.9764990, %25
  %invariant.gep978 = getelementptr %struct.complex, ptr %27, i64 %796
  br label %797

797:                                              ; preds = %.lr.ph975, %797
  %.5770.in971 = phi i64 [ %.9764990, %.lr.ph975 ], [ %.5770, %797 ]
  %798 = phi <2 x float> [ zeroinitializer, %.lr.ph975 ], [ %818, %797 ]
  %.5770 = add nsw i64 %.5770.in971, 1
  %gep979 = getelementptr %struct.complex, ptr %invariant.gep978, i64 %.5770
  call void @r_cnjg(ptr noundef nonnull %18, ptr noundef %gep979) #6
  %799 = load float, ptr %18, align 4, !tbaa !14
  %800 = load float, ptr %22, align 8, !tbaa !14
  %801 = load float, ptr %684, align 4, !tbaa !21
  %802 = load float, ptr %680, align 4, !tbaa !21
  %803 = fneg float %801
  %804 = fmul float %802, %803
  %805 = call float @llvm.fmuladd.f32(float %799, float %800, float %804)
  %806 = fmul float %800, %801
  %807 = call float @llvm.fmuladd.f32(float %799, float %802, float %806)
  %808 = getelementptr %struct.complex, ptr %7, i64 %.5770.in971
  %809 = fneg float %807
  %810 = load <2 x float>, ptr %808, align 4, !tbaa !9
  %811 = insertelement <2 x float> poison, float %807, i64 0
  %812 = insertelement <2 x float> %811, float %809, i64 1
  %813 = fmul <2 x float> %810, %812
  %814 = shufflevector <2 x float> %813, <2 x float> poison, <2 x i32> <i32 1, i32 0>
  %815 = insertelement <2 x float> poison, float %805, i64 0
  %816 = shufflevector <2 x float> %815, <2 x float> poison, <2 x i32> zeroinitializer
  %817 = call <2 x float> @llvm.fmuladd.v2f32(<2 x float> %816, <2 x float> %810, <2 x float> %814)
  store <2 x float> %817, ptr %17, align 8, !tbaa !9
  %818 = fadd <2 x float> %798, %817
  store <2 x float> %818, ptr %16, align 8, !tbaa !9
  %819 = load i64, ptr %14, align 8, !tbaa !5
  %.not825.not = icmp slt i64 %.5770, %819
  br i1 %.not825.not, label %797, label %.loopexit, !llvm.loop !27

.loopexit:                                        ; preds = %769, %797, %766, %793, %752, %759, %756
  %820 = phi <2 x float> [ %755, %752 ], [ %764, %759 ], [ zeroinitializer, %756 ], [ zeroinitializer, %793 ], [ zeroinitializer, %766 ], [ %818, %797 ], [ %790, %769 ]
  %821 = load float, ptr %21, align 4, !tbaa !9
  store float %821, ptr %16, align 8, !tbaa !14
  store float 0.000000e+00, ptr %682, align 4, !tbaa !21
  %822 = load float, ptr %22, align 8, !tbaa !14
  %823 = fcmp oeq float %822, %821
  %824 = load float, ptr %680, align 4
  %825 = fcmp oeq float %824, 0.000000e+00
  %or.cond845 = select i1 %823, i1 %825, i1 false
  br i1 %or.cond845, label %826, label %901

826:                                              ; preds = %.loopexit
  %827 = load <2 x float>, ptr %686, align 4, !tbaa !9
  %828 = fsub <2 x float> %827, %820
  store <2 x float> %828, ptr %16, align 8, !tbaa !9
  store <2 x float> %828, ptr %686, align 4, !tbaa !9
  store i64 %.9764990, ptr %14, align 8, !tbaa !5
  %829 = extractelement <2 x float> %828, i64 0
  %830 = fcmp oge float %829, 0.000000e+00
  %831 = fneg float %829
  %832 = select i1 %830, float %829, float %831
  %833 = call double @r_imag(ptr noundef nonnull %686) #6
  %834 = fptrunc double %833 to float
  %835 = fcmp oge float %834, 0.000000e+00
  %836 = fneg float %834
  %837 = select i1 %835, float %834, float %836
  %838 = fadd float %832, %837
  br i1 %.not807, label %848, label %839

839:                                              ; preds = %826
  %840 = mul i64 %.9764990, %681
  %841 = getelementptr inbounds %struct.complex, ptr %27, i64 %840
  call void @r_cnjg(ptr noundef nonnull %17, ptr noundef %841) #6
  %842 = load float, ptr %21, align 4, !tbaa !9
  %843 = load <2 x float>, ptr %17, align 8, !tbaa !9
  %844 = insertelement <2 x float> poison, float %842, i64 0
  %845 = shufflevector <2 x float> %844, <2 x float> poison, <2 x i32> zeroinitializer
  %846 = fmul <2 x float> %845, %843
  store <2 x float> %846, ptr %16, align 8, !tbaa !9
  store <2 x float> %846, ptr %20, align 8, !tbaa !9
  %847 = extractelement <2 x float> %846, i64 0
  br label %851

848:                                              ; preds = %826
  %849 = load float, ptr %21, align 4, !tbaa !9
  store float %849, ptr %20, align 8, !tbaa !14
  store float 0.000000e+00, ptr %683, align 4, !tbaa !21
  %850 = fcmp oeq float %849, 1.000000e+00
  br i1 %850, label %906, label %851

851:                                              ; preds = %848, %839
  %852 = phi float [ %849, %848 ], [ %847, %839 ]
  store float %852, ptr %15, align 4, !tbaa !9
  %853 = call double @r_imag(ptr noundef nonnull %20) #6
  %854 = fptrunc double %853 to float
  %855 = insertelement <2 x float> poison, float %852, i64 0
  %856 = insertelement <2 x float> %855, float %854, i64 1
  %857 = fcmp oge <2 x float> %856, zeroinitializer
  %858 = fneg <2 x float> %856
  %859 = select <2 x i1> %857, <2 x float> %856, <2 x float> %858
  %shift1116 = shufflevector <2 x float> %859, <2 x float> poison, <2 x i32> <i32 1, i32 poison>
  %860 = fadd <2 x float> %859, %shift1116
  %861 = extractelement <2 x float> %860, i64 0
  %862 = load float, ptr %24, align 4, !tbaa !9
  %863 = fcmp ogt float %861, %862
  br i1 %863, label %864, label %881

864:                                              ; preds = %851
  %865 = fcmp olt float %861, 1.000000e+00
  br i1 %865, label %866, label %877

866:                                              ; preds = %864
  %867 = load float, ptr %23, align 4, !tbaa !9
  %868 = fmul float %861, %867
  %869 = fcmp ogt float %838, %868
  br i1 %869, label %870, label %877

870:                                              ; preds = %866
  %871 = fdiv float 1.000000e+00, %838
  store float %871, ptr %19, align 4, !tbaa !9
  %872 = call i32 @f2c_csscal(ptr noundef nonnull %4, ptr noundef nonnull %19, ptr noundef nonnull %7, ptr noundef nonnull @c__1) #6
  %873 = load float, ptr %19, align 4, !tbaa !9
  %874 = load float, ptr %8, align 4, !tbaa !9
  %875 = fmul float %873, %874
  store float %875, ptr %8, align 4, !tbaa !9
  %876 = fmul float %.13, %873
  br label %877

877:                                              ; preds = %866, %870, %864
  %.14 = phi float [ %876, %870 ], [ %.13, %866 ], [ %.13, %864 ]
  store i64 %.9764990, ptr %14, align 8, !tbaa !5
  call void @cladiv_(ptr noundef nonnull %16, ptr noundef nonnull %686, ptr noundef nonnull %20) #6
  %878 = load i64, ptr %14, align 8, !tbaa !5
  %879 = getelementptr inbounds %struct.complex, ptr %28, i64 %878
  %880 = load <2 x float>, ptr %16, align 8, !tbaa !9
  store <2 x float> %880, ptr %879, align 4, !tbaa !9
  br label %906

881:                                              ; preds = %851
  %882 = fcmp ogt float %861, 0.000000e+00
  br i1 %882, label %883, label %898

883:                                              ; preds = %881
  %884 = load float, ptr %23, align 4, !tbaa !9
  %885 = fmul float %861, %884
  %886 = fcmp ogt float %838, %885
  br i1 %886, label %887, label %894

887:                                              ; preds = %883
  %888 = fdiv float %885, %838
  store float %888, ptr %19, align 4, !tbaa !9
  %889 = call i32 @f2c_csscal(ptr noundef nonnull %4, ptr noundef nonnull %19, ptr noundef nonnull %7, ptr noundef nonnull @c__1) #6
  %890 = load float, ptr %19, align 4, !tbaa !9
  %891 = load float, ptr %8, align 4, !tbaa !9
  %892 = fmul float %890, %891
  store float %892, ptr %8, align 4, !tbaa !9
  %893 = fmul float %.13, %890
  br label %894

894:                                              ; preds = %887, %883
  %.15 = phi float [ %893, %887 ], [ %.13, %883 ]
  store i64 %.9764990, ptr %14, align 8, !tbaa !5
  call void @cladiv_(ptr noundef nonnull %16, ptr noundef nonnull %686, ptr noundef nonnull %20) #6
  %895 = load i64, ptr %14, align 8, !tbaa !5
  %896 = getelementptr inbounds %struct.complex, ptr %28, i64 %895
  %897 = load <2 x float>, ptr %16, align 8, !tbaa !9
  store <2 x float> %897, ptr %896, align 4, !tbaa !9
  br label %906

898:                                              ; preds = %881
  %899 = load i64, ptr %4, align 8, !tbaa !5
  store i64 %899, ptr %14, align 8, !tbaa !5
  %.not828980 = icmp slt i64 %899, 1
  br i1 %.not828980, label %._crit_edge984, label %.lr.ph983.preheader

.lr.ph983.preheader:                              ; preds = %898
  %900 = shl nuw i64 %899, 3
  call void @llvm.memset.p0.i64(ptr nonnull align 4 %7, i8 0, i64 %900, i1 false), !tbaa !9
  br label %._crit_edge984

._crit_edge984:                                   ; preds = %.lr.ph983.preheader, %898
  store <2 x float> <float 1.000000e+00, float 0.000000e+00>, ptr %686, align 4, !tbaa !9
  store float 0.000000e+00, ptr %8, align 4, !tbaa !9
  br label %906

901:                                              ; preds = %.loopexit
  store i64 %.9764990, ptr %14, align 8, !tbaa !5
  call void @cladiv_(ptr noundef nonnull %17, ptr noundef nonnull %686, ptr noundef nonnull %20) #6
  %902 = load <2 x float>, ptr %17, align 8, !tbaa !9
  %903 = fsub <2 x float> %902, %820
  store <2 x float> %903, ptr %16, align 8, !tbaa !9
  %904 = load i64, ptr %14, align 8, !tbaa !5
  %905 = getelementptr inbounds %struct.complex, ptr %28, i64 %904
  store <2 x float> %903, ptr %905, align 4, !tbaa !9
  br label %906

906:                                              ; preds = %848, %894, %._crit_edge984, %877, %901
  %.16 = phi float [ %.14, %877 ], [ %.15, %894 ], [ 0.000000e+00, %._crit_edge984 ], [ %.13, %848 ], [ %.13, %901 ]
  store i64 %.9764990, ptr %14, align 8, !tbaa !5
  %907 = load float, ptr %686, align 4, !tbaa !14
  store float %907, ptr %15, align 4, !tbaa !9
  %908 = call double @r_imag(ptr noundef nonnull %686) #6
  %909 = fptrunc double %908 to float
  %910 = insertelement <2 x float> poison, float %907, i64 0
  %911 = insertelement <2 x float> %910, float %909, i64 1
  %912 = fcmp oge <2 x float> %911, zeroinitializer
  %913 = fneg <2 x float> %911
  %914 = select <2 x i1> %912, <2 x float> %911, <2 x float> %913
  %shift1117 = shufflevector <2 x float> %914, <2 x float> poison, <2 x i32> <i32 1, i32 poison>
  %915 = fadd <2 x float> %914, %shift1117
  %916 = extractelement <2 x float> %915, i64 0
  %917 = fcmp oge float %.16, %916
  %918 = select i1 %917, float %.16, float %916
  %919 = load i64, ptr %13, align 8, !tbaa !5
  %920 = add nsw i64 %919, %.9764990
  %921 = icmp slt i64 %919, 0
  %922 = icmp sge i64 %920, %251
  %923 = icmp sle i64 %920, %251
  %.in823 = select i1 %921, i1 %922, i1 %923
  br i1 %.in823, label %685, label %.loopexit855, !llvm.loop !28

.loopexit855:                                     ; preds = %431, %662, %906, %269, %442, %679
  %924 = load float, ptr %21, align 4, !tbaa !9
  %925 = load float, ptr %8, align 4, !tbaa !9
  %926 = fdiv float %925, %924
  store float %926, ptr %8, align 4, !tbaa !9
  br label %927

927:                                              ; preds = %.loopexit855, %256
  %928 = phi float [ %924, %.loopexit855 ], [ %.pr853, %256 ]
  %929 = fcmp une float %928, 1.000000e+00
  br i1 %929, label %930, label %933

930:                                              ; preds = %927
  %931 = fdiv float 1.000000e+00, %928
  store float %931, ptr %15, align 4, !tbaa !9
  %932 = call i32 @f2c_sscal(ptr noundef nonnull %4, ptr noundef nonnull %15, ptr noundef %9, ptr noundef nonnull @c__1) #6
  br label %933

933:                                              ; preds = %927, %930, %57, %.thread
  call void @llvm.lifetime.end.p0(i64 4, ptr nonnull %24) #6
  call void @llvm.lifetime.end.p0(i64 4, ptr nonnull %23) #6
  call void @llvm.lifetime.end.p0(i64 8, ptr nonnull %22) #6
  call void @llvm.lifetime.end.p0(i64 4, ptr nonnull %21) #6
  call void @llvm.lifetime.end.p0(i64 8, ptr nonnull %20) #6
  call void @llvm.lifetime.end.p0(i64 4, ptr nonnull %19) #6
  call void @llvm.lifetime.end.p0(i64 8, ptr nonnull %18) #6
  call void @llvm.lifetime.end.p0(i64 8, ptr nonnull %17) #6
  call void @llvm.lifetime.end.p0(i64 8, ptr nonnull %16) #6
  call void @llvm.lifetime.end.p0(i64 4, 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
  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 @slamch_(ptr noundef) local_unnamed_addr #2

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

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

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

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

declare double @r_imag(ptr noundef) local_unnamed_addr #2

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

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

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

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

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

declare void @f2c_cdotu(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 float @llvm.fmuladd.f32(float, float, float) #3

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

declare void @f2c_cdotc(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 nosync nounwind speculatable willreturn memory(none)
declare i64 @llvm.umax.i64(i64, i64) #4

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

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

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 nosync nounwind speculatable willreturn memory(none) }
attributes #5 = { nocallback nofree nounwind willreturn memory(argmem: write) }
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 = !{!"float", !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 4}
!16 = distinct !{!16, !12}
!17 = distinct !{!17, !12}
!18 = distinct !{!18, !12}
!19 = distinct !{!19, !12}
!20 = distinct !{!20, !12}
!21 = !{!15, !10, i64 4}
!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,SCCPPass,SLPVectorizerPass,SROAPass,SimplifyCFGPass,TailCallElimPass,VectorCombinePass