program incremental_scoring
  implicit none
  integer :: d, c(26) = 0, s(26, 365) = 0, t(365) = 0, m, p, q, i
  read(*,*) d
  read(*,*) c
  read(*,*) (s(:, i), i = 1, d)
  read(*,*) (t(i), i = 1, d)
  read(*,*) m
  do i = 1, m
    read(*,*) p, q
    t(p) = q
    write(*,'(i0)') score()
  end do
contains
  integer function score() result(res)
    integer :: last(26), i
    last = 0
    res = 0
    do i = 1, d
      last(t(i)) = i
      res = res + s(t(i), i) - sum(c * (i - last))
    end do
  end
end program incremental_scoring
; ModuleID = 'FIRModule'
source_filename = "FIRModule"
target datalayout = "e-m:e-p270:32:32-p271:32:32-p272:64:64-i64:64-f80:128-n8:16:32:64-S128"
target triple = "x86_64-pc-linux-gnu"

@_QFEc = internal global [26 x i32] zeroinitializer
@_QFEs = internal global [365 x [26 x i32]] zeroinitializer
@_QFEt = internal global [365 x i32] zeroinitializer
@_QQcl.20dbe758da1a165089ceba984f323a9b = linkonce constant [73 x i8] c"/home/ubuntu/Downloads/TheStack_IR/Collated/Fortran/Source_1035/source.f\00"
@_QQcl.28693029 = linkonce constant [4 x i8] c"(i0)"
@_QQEnvironmentDefaults = local_unnamed_addr constant ptr null

; Function Attrs: mustprogress nofree nounwind willreturn allockind("alloc,uninitialized") allocsize(0) memory(inaccessiblemem: readwrite)
declare noalias noundef ptr @malloc(i64 noundef) local_unnamed_addr #0

; Function Attrs: mustprogress nounwind willreturn allockind("free") memory(argmem: readwrite, inaccessiblemem: readwrite)
declare void @free(ptr allocptr nocapture noundef) local_unnamed_addr #1

