#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
int /*<<< orphan*/ cdoPrint(char *, double);
void scale_gridbox_area(long gridsize, const double *restrict array1,
                        long gridsize2, double *restrict array2,
                        const double *restrict grid2_area) {
  static int lgridboxinfo = 1;
  long i;
  double array1sum = 0;
  double array2sum = 0;
  for (i = 0; i < gridsize; i++)
    array1sum += array1[i];
  for (i = 0; i < gridsize2; i++)
    array2sum += grid2_area[i];
  for (i = 0; i < gridsize2; i++)
    array2[i] = grid2_area[i] / array2sum * array1sum;
  if (lgridboxinfo) {
    cdoPrint("gridbox_area replaced and scaled to %g", array1sum);
    lgridboxinfo = 0;
  }
}


x86 assembly (clang, -O0):
<scale_gridbox_area>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8,-0x28(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x38(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x40(%rbp)
movq   $0x0,-0x30(%rbp)
mov    -0x30(%rbp),%rax
cmp    -0x8(%rbp),%rax
jge    117a <scale_gridbox_area+0x6a>
mov    -0x10(%rbp),%rax
mov    -0x30(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
addsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x38(%rbp)
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
jmp    1144 <scale_gridbox_area+0x34>
movq   $0x0,-0x30(%rbp)
mov    -0x30(%rbp),%rax
cmp    -0x18(%rbp),%rax
jge    11b8 <scale_gridbox_area+0xa8>
mov    -0x28(%rbp),%rax
mov    -0x30(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
addsd  -0x40(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
jmp    1182 <scale_gridbox_area+0x72>
movq   $0x0,-0x30(%rbp)
mov    -0x30(%rbp),%rax
cmp    -0x18(%rbp),%rax
jge    1203 <scale_gridbox_area+0xf3>
mov    -0x28(%rbp),%rax
mov    -0x30(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
divsd  -0x40(%rbp),%xmm0
mulsd  -0x38(%rbp),%xmm0
mov    -0x20(%rbp),%rax
mov    -0x30(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
jmp    11c0 <scale_gridbox_area+0xb0>
cmpl   $0x0,0x2e1e(%rip)
je     122b <scale_gridbox_area+0x11b>
movsd  -0x38(%rbp),%xmm0
lea    0xde4(%rip),%rdi
call   1030 <cdoPrint@plt>
movl   $0x0,0x2dfd(%rip)
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<scale_gridbox_area>:
push   %rax
test   %rdi,%rdi
jle    112f <scale_gridbox_area+0x1f>
lea    -0x1(%rdi),%rax
mov    %edi,%r9d
and    $0x7,%r9d
cmp    $0x7,%rax
jae    1135 <scale_gridbox_area+0x25>
xorpd  %xmm0,%xmm0
xor    %eax,%eax
jmp    1178 <scale_gridbox_area+0x68>
xorpd  %xmm0,%xmm0
jmp    119e <scale_gridbox_area+0x8e>
and    $0xfffffffffffffff8,%rdi
xorpd  %xmm0,%xmm0
xor    %eax,%eax
nop
addsd  (%rsi,%rax,8),%xmm0
addsd  0x8(%rsi,%rax,8),%xmm0
addsd  0x10(%rsi,%rax,8),%xmm0
addsd  0x18(%rsi,%rax,8),%xmm0
addsd  0x20(%rsi,%rax,8),%xmm0
addsd  0x28(%rsi,%rax,8),%xmm0
addsd  0x30(%rsi,%rax,8),%xmm0
addsd  0x38(%rsi,%rax,8),%xmm0
add    $0x8,%rax
cmp    %rax,%rdi
jne    1140 <scale_gridbox_area+0x30>
test   %r9,%r9
je     119e <scale_gridbox_area+0x8e>
lea    (%rsi,%rax,8),%rax
xor    %esi,%esi
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
addsd  (%rax,%rsi,8),%xmm0
add    $0x1,%rsi
cmp    %rsi,%r9
jne    1190 <scale_gridbox_area+0x80>
test   %rdx,%rdx
jle    12ec <scale_gridbox_area+0x1dc>
lea    -0x1(%rdx),%rsi
mov    %edx,%eax
and    $0x7,%eax
cmp    $0x7,%rsi
jae    11be <scale_gridbox_area+0xae>
xorpd  %xmm1,%xmm1
xor    %esi,%esi
jmp    1210 <scale_gridbox_area+0x100>
mov    %rdx,%rdi
and    $0xfffffffffffffff8,%rdi
xorpd  %xmm1,%xmm1
xor    %esi,%esi
nopl   0x0(%rax,%rax,1)
addsd  (%r8,%rsi,8),%xmm1
addsd  0x8(%r8,%rsi,8),%xmm1
addsd  0x10(%r8,%rsi,8),%xmm1
addsd  0x18(%r8,%rsi,8),%xmm1
addsd  0x20(%r8,%rsi,8),%xmm1
addsd  0x28(%r8,%rsi,8),%xmm1
addsd  0x30(%r8,%rsi,8),%xmm1
addsd  0x38(%r8,%rsi,8),%xmm1
add    $0x8,%rsi
cmp    %rsi,%rdi
jne    11d0 <scale_gridbox_area+0xc0>
test   %rax,%rax
je     122e <scale_gridbox_area+0x11e>
lea    (%r8,%rsi,8),%rsi
xor    %edi,%edi
nopl   0x0(%rax,%rax,1)
addsd  (%rsi,%rdi,8),%xmm1
add    $0x1,%rdi
cmp    %rdi,%rax
jne    1220 <scale_gridbox_area+0x110>
test   %rdx,%rdx
jle    12ec <scale_gridbox_area+0x1dc>
cmp    $0x1,%rdx
jne    1244 <scale_gridbox_area+0x134>
xor    %eax,%eax
jmp    12d0 <scale_gridbox_area+0x1c0>
mov    %rdx,%rax
and    $0xfffffffffffffffe,%rax
movapd %xmm1,%xmm3
unpcklpd %xmm1,%xmm3
movapd %xmm0,%xmm2
unpcklpd %xmm0,%xmm2
lea    -0x2(%rax),%rsi
mov    %rsi,%r9
shr    %r9
add    $0x1,%r9
test   %rsi,%rsi
je     130a <scale_gridbox_area+0x1fa>
mov    %r9,%rsi
and    $0xfffffffffffffffe,%rsi
xor    %edi,%edi
nopl   0x0(%rax,%rax,1)
movupd (%r8,%rdi,8),%xmm4
divpd  %xmm3,%xmm4
mulpd  %xmm2,%xmm4
movupd %xmm4,(%rcx,%rdi,8)
movupd 0x10(%r8,%rdi,8),%xmm4
divpd  %xmm3,%xmm4
mulpd  %xmm2,%xmm4
movupd %xmm4,0x10(%rcx,%rdi,8)
add    $0x4,%rdi
add    $0xfffffffffffffffe,%rsi
jne    1280 <scale_gridbox_area+0x170>
test   $0x1,%r9b
je     12cb <scale_gridbox_area+0x1bb>
movupd (%r8,%rdi,8),%xmm4
divpd  %xmm3,%xmm4
mulpd  %xmm4,%xmm2
movupd %xmm2,(%rcx,%rdi,8)
cmp    %rdx,%rax
je     12ec <scale_gridbox_area+0x1dc>
movsd  (%r8,%rax,8),%xmm2
divsd  %xmm1,%xmm2
mulsd  %xmm0,%xmm2
movsd  %xmm2,(%rcx,%rax,8)
add    $0x1,%rax
cmp    %rax,%rdx
jne    12d0 <scale_gridbox_area+0x1c0>
cmpb   $0x0,0x2d39(%rip)
jne    1308 <scale_gridbox_area+0x1f8>
lea    0xd04(%rip),%rdi
call   1030 <cdoPrint@plt>
movb   $0x1,0x2d24(%rip)
pop    %rax
ret
xor    %edi,%edi
test   $0x1,%r9b
jne    12b8 <scale_gridbox_area+0x1a8>
jmp    12cb <scale_gridbox_area+0x1bb>

LLVM IR (-O0):
@scale_gridbox_area.lgridboxinfo = internal global i32 1
@.str = [39 x i8] c"gridbox_area replaced and scaled to %g\00"
define void @scale_gridbox_area(i64 %0, double* noalias %1, i64 %2, double* noalias %3, double* noalias %4) {
%6 = alloca i64
%7 = alloca double*
%8 = alloca i64
%9 = alloca double*
%10 = alloca double*
%11 = alloca i64
%12 = alloca double
%13 = alloca double
store i64 %0, i64* %6
store double* %1, double** %7
store i64 %2, i64* %8
store double* %3, double** %9
store double* %4, double** %10
store double 0.000000e+00, double* %12
store double 0.000000e+00, double* %13
store i64 0, i64* %11
br label %14
14: ; preds = %25, %5
%15 = load i64, i64* %11
%16 = load i64, i64* %6
%17 = icmp slt i64 %15, %16
br i1 %17, label %18, label %28
18: ; preds = %14
%19 = load double*, double** %7
%20 = load i64, i64* %11
%21 = getelementptr inbounds double, double* %19, i64 %20
%22 = load double, double* %21
%23 = load double, double* %12
%24 = fadd double %23, %22
store double %24, double* %12
br label %25
25: ; preds = %18
%26 = load i64, i64* %11
%27 = add nsw i64 %26, 1
store i64 %27, i64* %11
br label %14
28: ; preds = %14
store i64 0, i64* %11
br label %29
29: ; preds = %40, %28
%30 = load i64, i64* %11
%31 = load i64, i64* %8
%32 = icmp slt i64 %30, %31
br i1 %32, label %33, label %43
33: ; preds = %29
%34 = load double*, double** %10
%35 = load i64, i64* %11
%36 = getelementptr inbounds double, double* %34, i64 %35
%37 = load double, double* %36
%38 = load double, double* %13
%39 = fadd double %38, %37
store double %39, double* %13
br label %40
40: ; preds = %33
%41 = load i64, i64* %11
%42 = add nsw i64 %41, 1
store i64 %42, i64* %11
br label %29
43: ; preds = %29
store i64 0, i64* %11
br label %44
44: ; preds = %60, %43
%45 = load i64, i64* %11
%46 = load i64, i64* %8
%47 = icmp slt i64 %45, %46
br i1 %47, label %48, label %63
48: ; preds = %44
%49 = load double*, double** %10
%50 = load i64, i64* %11
%51 = getelementptr inbounds double, double* %49, i64 %50
%52 = load double, double* %51
%53 = load double, double* %13
%54 = fdiv double %52, %53
%55 = load double, double* %12
%56 = fmul double %54, %55
%57 = load double*, double** %9
%58 = load i64, i64* %11
%59 = getelementptr inbounds double, double* %57, i64 %58
store double %56, double* %59
br label %60
60: ; preds = %48
%61 = load i64, i64* %11
%62 = add nsw i64 %61, 1
store i64 %62, i64* %11
br label %44
63: ; preds = %44
%64 = load i32, i32* @scale_gridbox_area.lgridboxinfo
%65 = icmp ne i32 %64, 0
br i1 %65, label %66, label %69
66: ; preds = %63
%67 = load double, double* %12
%68 = call i32 @cdoPrint(i8* getelementptr inbounds ([39 x i8], [39 x i8]* @.str, i64 0, i64 0), double %67)
store i32 0, i32* @scale_gridbox_area.lgridboxinfo
br label %69
69: ; preds = %66, %63
ret void
}

LLVM IR (-O2):
@scale_gridbox_area.lgridboxinfo = internal unnamed_addr global i1 false
@.str = [39 x i8] c"gridbox_area replaced and scaled to %g\00"
define void @scale_gridbox_area(i64 %0, double* noalias nocapture %1, i64 %2, double* noalias nocapture writeonly %3, double* noalias nocapture %4) {
%6 = icmp sgt i64 %0, 0
br i1 %6, label %7, label %28
7: ; preds = %5
%8 = add i64 %0, -1
%9 = and i64 %0, 7
%10 = icmp ult i64 %8, 7
br i1 %10, label %13, label %11
11: ; preds = %7
%12 = and i64 %0, -8
br label %37
13: ; preds = %37, %7
%14 = phi double [ undef, %7 ], [ %71, %37 ]
%15 = phi double [ 0.000000e+00, %7 ], [ %71, %37 ]
%16 = phi i64 [ 0, %7 ], [ %72, %37 ]
%17 = icmp eq i64 %9, 0
br i1 %17, label %28, label %18
18: ; preds = %13, %18
%19 = phi double [ %24, %18 ], [ %15, %13 ]
%20 = phi i64 [ %25, %18 ], [ %16, %13 ]
%21 = phi i64 [ %26, %18 ], [ 0, %13 ]
%22 = getelementptr inbounds double, double* %1, i64 %20
%23 = load double, double* %22
%24 = fadd double %19, %23
%25 = add nuw nsw i64 %20, 1
%26 = add i64 %21, 1
%27 = icmp eq i64 %26, %9
br i1 %27, label %28, label %18
28: ; preds = %13, %18, %5
%29 = phi double [ 0.000000e+00, %5 ], [ %14, %13 ], [ %24, %18 ]
%30 = icmp sgt i64 %2, 0
br i1 %30, label %31, label %190
31: ; preds = %28
%32 = add i64 %2, -1
%33 = and i64 %2, 7
%34 = icmp ult i64 %32, 7
br i1 %34, label %75, label %35
35: ; preds = %31
%36 = and i64 %2, -8
br label %143
37: ; preds = %37, %11
%38 = phi double [ 0.000000e+00, %11 ], [ %71, %37 ]
%39 = phi i64 [ 0, %11 ], [ %72, %37 ]
%40 = phi i64 [ 0, %11 ], [ %73, %37 ]
%41 = getelementptr inbounds double, double* %1, i64 %39
%42 = load double, double* %41
%43 = fadd double %38, %42
%44 = or i64 %39, 1
%45 = getelementptr inbounds double, double* %1, i64 %44
%46 = load double, double* %45
%47 = fadd double %43, %46
%48 = or i64 %39, 2
%49 = getelementptr inbounds double, double* %1, i64 %48
%50 = load double, double* %49
%51 = fadd double %47, %50
%52 = or i64 %39, 3
%53 = getelementptr inbounds double, double* %1, i64 %52
%54 = load double, double* %53
%55 = fadd double %51, %54
%56 = or i64 %39, 4
%57 = getelementptr inbounds double, double* %1, i64 %56
%58 = load double, double* %57
%59 = fadd double %55, %58
%60 = or i64 %39, 5
%61 = getelementptr inbounds double, double* %1, i64 %60
%62 = load double, double* %61
%63 = fadd double %59, %62
%64 = or i64 %39, 6
%65 = getelementptr inbounds double, double* %1, i64 %64
%66 = load double, double* %65
%67 = fadd double %63, %66
%68 = or i64 %39, 7
%69 = getelementptr inbounds double, double* %1, i64 %68
%70 = load double, double* %69
%71 = fadd double %67, %70
%72 = add nuw nsw i64 %39, 8
%73 = add i64 %40, 8
%74 = icmp eq i64 %73, %12
br i1 %74, label %13, label %37
75: ; preds = %143, %31
%76 = phi double [ undef, %31 ], [ %177, %143 ]
%77 = phi double [ 0.000000e+00, %31 ], [ %177, %143 ]
%78 = phi i64 [ 0, %31 ], [ %178, %143 ]
%79 = icmp eq i64 %33, 0
br i1 %79, label %90, label %80
80: ; preds = %75, %80
%81 = phi double [ %86, %80 ], [ %77, %75 ]
%82 = phi i64 [ %87, %80 ], [ %78, %75 ]
%83 = phi i64 [ %88, %80 ], [ 0, %75 ]
%84 = getelementptr inbounds double, double* %4, i64 %82
%85 = load double, double* %84
%86 = fadd double %81, %85
%87 = add nuw nsw i64 %82, 1
%88 = add i64 %83, 1
%89 = icmp eq i64 %88, %33
br i1 %89, label %90, label %80
90: ; preds = %80, %75
%91 = phi double [ %76, %75 ], [ %86, %80 ]
br i1 %30, label %92, label %190
92: ; preds = %90
%93 = icmp eq i64 %2, 1
br i1 %93, label %141, label %94
94: ; preds = %92
%95 = and i64 %2, -2
%96 = insertelement <2 x double> poison, double %91, i64 0
%97 = shufflevector <2 x double> %96, <2 x double> poison, <2 x i32> zeroinitializer
%98 = insertelement <2 x double> poison, double %29, i64 0
%99 = shufflevector <2 x double> %98, <2 x double> poison, <2 x i32> zeroinitializer
%100 = add i64 %95, -2
%101 = lshr exact i64 %100, 1
%102 = add nuw i64 %101, 1
%103 = and i64 %102, 1
%104 = icmp eq i64 %100, 0
br i1 %104, label %128, label %105
105: ; preds = %94
%106 = and i64 %102, -2
br label %107
107: ; preds = %107, %105
%108 = phi i64 [ 0, %105 ], [ %125, %107 ]
%109 = phi i64 [ 0, %105 ], [ %126, %107 ]
%110 = getelementptr inbounds double, double* %4, i64 %108
%111 = bitcast double* %110 to <2 x double>*
%112 = load <2 x double>, <2 x double>* %111
%113 = fdiv <2 x double> %112, %97
%114 = fmul <2 x double> %99, %113
%115 = getelementptr inbounds double, double* %3, i64 %108
%116 = bitcast double* %115 to <2 x double>*
store <2 x double> %114, <2 x double>* %116
%117 = or i64 %108, 2
%118 = getelementptr inbounds double, double* %4, i64 %117
%119 = bitcast double* %118 to <2 x double>*
%120 = load <2 x double>, <2 x double>* %119
%121 = fdiv <2 x double> %120, %97
%122 = fmul <2 x double> %99, %121
%123 = getelementptr inbounds double, double* %3, i64 %117
%124 = bitcast double* %123 to <2 x double>*
store <2 x double> %122, <2 x double>* %124
%125 = add nuw i64 %108, 4
%126 = add nuw i64 %109, 2
%127 = icmp eq i64 %126, %106
br i1 %127, label %128, label %107
128: ; preds = %107, %94
%129 = phi i64 [ 0, %94 ], [ %125, %107 ]
%130 = icmp eq i64 %103, 0
br i1 %130, label %139, label %131
131: ; preds = %128
%132 = getelementptr inbounds double, double* %4, i64 %129
%133 = bitcast double* %132 to <2 x double>*
%134 = load <2 x double>, <2 x double>* %133
%135 = fdiv <2 x double> %134, %97
%136 = fmul <2 x double> %99, %135
%137 = getelementptr inbounds double, double* %3, i64 %129
%138 = bitcast double* %137 to <2 x double>*
store <2 x double> %136, <2 x double>* %138
br label %139
139: ; preds = %128, %131
%140 = icmp eq i64 %95, %2
br i1 %140, label %190, label %141
141: ; preds = %92, %139
%142 = phi i64 [ 0, %92 ], [ %95, %139 ]
br label %181
143: ; preds = %143, %35
%144 = phi double [ 0.000000e+00, %35 ], [ %177, %143 ]
%145 = phi i64 [ 0, %35 ], [ %178, %143 ]
%146 = phi i64 [ 0, %35 ], [ %179, %143 ]
%147 = getelementptr inbounds double, double* %4, i64 %145
%148 = load double, double* %147
%149 = fadd double %144, %148
%150 = or i64 %145, 1
%151 = getelementptr inbounds double, double* %4, i64 %150
%152 = load double, double* %151
%153 = fadd double %149, %152
%154 = or i64 %145, 2
%155 = getelementptr inbounds double, double* %4, i64 %154
%156 = load double, double* %155
%157 = fadd double %153, %156
%158 = or i64 %145, 3
%159 = getelementptr inbounds double, double* %4, i64 %158
%160 = load double, double* %159
%161 = fadd double %157, %160
%162 = or i64 %145, 4
%163 = getelementptr inbounds double, double* %4, i64 %162
%164 = load double, double* %163
%165 = fadd double %161, %164
%166 = or i64 %145, 5
%167 = getelementptr inbounds double, double* %4, i64 %166
%168 = load double, double* %167
%169 = fadd double %165, %168
%170 = or i64 %145, 6
%171 = getelementptr inbounds double, double* %4, i64 %170
%172 = load double, double* %171
%173 = fadd double %169, %172
%174 = or i64 %145, 7
%175 = getelementptr inbounds double, double* %4, i64 %174
%176 = load double, double* %175
%177 = fadd double %173, %176
%178 = add nuw nsw i64 %145, 8
%179 = add i64 %146, 8
%180 = icmp eq i64 %179, %36
br i1 %180, label %75, label %143
181: ; preds = %141, %181
%182 = phi i64 [ %188, %181 ], [ %142, %141 ]
%183 = getelementptr inbounds double, double* %4, i64 %182
%184 = load double, double* %183
%185 = fdiv double %184, %91
%186 = fmul double %29, %185
%187 = getelementptr inbounds double, double* %3, i64 %182
store double %186, double* %187
%188 = add nuw nsw i64 %182, 1
%189 = icmp eq i64 %188, %2
br i1 %189, label %190, label %181
190: ; preds = %181, %139, %28, %90
%191 = load i1, i1* @scale_gridbox_area.lgridboxinfo
br i1 %191, label %194, label %192
192: ; preds = %190
%193 = tail call i32 @cdoPrint(i8* getelementptr inbounds ([39 x i8], [39 x i8]* @.str, i64 0, i64 0), double %29)
store i1 true, i1* @scale_gridbox_area.lgridboxinfo
br label %194
194: ; preds = %192, %190
ret void
}