#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 */
double fabs(int);
float traparea(float a[], float cphi, float r) {
  float phi2xy(float phi, float r, float a[], float *x, float *y);
  float x[5], y[5], area, delphi;
  delphi = 1.0 / 180. * 3.14159265352982;
  phi2xy(cphi - delphi / 2., (r * (1 + 0.01) + r) / 2., a, &x[1], &y[1]);
  phi2xy(cphi + delphi / 2., (r * (1 + 0.01) + r) / 2., a, &x[2], &y[2]);
  phi2xy(cphi + delphi / 2., (r / (1 + 0.01) + r) / 2., a, &x[3], &y[3]);
  phi2xy(cphi - delphi / 2., (r / (1 + 0.01) + r) / 2., a, &x[4], &y[4]);
  area = 0.5 *
         (fabs((x[1] - x[2]) * (y[3] - y[2]) - (y[1] - y[2]) * (x[3] - x[2])) +
          fabs((x[1] - x[4]) * (y[3] - y[4]) - (y[1] - y[4]) * (x[3] - x[4])));
  return (area);
}


x86 assembly (clang, -O0):
<traparea>:
push   %rbp
mov    %rsp,%rbp
sub    $0x60,%rsp
mov    %rdi,-0x8(%rbp)
movss  %xmm0,-0xc(%rbp)
movss  %xmm1,-0x10(%rbp)
movss  0xeda(%rip),%xmm0
movss  %xmm0,-0x58(%rbp)
movss  -0xc(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
movss  -0x58(%rbp),%xmm1
cvtss2sd %xmm1,%xmm1
movsd  0xeab(%rip),%xmm2
divsd  %xmm2,%xmm1
subsd  %xmm1,%xmm0
cvtsd2ss %xmm0,%xmm0
movss  -0x10(%rbp),%xmm1
cvtss2sd %xmm1,%xmm1
movss  -0x10(%rbp),%xmm2
cvtss2sd %xmm2,%xmm2
movsd  0xe8d(%rip),%xmm3
mulsd  %xmm3,%xmm1
addsd  %xmm2,%xmm1
movsd  0xe75(%rip),%xmm2
divsd  %xmm2,%xmm1
cvtsd2ss %xmm1,%xmm1
mov    -0x8(%rbp),%rdi
lea    -0x30(%rbp),%rsi
add    $0x4,%rsi
lea    -0x50(%rbp),%rdx
add    $0x4,%rdx
call   1040 <phi2xy@plt>
movss  -0xc(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
movss  -0x58(%rbp),%xmm1
cvtss2sd %xmm1,%xmm1
movsd  0xe3a(%rip),%xmm2
divsd  %xmm2,%xmm1
addsd  %xmm1,%xmm0
cvtsd2ss %xmm0,%xmm0
movss  -0x10(%rbp),%xmm1
cvtss2sd %xmm1,%xmm1
movss  -0x10(%rbp),%xmm2
cvtss2sd %xmm2,%xmm2
movsd  0xe1c(%rip),%xmm3
mulsd  %xmm3,%xmm1
addsd  %xmm2,%xmm1
movsd  0xe04(%rip),%xmm2
divsd  %xmm2,%xmm1
cvtsd2ss %xmm1,%xmm1
mov    -0x8(%rbp),%rdi
lea    -0x30(%rbp),%rsi
add    $0x8,%rsi
lea    -0x50(%rbp),%rdx
add    $0x8,%rdx
call   1040 <phi2xy@plt>
movss  -0xc(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
movss  -0x58(%rbp),%xmm1
cvtss2sd %xmm1,%xmm1
movsd  0xdc9(%rip),%xmm2
divsd  %xmm2,%xmm1
addsd  %xmm1,%xmm0
cvtsd2ss %xmm0,%xmm0
movss  -0x10(%rbp),%xmm1
cvtss2sd %xmm1,%xmm1
movsd  0xdb4(%rip),%xmm2
divsd  %xmm2,%xmm1
movss  -0x10(%rbp),%xmm2
cvtss2sd %xmm2,%xmm2
addsd  %xmm2,%xmm1
movsd  0xd93(%rip),%xmm2
divsd  %xmm2,%xmm1
cvtsd2ss %xmm1,%xmm1
mov    -0x8(%rbp),%rdi
lea    -0x30(%rbp),%rsi
add    $0xc,%rsi
lea    -0x50(%rbp),%rdx
add    $0xc,%rdx
call   1040 <phi2xy@plt>
movss  -0xc(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
movss  -0x58(%rbp),%xmm1
cvtss2sd %xmm1,%xmm1
movsd  0xd58(%rip),%xmm2
divsd  %xmm2,%xmm1
subsd  %xmm1,%xmm0
cvtsd2ss %xmm0,%xmm0
movss  -0x10(%rbp),%xmm1
cvtss2sd %xmm1,%xmm1
movsd  0xd43(%rip),%xmm2
divsd  %xmm2,%xmm1
movss  -0x10(%rbp),%xmm2
cvtss2sd %xmm2,%xmm2
addsd  %xmm2,%xmm1
movsd  0xd22(%rip),%xmm2
divsd  %xmm2,%xmm1
cvtsd2ss %xmm1,%xmm1
mov    -0x8(%rbp),%rdi
lea    -0x30(%rbp),%rsi
add    $0x10,%rsi
lea    -0x50(%rbp),%rdx
add    $0x10,%rdx
call   1040 <phi2xy@plt>
movss  -0x2c(%rbp),%xmm0
subss  -0x28(%rbp),%xmm0
movss  -0x44(%rbp),%xmm2
subss  -0x48(%rbp),%xmm2
movss  -0x4c(%rbp),%xmm1
subss  -0x48(%rbp),%xmm1
movss  -0x24(%rbp),%xmm3
subss  -0x28(%rbp),%xmm3
mulss  %xmm3,%xmm1
movd   %xmm1,%eax
xor    $0x80000000,%eax
movd   %eax,%xmm1
mulss  %xmm2,%xmm0
addss  %xmm1,%xmm0
cvttss2si %xmm0,%edi
call   1030 <fabs@plt>
movsd  %xmm0,-0x60(%rbp)
movss  -0x2c(%rbp),%xmm0
subss  -0x20(%rbp),%xmm0
movss  -0x44(%rbp),%xmm2
subss  -0x40(%rbp),%xmm2
movss  -0x4c(%rbp),%xmm1
subss  -0x40(%rbp),%xmm1
movss  -0x24(%rbp),%xmm3
subss  -0x20(%rbp),%xmm3
mulss  %xmm3,%xmm1
movd   %xmm1,%eax
xor    $0x80000000,%eax
movd   %eax,%xmm1
mulss  %xmm2,%xmm0
addss  %xmm1,%xmm0
cvttss2si %xmm0,%edi
call   1030 <fabs@plt>
movsd  -0x60(%rbp),%xmm1
addsd  %xmm0,%xmm1
movsd  0xc4f(%rip),%xmm0
mulsd  %xmm1,%xmm0
cvtsd2ss %xmm0,%xmm0
movss  %xmm0,-0x54(%rbp)
movss  -0x54(%rbp),%xmm0
add    $0x60,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<traparea>:
push   %rbx
sub    $0x60,%rsp
movss  %xmm0,0x8(%rsp)
mov    %rdi,%rbx
movss  0xeca(%rip),%xmm2
addss  %xmm0,%xmm2
movaps %xmm2,%xmm0
movss  %xmm2,0x5c(%rsp)
xorps  %xmm2,%xmm2
cvtss2sd %xmm1,%xmm2
movsd  %xmm2,0x50(%rsp)
movaps %xmm2,%xmm1
mulsd  0xead(%rip),%xmm1
addsd  %xmm2,%xmm1
mulsd  0xea9(%rip),%xmm1
cvtsd2ss %xmm1,%xmm1
movss  %xmm1,0x58(%rsp)
lea    0x34(%rsp),%rsi
lea    0x14(%rsp),%rdx
call   1040 <phi2xy@plt>
movss  0x8(%rsp),%xmm0
addss  0xe76(%rip),%xmm0
movss  %xmm0,0x8(%rsp)
lea    0x38(%rsp),%rsi
lea    0x18(%rsp),%rdx
movss  0x58(%rsp),%xmm1
mov    %rbx,%rdi
call   1040 <phi2xy@plt>
movsd  0x50(%rsp),%xmm1
movapd %xmm1,%xmm0
divsd  0xe4a(%rip),%xmm0
addsd  %xmm1,%xmm0
mulsd  0xe46(%rip),%xmm0
xorps  %xmm1,%xmm1
cvtsd2ss %xmm0,%xmm1
movss  %xmm1,0x50(%rsp)
lea    0x3c(%rsp),%rsi
lea    0x1c(%rsp),%rdx
movss  0x8(%rsp),%xmm0
mov    %rbx,%rdi
call   1040 <phi2xy@plt>
lea    0x40(%rsp),%rsi
lea    0x20(%rsp),%rdx
movss  0x5c(%rsp),%xmm0
movss  0x50(%rsp),%xmm1
mov    %rbx,%rdi
call   1040 <phi2xy@plt>
movss  0x34(%rsp),%xmm0
movss  0x38(%rsp),%xmm1
subss  %xmm1,%xmm0
movss  0x1c(%rsp),%xmm2
movss  0x14(%rsp),%xmm3
movss  0x18(%rsp),%xmm4
subss  %xmm4,%xmm2
mulss  %xmm0,%xmm2
subss  %xmm4,%xmm3
movss  0x3c(%rsp),%xmm0
subss  %xmm1,%xmm0
mulss  %xmm3,%xmm0
subss  %xmm0,%xmm2
cvttss2si %xmm2,%edi
call   1030 <fabs@plt>
movsd  %xmm0,0x8(%rsp)
movss  0x40(%rsp),%xmm0
movss  0x34(%rsp),%xmm1
movss  0x3c(%rsp),%xmm2
subss  %xmm0,%xmm1
movss  0x14(%rsp),%xmm3
movss  0x1c(%rsp),%xmm4
movss  0x20(%rsp),%xmm5
subss  %xmm5,%xmm4
mulss  %xmm1,%xmm4
subss  %xmm5,%xmm3
subss  %xmm0,%xmm2
mulss  %xmm3,%xmm2
subss  %xmm2,%xmm4
cvttss2si %xmm4,%edi
call   1030 <fabs@plt>
addsd  0x8(%rsp),%xmm0
mulsd  0xd5d(%rip),%xmm0
cvtsd2ss %xmm0,%xmm0
add    $0x60,%rsp
pop    %rbx
ret

LLVM IR (-O0):
define float @traparea(float* %0, float %1, float %2) {
%4 = alloca float*
%5 = alloca float
%6 = alloca float
%7 = alloca [5 x float]
%8 = alloca [5 x float]
%9 = alloca float
%10 = alloca float
store float* %0, float** %4
store float %1, float* %5
store float %2, float* %6
store float 0x3F91DF46A0000000, float* %10
%11 = load float, float* %5
%12 = fpext float %11 to double
%13 = load float, float* %10
%14 = fpext float %13 to double
%15 = fdiv double %14, 2.000000e+00
%16 = fsub double %12, %15
%17 = fptrunc double %16 to float
%18 = load float, float* %6
%19 = fpext float %18 to double
%20 = load float, float* %6
%21 = fpext float %20 to double
%22 = call double @llvm.fmuladd.f64(double %19, double 1.010000e+00, double %21)
%23 = fdiv double %22, 2.000000e+00
%24 = fptrunc double %23 to float
%25 = load float*, float** %4
%26 = getelementptr inbounds [5 x float], [5 x float]* %7, i64 0, i64 1
%27 = getelementptr inbounds [5 x float], [5 x float]* %8, i64 0, i64 1
%28 = call float @phi2xy(float %17, float %24, float* %25, float* %26, float* %27)
%29 = load float, float* %5
%30 = fpext float %29 to double
%31 = load float, float* %10
%32 = fpext float %31 to double
%33 = fdiv double %32, 2.000000e+00
%34 = fadd double %30, %33
%35 = fptrunc double %34 to float
%36 = load float, float* %6
%37 = fpext float %36 to double
%38 = load float, float* %6
%39 = fpext float %38 to double
%40 = call double @llvm.fmuladd.f64(double %37, double 1.010000e+00, double %39)
%41 = fdiv double %40, 2.000000e+00
%42 = fptrunc double %41 to float
%43 = load float*, float** %4
%44 = getelementptr inbounds [5 x float], [5 x float]* %7, i64 0, i64 2
%45 = getelementptr inbounds [5 x float], [5 x float]* %8, i64 0, i64 2
%46 = call float @phi2xy(float %35, float %42, float* %43, float* %44, float* %45)
%47 = load float, float* %5
%48 = fpext float %47 to double
%49 = load float, float* %10
%50 = fpext float %49 to double
%51 = fdiv double %50, 2.000000e+00
%52 = fadd double %48, %51
%53 = fptrunc double %52 to float
%54 = load float, float* %6
%55 = fpext float %54 to double
%56 = fdiv double %55, 1.010000e+00
%57 = load float, float* %6
%58 = fpext float %57 to double
%59 = fadd double %56, %58
%60 = fdiv double %59, 2.000000e+00
%61 = fptrunc double %60 to float
%62 = load float*, float** %4
%63 = getelementptr inbounds [5 x float], [5 x float]* %7, i64 0, i64 3
%64 = getelementptr inbounds [5 x float], [5 x float]* %8, i64 0, i64 3
%65 = call float @phi2xy(float %53, float %61, float* %62, float* %63, float* %64)
%66 = load float, float* %5
%67 = fpext float %66 to double
%68 = load float, float* %10
%69 = fpext float %68 to double
%70 = fdiv double %69, 2.000000e+00
%71 = fsub double %67, %70
%72 = fptrunc double %71 to float
%73 = load float, float* %6
%74 = fpext float %73 to double
%75 = fdiv double %74, 1.010000e+00
%76 = load float, float* %6
%77 = fpext float %76 to double
%78 = fadd double %75, %77
%79 = fdiv double %78, 2.000000e+00
%80 = fptrunc double %79 to float
%81 = load float*, float** %4
%82 = getelementptr inbounds [5 x float], [5 x float]* %7, i64 0, i64 4
%83 = getelementptr inbounds [5 x float], [5 x float]* %8, i64 0, i64 4
%84 = call float @phi2xy(float %72, float %80, float* %81, float* %82, float* %83)
%85 = getelementptr inbounds [5 x float], [5 x float]* %7, i64 0, i64 1
%86 = load float, float* %85
%87 = getelementptr inbounds [5 x float], [5 x float]* %7, i64 0, i64 2
%88 = load float, float* %87
%89 = fsub float %86, %88
%90 = getelementptr inbounds [5 x float], [5 x float]* %8, i64 0, i64 3
%91 = load float, float* %90
%92 = getelementptr inbounds [5 x float], [5 x float]* %8, i64 0, i64 2
%93 = load float, float* %92
%94 = fsub float %91, %93
%95 = getelementptr inbounds [5 x float], [5 x float]* %8, i64 0, i64 1
%96 = load float, float* %95
%97 = getelementptr inbounds [5 x float], [5 x float]* %8, i64 0, i64 2
%98 = load float, float* %97
%99 = fsub float %96, %98
%100 = getelementptr inbounds [5 x float], [5 x float]* %7, i64 0, i64 3
%101 = load float, float* %100
%102 = getelementptr inbounds [5 x float], [5 x float]* %7, i64 0, i64 2
%103 = load float, float* %102
%104 = fsub float %101, %103
%105 = fmul float %99, %104
%106 = fneg float %105
%107 = call float @llvm.fmuladd.f32(float %89, float %94, float %106)
%108 = fptosi float %107 to i32
%109 = call double @fabs(i32 %108)
%110 = getelementptr inbounds [5 x float], [5 x float]* %7, i64 0, i64 1
%111 = load float, float* %110
%112 = getelementptr inbounds [5 x float], [5 x float]* %7, i64 0, i64 4
%113 = load float, float* %112
%114 = fsub float %111, %113
%115 = getelementptr inbounds [5 x float], [5 x float]* %8, i64 0, i64 3
%116 = load float, float* %115
%117 = getelementptr inbounds [5 x float], [5 x float]* %8, i64 0, i64 4
%118 = load float, float* %117
%119 = fsub float %116, %118
%120 = getelementptr inbounds [5 x float], [5 x float]* %8, i64 0, i64 1
%121 = load float, float* %120
%122 = getelementptr inbounds [5 x float], [5 x float]* %8, i64 0, i64 4
%123 = load float, float* %122
%124 = fsub float %121, %123
%125 = getelementptr inbounds [5 x float], [5 x float]* %7, i64 0, i64 3
%126 = load float, float* %125
%127 = getelementptr inbounds [5 x float], [5 x float]* %7, i64 0, i64 4
%128 = load float, float* %127
%129 = fsub float %126, %128
%130 = fmul float %124, %129
%131 = fneg float %130
%132 = call float @llvm.fmuladd.f32(float %114, float %119, float %131)
%133 = fptosi float %132 to i32
%134 = call double @fabs(i32 %133)
%135 = fadd double %109, %134
%136 = fmul double 5.000000e-01, %135
%137 = fptrunc double %136 to float
store float %137, float* %9
%138 = load float, float* %9
ret float %138
}

LLVM IR (-O2):
define float @traparea(float* %0, float %1, float %2) {
%4 = alloca [5 x float]
%5 = alloca [5 x float]
%6 = bitcast [5 x float]* %4 to i8*
%7 = bitcast [5 x float]* %5 to i8*
%8 = fadd float %1, 0xBF81DF46A0000000
%9 = fpext float %2 to double
%10 = tail call double @llvm.fmuladd.f64(double %9, double 1.010000e+00, double %9)
%11 = fmul double %10, 5.000000e-01
%12 = fptrunc double %11 to float
%13 = getelementptr inbounds [5 x float], [5 x float]* %4, i64 0, i64 1
%14 = getelementptr inbounds [5 x float], [5 x float]* %5, i64 0, i64 1
%15 = call float @phi2xy(float %8, float %12, float* %0, float* %13, float* %14)
%16 = fadd float %1, 0x3F81DF46A0000000
%17 = getelementptr inbounds [5 x float], [5 x float]* %4, i64 0, i64 2
%18 = getelementptr inbounds [5 x float], [5 x float]* %5, i64 0, i64 2
%19 = call float @phi2xy(float %16, float %12, float* %0, float* %17, float* %18)
%20 = fdiv double %9, 1.010000e+00
%21 = fadd double %20, %9
%22 = fmul double %21, 5.000000e-01
%23 = fptrunc double %22 to float
%24 = getelementptr inbounds [5 x float], [5 x float]* %4, i64 0, i64 3
%25 = getelementptr inbounds [5 x float], [5 x float]* %5, i64 0, i64 3
%26 = call float @phi2xy(float %16, float %23, float* %0, float* %24, float* %25)
%27 = getelementptr inbounds [5 x float], [5 x float]* %4, i64 0, i64 4
%28 = getelementptr inbounds [5 x float], [5 x float]* %5, i64 0, i64 4
%29 = call float @phi2xy(float %8, float %23, float* %0, float* %27, float* %28)
%30 = load float, float* %13
%31 = load float, float* %17
%32 = fsub float %30, %31
%33 = load float, float* %25
%34 = load float, float* %18
%35 = fsub float %33, %34
%36 = load float, float* %14
%37 = fsub float %36, %34
%38 = load float, float* %24
%39 = fsub float %38, %31
%40 = fneg float %37
%41 = fmul float %39, %40
%42 = call float @llvm.fmuladd.f32(float %32, float %35, float %41)
%43 = fptosi float %42 to i32
%44 = call double @fabs(i32 %43)
%45 = load float, float* %13
%46 = load float, float* %27
%47 = fsub float %45, %46
%48 = load float, float* %25
%49 = load float, float* %28
%50 = fsub float %48, %49
%51 = load float, float* %14
%52 = fsub float %51, %49
%53 = load float, float* %24
%54 = fsub float %53, %46
%55 = fneg float %52
%56 = fmul float %54, %55
%57 = call float @llvm.fmuladd.f32(float %47, float %50, float %56)
%58 = fptosi float %57 to i32
%59 = call double @fabs(i32 %58)
%60 = fadd double %44, %59
%61 = fmul double %60, 5.000000e-01
%62 = fptrunc double %61 to float
ret float %62
}