define void @_QQmain() local_unnamed_addr {
  %1 = alloca { ptr, i64, i32, i8, i8, i8, i8, [1 x [3 x i64]] }, align 8
  %2 = alloca { ptr, i64, i32, i8, i8, i8, i8, [1 x [3 x i64]] }, align 8
  %3 = alloca i32, align 4
  %4 = alloca i32, align 4
  %5 = alloca i32, align 4
  %6 = alloca i32, align 4
  %7 = alloca { ptr }, align 8
  store ptr %3, ptr %7, align 8, !tbaa !3
  %8 = call ptr @_FortranAioBeginExternalListInput(i32 -1, ptr nonnull @_QQcl.20dbe758da1a165089ceba984f323a9b, i32 4)
  %9 = call i1 @_FortranAioInputInteger(ptr %8, ptr nonnull %3, i32 4)
  %10 = call i32 @_FortranAioEndIoStatement(ptr %8)
  %11 = call ptr @_FortranAioBeginExternalListInput(i32 -1, ptr nonnull @_QQcl.20dbe758da1a165089ceba984f323a9b, i32 5)
  store ptr @_QFEc, ptr %2, align 8, !tbaa !7
  %.fca.1.gep = getelementptr inbounds { ptr, i64, i32, i8, i8, i8, i8, [1 x [3 x i64]] }, ptr %2, i64 0, i32 1
  store i64 4, ptr %.fca.1.gep, align 8, !tbaa !7
  %.fca.2.gep = getelementptr inbounds { ptr, i64, i32, i8, i8, i8, i8, [1 x [3 x i64]] }, ptr %2, i64 0, i32 2
  store i32 20180515, ptr %.fca.2.gep, align 8, !tbaa !7
  %.fca.3.gep = getelementptr inbounds { ptr, i64, i32, i8, i8, i8, i8, [1 x [3 x i64]] }, ptr %2, i64 0, i32 3
  store i8 1, ptr %.fca.3.gep, align 4, !tbaa !7
  %.fca.4.gep = getelementptr inbounds { ptr, i64, i32, i8, i8, i8, i8, [1 x [3 x i64]] }, ptr %2, i64 0, i32 4
  store i8 9, ptr %.fca.4.gep, align 1, !tbaa !7
  %.fca.5.gep = getelementptr inbounds { ptr, i64, i32, i8, i8, i8, i8, [1 x [3 x i64]] }, ptr %2, i64 0, i32 5
  store i8 0, ptr %.fca.5.gep, align 2, !tbaa !7
  %.fca.6.gep = getelementptr inbounds { ptr, i64, i32, i8, i8, i8, i8, [1 x [3 x i64]] }, ptr %2, i64 0, i32 6
  store i8 0, ptr %.fca.6.gep, align 1, !tbaa !7
  %.fca.7.0.0.gep = getelementptr inbounds { ptr, i64, i32, i8, i8, i8, i8, [1 x [3 x i64]] }, ptr %2, i64 0, i32 7, i64 0, i64 0
  store i64 1, ptr %.fca.7.0.0.gep, align 8, !tbaa !7
  %.fca.7.0.1.gep = getelementptr inbounds { ptr, i64, i32, i8, i8, i8, i8, [1 x [3 x i64]] }, ptr %2, i64 0, i32 7, i64 0, i64 1
  store i64 26, ptr %.fca.7.0.1.gep, align 8, !tbaa !7
  %.fca.7.0.2.gep = getelementptr inbounds { ptr, i64, i32, i8, i8, i8, i8, [1 x [3 x i64]] }, ptr %2, i64 0, i32 7, i64 0, i64 2
  store i64 4, ptr %.fca.7.0.2.gep, align 8, !tbaa !7
  %12 = call i1 @_FortranAioInputDescriptor(ptr %11, ptr nonnull %2)
  %13 = call i32 @_FortranAioEndIoStatement(ptr %11)
  %14 = call ptr @_FortranAioBeginExternalListInput(i32 -1, ptr nonnull @_QQcl.20dbe758da1a165089ceba984f323a9b, i32 6)
  %15 = load i32, ptr %3, align 4, !tbaa !3
  %16 = icmp sgt i32 %15, 0
  br i1 %16, label %.lr.ph, label %._crit_edge

.lr.ph:                                           ; preds = %0
  %17 = zext i32 %15 to i64
  %.fca.1.gep4 = getelementptr inbounds { ptr, i64, i32, i8, i8, i8, i8, [1 x [3 x i64]] }, ptr %1, i64 0, i32 1
  %.fca.2.gep5 = getelementptr inbounds { ptr, i64, i32, i8, i8, i8, i8, [1 x [3 x i64]] }, ptr %1, i64 0, i32 2
  %.fca.3.gep6 = getelementptr inbounds { ptr, i64, i32, i8, i8, i8, i8, [1 x [3 x i64]] }, ptr %1, i64 0, i32 3
  %.fca.4.gep7 = getelementptr inbounds { ptr, i64, i32, i8, i8, i8, i8, [1 x [3 x i64]] }, ptr %1, i64 0, i32 4
  %.fca.5.gep8 = getelementptr inbounds { ptr, i64, i32, i8, i8, i8, i8, [1 x [3 x i64]] }, ptr %1, i64 0, i32 5
  %.fca.6.gep9 = getelementptr inbounds { ptr, i64, i32, i8, i8, i8, i8, [1 x [3 x i64]] }, ptr %1, i64 0, i32 6
  %.fca.7.0.0.gep10 = getelementptr inbounds { ptr, i64, i32, i8, i8, i8, i8, [1 x [3 x i64]] }, ptr %1, i64 0, i32 7, i64 0, i64 0
  %.fca.7.0.1.gep11 = getelementptr inbounds { ptr, i64, i32, i8, i8, i8, i8, [1 x [3 x i64]] }, ptr %1, i64 0, i32 7, i64 0, i64 1
  %.fca.7.0.2.gep12 = getelementptr inbounds { ptr, i64, i32, i8, i8, i8, i8, [1 x [3 x i64]] }, ptr %1, i64 0, i32 7, i64 0, i64 2
  br label %18

18:                                               ; preds = %.lr.ph, %18
  %19 = phi i64 [ 1, %.lr.ph ], [ %24, %18 ]
  %sext15 = shl i64 %19, 32
  %20 = ashr exact i64 %sext15, 32
  %21 = add nsw i64 %20, -1
  %22 = getelementptr [365 x [26 x i32]], ptr @_QFEs, i64 0, i64 %21, i64 0
  store ptr %22, ptr %1, align 8, !tbaa !7
  store i64 4, ptr %.fca.1.gep4, align 8, !tbaa !7
  store i32 20180515, ptr %.fca.2.gep5, align 8, !tbaa !7
  store i8 1, ptr %.fca.3.gep6, align 4, !tbaa !7
  store i8 9, ptr %.fca.4.gep7, align 1, !tbaa !7
  store i8 0, ptr %.fca.5.gep8, align 2, !tbaa !7
  store i8 0, ptr %.fca.6.gep9, align 1, !tbaa !7
  store i64 1, ptr %.fca.7.0.0.gep10, align 8, !tbaa !7
  store i64 26, ptr %.fca.7.0.1.gep11, align 8, !tbaa !7
  store i64 4, ptr %.fca.7.0.2.gep12, align 8, !tbaa !7
  %23 = call i1 @_FortranAioInputDescriptor(ptr %14, ptr nonnull %1)
  %24 = add nuw nsw i64 %19, 1
  %exitcond.not = icmp eq i64 %19, %17
  br i1 %exitcond.not, label %._crit_edge, label %18

._crit_edge:                                      ; preds = %18, %0
  %25 = call i32 @_FortranAioEndIoStatement(ptr %14)
  %26 = call ptr @_FortranAioBeginExternalListInput(i32 -1, ptr nonnull @_QQcl.20dbe758da1a165089ceba984f323a9b, i32 7)
  %27 = load i32, ptr %3, align 4, !tbaa !3
  %28 = icmp sgt i32 %27, 0
  br i1 %28, label %.lr.ph17.preheader, label %._crit_edge18

.lr.ph17.preheader:                               ; preds = %._crit_edge
  %29 = zext i32 %27 to i64
  br label %.lr.ph17

.lr.ph17:                                         ; preds = %.lr.ph17.preheader, %.lr.ph17
  %30 = phi i64 [ %35, %.lr.ph17 ], [ 1, %.lr.ph17.preheader ]
  %sext = shl i64 %30, 32
  %31 = ashr exact i64 %sext, 32
  %32 = add nsw i64 %31, -1
  %33 = getelementptr [365 x i32], ptr @_QFEt, i64 0, i64 %32
  %34 = call i1 @_FortranAioInputInteger(ptr %26, ptr %33, i32 4)
  %35 = add nuw nsw i64 %30, 1
  %exitcond22.not = icmp eq i64 %30, %29
  br i1 %exitcond22.not, label %._crit_edge18, label %.lr.ph17

._crit_edge18:                                    ; preds = %.lr.ph17, %._crit_edge
  %36 = call i32 @_FortranAioEndIoStatement(ptr %26)
  %37 = call ptr @_FortranAioBeginExternalListInput(i32 -1, ptr nonnull @_QQcl.20dbe758da1a165089ceba984f323a9b, i32 8)
  %38 = call i1 @_FortranAioInputInteger(ptr %37, ptr nonnull %4, i32 4)
  %39 = call i32 @_FortranAioEndIoStatement(ptr %37)
  %40 = load i32, ptr %4, align 4, !tbaa !3
  %41 = icmp sgt i32 %40, 0
  br i1 %41, label %.lr.ph20.preheader, label %._crit_edge21

.lr.ph20.preheader:                               ; preds = %._crit_edge18
  %42 = zext i32 %40 to i64
  br label %.lr.ph20

.lr.ph20:                                         ; preds = %.lr.ph20.preheader, %.lr.ph20
  %43 = phi i64 [ %57, %.lr.ph20 ], [ %42, %.lr.ph20.preheader ]
  %44 = call ptr @_FortranAioBeginExternalListInput(i32 -1, ptr nonnull @_QQcl.20dbe758da1a165089ceba984f323a9b, i32 10)
  %45 = call i1 @_FortranAioInputInteger(ptr %44, ptr nonnull %5, i32 4)
  %46 = call i1 @_FortranAioInputInteger(ptr %44, ptr nonnull %6, i32 4)
  %47 = call i32 @_FortranAioEndIoStatement(ptr %44)
  %48 = load i32, ptr %6, align 4, !tbaa !3
  %49 = load i32, ptr %5, align 4, !tbaa !3
  %50 = sext i32 %49 to i64
  %51 = add nsw i64 %50, -1
  %52 = getelementptr [365 x i32], ptr @_QFEt, i64 0, i64 %51
  store i32 %48, ptr %52, align 4, !tbaa !3
  %53 = call ptr @_FortranAioBeginExternalFormattedOutput(ptr nonnull @_QQcl.28693029, i64 4, ptr null, i32 -1, ptr nonnull @_QQcl.20dbe758da1a165089ceba984f323a9b, i32 12)
  %54 = call i32 @_QFPscore(ptr nonnull %7)
  %55 = call i1 @_FortranAioOutputInteger32(ptr %53, i32 %54)
  %56 = call i32 @_FortranAioEndIoStatement(ptr %53)
  %57 = add nsw i64 %43, -1
  %58 = icmp ugt i64 %43, 1
  br i1 %58, label %.lr.ph20, label %._crit_edge21

._crit_edge21:                                    ; preds = %.lr.ph20, %._crit_edge18
  ret void
}

; Function Attrs: nounwind memory(readwrite, argmem: read)
define i32 @_QFPscore(ptr nest nocapture readonly %0) local_unnamed_addr #2 {
  %2 = load ptr, ptr %0, align 8, !tbaa !3
  %3 = alloca [26 x i32], align 4
  call void @llvm.memset.p0.i64(ptr noundef nonnull align 4 dereferenceable(104) %3, i8 0, i64 104, i1 false), !tbaa !3
  %4 = load i32, ptr %2, align 4, !tbaa !3
  %5 = icmp sgt i32 %4, 0
  br i1 %5, label %.lr.ph.preheader, label %._crit_edge

.lr.ph.preheader:                                 ; preds = %1
  %6 = zext i32 %4 to i64
  %7 = load i32, ptr @_QFEc, align 16, !tbaa !3
  %8 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 1), align 4, !tbaa !3
  %9 = getelementptr inbounds i32, ptr %3, i64 1
  %10 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 2), align 8, !tbaa !3
  %11 = getelementptr inbounds i32, ptr %3, i64 2
  %12 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 3), align 4, !tbaa !3
  %13 = getelementptr inbounds i32, ptr %3, i64 3
  %14 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 4), align 16, !tbaa !3
  %15 = getelementptr inbounds i32, ptr %3, i64 4
  %16 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 5), align 4, !tbaa !3
  %17 = getelementptr inbounds i32, ptr %3, i64 5
  %18 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 6), align 8, !tbaa !3
  %19 = getelementptr inbounds i32, ptr %3, i64 6
  %20 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 7), align 4, !tbaa !3
  %21 = getelementptr inbounds i32, ptr %3, i64 7
  %22 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 8), align 16, !tbaa !3
  %23 = getelementptr inbounds i32, ptr %3, i64 8
  %24 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 9), align 4, !tbaa !3
  %25 = getelementptr inbounds i32, ptr %3, i64 9
  %26 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 10), align 8, !tbaa !3
  %27 = getelementptr inbounds i32, ptr %3, i64 10
  %28 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 11), align 4, !tbaa !3
  %29 = getelementptr inbounds i32, ptr %3, i64 11
  %30 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 12), align 16, !tbaa !3
  %31 = getelementptr inbounds i32, ptr %3, i64 12
  %32 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 13), align 4, !tbaa !3
  %33 = getelementptr inbounds i32, ptr %3, i64 13
  %34 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 14), align 8, !tbaa !3
  %35 = getelementptr inbounds i32, ptr %3, i64 14
  %36 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 15), align 4, !tbaa !3
  %37 = getelementptr inbounds i32, ptr %3, i64 15
  %38 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 16), align 16, !tbaa !3
  %39 = getelementptr inbounds i32, ptr %3, i64 16
  %40 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 17), align 4, !tbaa !3
  %41 = getelementptr inbounds i32, ptr %3, i64 17
  %42 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 18), align 8, !tbaa !3
  %43 = getelementptr inbounds i32, ptr %3, i64 18
  %44 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 19), align 4, !tbaa !3
  %45 = getelementptr inbounds i32, ptr %3, i64 19
  %46 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 20), align 16, !tbaa !3
  %47 = getelementptr inbounds i32, ptr %3, i64 20
  %48 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 21), align 4, !tbaa !3
  %49 = getelementptr inbounds i32, ptr %3, i64 21
  %50 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 22), align 8, !tbaa !3
  %51 = getelementptr inbounds i32, ptr %3, i64 22
  %52 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 23), align 4, !tbaa !3
  %53 = getelementptr inbounds i32, ptr %3, i64 23
  %54 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 24), align 16, !tbaa !3
  %55 = getelementptr inbounds i32, ptr %3, i64 24
  %56 = load i32, ptr getelementptr inbounds ([26 x i32], ptr @_QFEc, i64 0, i64 25), align 4, !tbaa !3
  %57 = getelementptr inbounds i32, ptr %3, i64 25
  br label %.lr.ph

.lr.ph:                                           ; preds = %.lr.ph.preheader, %.lr.ph
  %indvars.iv = phi i64 [ 1, %.lr.ph.preheader ], [ %indvars.iv.next, %.lr.ph ]
  %.08 = phi i32 [ 0, %.lr.ph.preheader ], [ %203, %.lr.ph ]
  %58 = add nsw i64 %indvars.iv, -1
  %59 = getelementptr [365 x i32], ptr @_QFEt, i64 0, i64 %58
  %60 = load i32, ptr %59, align 4, !tbaa !3
  %61 = sext i32 %60 to i64
  %62 = add nsw i64 %61, -1
  %63 = getelementptr [26 x i32], ptr %3, i64 0, i64 %62
  %64 = trunc i64 %indvars.iv to i32
  store i32 %64, ptr %63, align 4, !tbaa !3
  %65 = getelementptr [365 x [26 x i32]], ptr @_QFEs, i64 0, i64 %58, i64 %62
  %66 = load i32, ptr %65, align 4, !tbaa !3
  %67 = tail call dereferenceable_or_null(104) ptr @malloc(i64 104)
  %68 = load i32, ptr %3, align 4, !tbaa !3
  %69 = sub i32 %64, %68
  %70 = mul i32 %69, %7
  store i32 %70, ptr %67, align 4, !tbaa !3
  %71 = load i32, ptr %9, align 4, !tbaa !3
  %72 = sub i32 %64, %71
  %73 = mul i32 %72, %8
  %74 = getelementptr i32, ptr %67, i64 1
  store i32 %73, ptr %74, align 4, !tbaa !3
  %75 = load i32, ptr %11, align 4, !tbaa !3
  %76 = sub i32 %64, %75
  %77 = mul i32 %76, %10
  %78 = getelementptr i32, ptr %67, i64 2
  store i32 %77, ptr %78, align 4, !tbaa !3
  %79 = load i32, ptr %13, align 4, !tbaa !3
  %80 = sub i32 %64, %79
  %81 = mul i32 %80, %12
  %82 = getelementptr i32, ptr %67, i64 3
  store i32 %81, ptr %82, align 4, !tbaa !3
  %83 = load i32, ptr %15, align 4, !tbaa !3
  %84 = sub i32 %64, %83
  %85 = mul i32 %84, %14
  %86 = getelementptr i32, ptr %67, i64 4
  store i32 %85, ptr %86, align 4, !tbaa !3
  %87 = load i32, ptr %17, align 4, !tbaa !3
  %88 = sub i32 %64, %87
  %89 = mul i32 %88, %16
  %90 = getelementptr i32, ptr %67, i64 5
  store i32 %89, ptr %90, align 4, !tbaa !3
  %91 = load i32, ptr %19, align 4, !tbaa !3
  %92 = sub i32 %64, %91
  %93 = mul i32 %92, %18
  %94 = getelementptr i32, ptr %67, i64 6
  store i32 %93, ptr %94, align 4, !tbaa !3
  %95 = load i32, ptr %21, align 4, !tbaa !3
  %96 = sub i32 %64, %95
  %97 = mul i32 %96, %20
  %98 = getelementptr i32, ptr %67, i64 7
  store i32 %97, ptr %98, align 4, !tbaa !3
  %99 = load i32, ptr %23, align 4, !tbaa !3
  %100 = sub i32 %64, %99
  %101 = mul i32 %100, %22
  %102 = getelementptr i32, ptr %67, i64 8
  store i32 %101, ptr %102, align 4, !tbaa !3
  %103 = load i32, ptr %25, align 4, !tbaa !3
  %104 = sub i32 %64, %103
  %105 = mul i32 %104, %24
  %106 = getelementptr i32, ptr %67, i64 9
  store i32 %105, ptr %106, align 4, !tbaa !3
  %107 = load i32, ptr %27, align 4, !tbaa !3
  %108 = sub i32 %64, %107
  %109 = mul i32 %108, %26
  %110 = getelementptr i32, ptr %67, i64 10
  store i32 %109, ptr %110, align 4, !tbaa !3
  %111 = load i32, ptr %29, align 4, !tbaa !3
  %112 = sub i32 %64, %111
  %113 = mul i32 %112, %28
  %114 = getelementptr i32, ptr %67, i64 11
  store i32 %113, ptr %114, align 4, !tbaa !3
  %115 = load i32, ptr %31, align 4, !tbaa !3
  %116 = sub i32 %64, %115
  %117 = mul i32 %116, %30
  %118 = getelementptr i32, ptr %67, i64 12
  store i32 %117, ptr %118, align 4, !tbaa !3
  %119 = load i32, ptr %33, align 4, !tbaa !3
  %120 = sub i32 %64, %119
  %121 = mul i32 %120, %32
  %122 = getelementptr i32, ptr %67, i64 13
  store i32 %121, ptr %122, align 4, !tbaa !3
  %123 = load i32, ptr %35, align 4, !tbaa !3
  %124 = sub i32 %64, %123
  %125 = mul i32 %124, %34
  %126 = getelementptr i32, ptr %67, i64 14
  store i32 %125, ptr %126, align 4, !tbaa !3
  %127 = load i32, ptr %37, align 4, !tbaa !3
  %128 = sub i32 %64, %127
  %129 = mul i32 %128, %36
  %130 = getelementptr i32, ptr %67, i64 15
  store i32 %129, ptr %130, align 4, !tbaa !3
  %131 = load i32, ptr %39, align 4, !tbaa !3
  %132 = sub i32 %64, %131
  %133 = mul i32 %132, %38
  %134 = load i32, ptr %41, align 4, !tbaa !3
  %135 = sub i32 %64, %134
  %136 = mul i32 %135, %40
  %137 = load i32, ptr %43, align 4, !tbaa !3
  %138 = sub i32 %64, %137
  %139 = mul i32 %138, %42
  %140 = load i32, ptr %45, align 4, !tbaa !3
  %141 = sub i32 %64, %140
  %142 = mul i32 %141, %44
  %143 = load i32, ptr %47, align 4, !tbaa !3
  %144 = sub i32 %64, %143
  %145 = mul i32 %144, %46
  %146 = load i32, ptr %49, align 4, !tbaa !3
  %147 = sub i32 %64, %146
  %148 = mul i32 %147, %48
  %149 = load i32, ptr %51, align 4, !tbaa !3
  %150 = sub i32 %64, %149
  %151 = mul i32 %150, %50
  %152 = load i32, ptr %53, align 4, !tbaa !3
  %153 = sub i32 %64, %152
  %154 = mul i32 %153, %52
  %155 = load i32, ptr %55, align 4, !tbaa !3
  %156 = sub i32 %64, %155
  %157 = mul i32 %156, %54
  %158 = load i32, ptr %57, align 4, !tbaa !3
  %159 = sub i32 %64, %158
  %160 = mul i32 %159, %56
  %161 = load i32, ptr %67, align 4, !tbaa !3
  %162 = load i32, ptr %74, align 4, !tbaa !3
  %163 = add i32 %162, %161
  %164 = load i32, ptr %78, align 4, !tbaa !3
  %165 = add i32 %164, %163
  %166 = load i32, ptr %82, align 4, !tbaa !3
  %167 = add i32 %166, %165
  %168 = load i32, ptr %86, align 4, !tbaa !3
  %169 = add i32 %168, %167
  %170 = load i32, ptr %90, align 4, !tbaa !3
  %171 = add i32 %170, %169
  %172 = load i32, ptr %94, align 4, !tbaa !3
  %173 = add i32 %172, %171
  %174 = load i32, ptr %98, align 4, !tbaa !3
  %175 = add i32 %174, %173
  %176 = load i32, ptr %102, align 4, !tbaa !3
  %177 = add i32 %176, %175
  %178 = load i32, ptr %106, align 4, !tbaa !3
  %179 = add i32 %178, %177
  %180 = load i32, ptr %110, align 4, !tbaa !3
  %181 = add i32 %180, %179
  %182 = load i32, ptr %114, align 4, !tbaa !3
  %183 = add i32 %182, %181
  %184 = load i32, ptr %118, align 4, !tbaa !3
  %185 = add i32 %184, %183
  %186 = load i32, ptr %122, align 4, !tbaa !3
  %187 = add i32 %186, %185
  %188 = load i32, ptr %126, align 4, !tbaa !3
  %189 = add i32 %188, %187
  %190 = load i32, ptr %130, align 4, !tbaa !3
  %191 = add i32 %190, %189
  %192 = add i32 %133, %191
  %193 = add i32 %136, %192
  %194 = add i32 %139, %193
  %195 = add i32 %142, %194
  %196 = add i32 %145, %195
  %197 = add i32 %148, %196
  %198 = add i32 %151, %197
  %199 = add i32 %154, %198
  %200 = add i32 %157, %199
  %201 = add i32 %160, %200
  %202 = add i32 %66, %.08
  %203 = sub i32 %202, %201
  tail call void @free(ptr nonnull %67)
  %indvars.iv.next = add nuw nsw i64 %indvars.iv, 1
  %exitcond.not = icmp eq i64 %indvars.iv, %6
  br i1 %exitcond.not, label %._crit_edge, label %.lr.ph

._crit_edge:                                      ; preds = %.lr.ph, %1
  %.0.lcssa = phi i32 [ 0, %1 ], [ %203, %.lr.ph ]
  ret i32 %.0.lcssa
}

declare ptr @_FortranAioBeginExternalListInput(i32, ptr, i32) local_unnamed_addr

declare i1 @_FortranAioInputInteger(ptr, ptr, i32) local_unnamed_addr

declare i32 @_FortranAioEndIoStatement(ptr) local_unnamed_addr

declare i1 @_FortranAioInputDescriptor(ptr, ptr) local_unnamed_addr

declare ptr @_FortranAioBeginExternalFormattedOutput(ptr, i64, ptr, i32, ptr, i32) local_unnamed_addr

declare i1 @_FortranAioOutputInteger32(ptr, i32) local_unnamed_addr

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

attributes #0 = { mustprogress nofree nounwind willreturn allockind("alloc,uninitialized") allocsize(0) memory(inaccessiblemem: readwrite) "alloc-family"="malloc" }
attributes #1 = { mustprogress nounwind willreturn allockind("free") memory(argmem: readwrite, inaccessiblemem: readwrite) "alloc-family"="malloc" }
attributes #2 = { nounwind memory(readwrite, argmem: read) }
attributes #3 = { nocallback nofree nounwind willreturn memory(argmem: write) }

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

!0 = !{i32 2, !"Debug Info Version", i32 3}
!1 = !{i32 8, !"PIC Level", i32 2}
!2 = !{i32 7, !"PIE Level", i32 2}
!3 = !{!4, !4, i64 0}
!4 = !{!"any data access", !5, i64 0}
!5 = !{!"any access", !6, i64 0}
!6 = !{!"Flang Type TBAA Root"}
!7 = !{!8, !8, i64 0}
!8 = !{!"descriptor member", !5, i64 0}
