int ti_typprice(int size, double const *const *inputs, double const *options,
                double *const *outputs) {
  const double *high = inputs[0];
  const double *low = inputs[1];
  const double *close = inputs[2];
  (void)options;
  double *output = outputs[0];
  int i;
  for (i = 0; i < size; ++i) {
    output[i] = (high[i] + low[i] + close[i]) * (1.0 / 3.0);
  }
  return 0;
}


x86 assembly (clang, -O0):
<ti_typprice>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    -0x10(%rbp),%rax
mov    (%rax),%rax
mov    %rax,-0x28(%rbp)
mov    -0x10(%rbp),%rax
mov    0x8(%rax),%rax
mov    %rax,-0x30(%rbp)
mov    -0x10(%rbp),%rax
mov    0x10(%rax),%rax
mov    %rax,-0x38(%rbp)
mov    -0x20(%rbp),%rax
mov    (%rax),%rax
mov    %rax,-0x40(%rbp)
movl   $0x0,-0x44(%rbp)
mov    -0x44(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    11a2 <ti_typprice+0xa2>
mov    -0x28(%rbp),%rax
movslq -0x44(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x30(%rbp),%rax
movslq -0x44(%rbp),%rcx
addsd  (%rax,%rcx,8),%xmm0
mov    -0x38(%rbp),%rax
movslq -0x44(%rbp),%rcx
addsd  (%rax,%rcx,8),%xmm0
movsd  0xe7d(%rip),%xmm1
mulsd  %xmm1,%xmm0
mov    -0x40(%rbp),%rax
movslq -0x44(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x44(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x44(%rbp)
jmp    1148 <ti_typprice+0x48>
xor    %eax,%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<ti_typprice>:
push   %rbp
push   %r14
push   %rbx
test   %edi,%edi
jle    126f <ti_typprice+0x16f>
mov    (%rsi),%r10
mov    0x8(%rsi),%rdx
mov    0x10(%rsi),%rsi
mov    (%rcx),%rcx
mov    %edi,%r8d
cmp    $0x4,%edi
jae    1129 <ti_typprice+0x29>
xor    %edi,%edi
jmp    11f4 <ti_typprice+0xf4>
lea    (%rcx,%r8,8),%rdi
lea    (%r10,%r8,8),%rax
lea    (%rdx,%r8,8),%rbx
lea    (%rsi,%r8,8),%r9
cmp    %rax,%rcx
setb   %bpl
cmp    %rdi,%r10
setb   %r14b
cmp    %rbx,%rcx
setb   %al
cmp    %rdi,%rdx
setb   %r11b
cmp    %r9,%rcx
setb   %r9b
cmp    %rdi,%rsi
setb   %bl
xor    %edi,%edi
test   %r14b,%bpl
jne    11f4 <ti_typprice+0xf4>
and    %r11b,%al
jne    11f4 <ti_typprice+0xf4>
and    %bl,%r9b
jne    11f4 <ti_typprice+0xf4>
mov    %r8d,%edi
and    $0xfffffffc,%edi
lea    0x0(,%r8,8),%r9
and    $0xffffffffffffffe0,%r9
xor    %eax,%eax
movapd 0xe6a(%rip),%xmm0
cs nopw 0x0(%rax,%rax,1)
movupd (%r10,%rax,1),%xmm1
movupd 0x10(%r10,%rax,1),%xmm2
movupd (%rdx,%rax,1),%xmm3
addpd  %xmm1,%xmm3
movupd 0x10(%rdx,%rax,1),%xmm1
addpd  %xmm2,%xmm1
movupd (%rsi,%rax,1),%xmm2
addpd  %xmm3,%xmm2
movupd 0x10(%rsi,%rax,1),%xmm3
addpd  %xmm1,%xmm3
mulpd  %xmm0,%xmm2
mulpd  %xmm0,%xmm3
movupd %xmm2,(%rcx,%rax,1)
movupd %xmm3,0x10(%rcx,%rax,1)
add    $0x20,%rax
cmp    %rax,%r9
jne    11a0 <ti_typprice+0xa0>
cmp    %r8,%rdi
je     126f <ti_typprice+0x16f>
mov    %rdi,%rax
not    %rax
test   $0x1,%r8b
je     1221 <ti_typprice+0x121>
movsd  (%r10,%rdi,8),%xmm0
addsd  (%rdx,%rdi,8),%xmm0
addsd  (%rsi,%rdi,8),%xmm0
mulsd  0xdf8(%rip),%xmm0
movsd  %xmm0,(%rcx,%rdi,8)
or     $0x1,%rdi
add    %r8,%rax
je     126f <ti_typprice+0x16f>
movsd  0xde2(%rip),%xmm0
xchg   %ax,%ax
movsd  (%r10,%rdi,8),%xmm1
addsd  (%rdx,%rdi,8),%xmm1
addsd  (%rsi,%rdi,8),%xmm1
mulsd  %xmm0,%xmm1
movsd  %xmm1,(%rcx,%rdi,8)
movsd  0x8(%r10,%rdi,8),%xmm1
addsd  0x8(%rdx,%rdi,8),%xmm1
addsd  0x8(%rsi,%rdi,8),%xmm1
mulsd  %xmm0,%xmm1
movsd  %xmm1,0x8(%rcx,%rdi,8)
add    $0x2,%rdi
cmp    %rdi,%r8
jne    1230 <ti_typprice+0x130>
xor    %eax,%eax
pop    %rbx
pop    %r14
pop    %rbp
ret

LLVM IR (-O0):
define i32 @ti_typprice(i32 %0, double** %1, double* %2, double** %3) {
%5 = alloca i32
%6 = alloca double**
%7 = alloca double*
%8 = alloca double**
%9 = alloca double*
%10 = alloca double*
%11 = alloca double*
%12 = alloca double*
%13 = alloca i32
store i32 %0, i32* %5
store double** %1, double*** %6
store double* %2, double** %7
store double** %3, double*** %8
%14 = load double**, double*** %6
%15 = getelementptr inbounds double*, double** %14, i64 0
%16 = load double*, double** %15
store double* %16, double** %9
%17 = load double**, double*** %6
%18 = getelementptr inbounds double*, double** %17, i64 1
%19 = load double*, double** %18
store double* %19, double** %10
%20 = load double**, double*** %6
%21 = getelementptr inbounds double*, double** %20, i64 2
%22 = load double*, double** %21
store double* %22, double** %11
%23 = load double*, double** %7
%24 = load double**, double*** %8
%25 = getelementptr inbounds double*, double** %24, i64 0
%26 = load double*, double** %25
store double* %26, double** %12
store i32 0, i32* %13
br label %27
27: ; preds = %54, %4
%28 = load i32, i32* %13
%29 = load i32, i32* %5
%30 = icmp slt i32 %28, %29
br i1 %30, label %31, label %57
31: ; preds = %27
%32 = load double*, double** %9
%33 = load i32, i32* %13
%34 = sext i32 %33 to i64
%35 = getelementptr inbounds double, double* %32, i64 %34
%36 = load double, double* %35
%37 = load double*, double** %10
%38 = load i32, i32* %13
%39 = sext i32 %38 to i64
%40 = getelementptr inbounds double, double* %37, i64 %39
%41 = load double, double* %40
%42 = fadd double %36, %41
%43 = load double*, double** %11
%44 = load i32, i32* %13
%45 = sext i32 %44 to i64
%46 = getelementptr inbounds double, double* %43, i64 %45
%47 = load double, double* %46
%48 = fadd double %42, %47
%49 = fmul double %48, 0x3FD5555555555555
%50 = load double*, double** %12
%51 = load i32, i32* %13
%52 = sext i32 %51 to i64
%53 = getelementptr inbounds double, double* %50, i64 %52
store double %49, double* %53
br label %54
54: ; preds = %31
%55 = load i32, i32* %13
%56 = add nsw i32 %55, 1
store i32 %56, i32* %13
br label %27
57: ; preds = %27
ret i32 0
}

LLVM IR (-O2):
define i32 @ti_typprice(i32 %0, double** nocapture %1, double* nocapture readnone %2, double** nocapture %3) {
%5 = load double*, double** %1
%6 = getelementptr inbounds double*, double** %1, i64 1
%7 = load double*, double** %6
%8 = getelementptr inbounds double*, double** %1, i64 2
%9 = load double*, double** %8
%10 = load double*, double** %3
%11 = icmp sgt i32 %0, 0
br i1 %11, label %12, label %113
12: ; preds = %4
%13 = zext i32 %0 to i64
%14 = icmp ult i32 %0, 4
br i1 %14, label %67, label %15
15: ; preds = %12
%16 = getelementptr double, double* %10, i64 %13
%17 = getelementptr double, double* %5, i64 %13
%18 = getelementptr double, double* %7, i64 %13
%19 = getelementptr double, double* %9, i64 %13
%20 = icmp ult double* %10, %17
%21 = icmp ult double* %5, %16
%22 = and i1 %20, %21
%23 = icmp ult double* %10, %18
%24 = icmp ult double* %7, %16
%25 = and i1 %23, %24
%26 = or i1 %22, %25
%27 = icmp ult double* %10, %19
%28 = icmp ult double* %9, %16
%29 = and i1 %27, %28
%30 = or i1 %26, %29
br i1 %30, label %67, label %31
31: ; preds = %15
%32 = and i64 %13, 4294967292
br label %33
33: ; preds = %33, %31
%34 = phi i64 [ 0, %31 ], [ %63, %33 ]
%35 = getelementptr inbounds double, double* %5, i64 %34
%36 = bitcast double* %35 to <2 x double>*
%37 = load <2 x double>, <2 x double>* %36
%38 = getelementptr inbounds double, double* %35, i64 2
%39 = bitcast double* %38 to <2 x double>*
%40 = load <2 x double>, <2 x double>* %39
%41 = getelementptr inbounds double, double* %7, i64 %34
%42 = bitcast double* %41 to <2 x double>*
%43 = load <2 x double>, <2 x double>* %42
%44 = getelementptr inbounds double, double* %41, i64 2
%45 = bitcast double* %44 to <2 x double>*
%46 = load <2 x double>, <2 x double>* %45
%47 = fadd <2 x double> %37, %43
%48 = fadd <2 x double> %40, %46
%49 = getelementptr inbounds double, double* %9, i64 %34
%50 = bitcast double* %49 to <2 x double>*
%51 = load <2 x double>, <2 x double>* %50
%52 = getelementptr inbounds double, double* %49, i64 2
%53 = bitcast double* %52 to <2 x double>*
%54 = load <2 x double>, <2 x double>* %53
%55 = fadd <2 x double> %47, %51
%56 = fadd <2 x double> %48, %54
%57 = fmul <2 x double> %55, <double 0x3FD5555555555555, double 0x3FD5555555555555>
%58 = fmul <2 x double> %56, <double 0x3FD5555555555555, double 0x3FD5555555555555>
%59 = getelementptr inbounds double, double* %10, i64 %34
%60 = bitcast double* %59 to <2 x double>*
store <2 x double> %57, <2 x double>* %60
%61 = getelementptr inbounds double, double* %59, i64 2
%62 = bitcast double* %61 to <2 x double>*
store <2 x double> %58, <2 x double>* %62
%63 = add nuw i64 %34, 4
%64 = icmp eq i64 %63, %32
br i1 %64, label %65, label %33
65: ; preds = %33
%66 = icmp eq i64 %32, %13
br i1 %66, label %113, label %67
67: ; preds = %15, %12, %65
%68 = phi i64 [ 0, %15 ], [ 0, %12 ], [ %32, %65 ]
%69 = xor i64 %68, -1
%70 = and i64 %13, 1
%71 = icmp eq i64 %70, 0
br i1 %71, label %84, label %72
72: ; preds = %67
%73 = getelementptr inbounds double, double* %5, i64 %68
%74 = load double, double* %73
%75 = getelementptr inbounds double, double* %7, i64 %68
%76 = load double, double* %75
%77 = fadd double %74, %76
%78 = getelementptr inbounds double, double* %9, i64 %68
%79 = load double, double* %78
%80 = fadd double %77, %79
%81 = fmul double %80, 0x3FD5555555555555
%82 = getelementptr inbounds double, double* %10, i64 %68
store double %81, double* %82
%83 = or i64 %68, 1
br label %84
84: ; preds = %72, %67
%85 = phi i64 [ %68, %67 ], [ %83, %72 ]
%86 = sub nsw i64 0, %13
%87 = icmp eq i64 %69, %86
br i1 %87, label %113, label %88
88: ; preds = %84, %88
%89 = phi i64 [ %111, %88 ], [ %85, %84 ]
%90 = getelementptr inbounds double, double* %5, i64 %89
%91 = load double, double* %90
%92 = getelementptr inbounds double, double* %7, i64 %89
%93 = load double, double* %92
%94 = fadd double %91, %93
%95 = getelementptr inbounds double, double* %9, i64 %89
%96 = load double, double* %95
%97 = fadd double %94, %96
%98 = fmul double %97, 0x3FD5555555555555
%99 = getelementptr inbounds double, double* %10, i64 %89
store double %98, double* %99
%100 = add nuw nsw i64 %89, 1
%101 = getelementptr inbounds double, double* %5, i64 %100
%102 = load double, double* %101
%103 = getelementptr inbounds double, double* %7, i64 %100
%104 = load double, double* %103
%105 = fadd double %102, %104
%106 = getelementptr inbounds double, double* %9, i64 %100
%107 = load double, double* %106
%108 = fadd double %105, %107
%109 = fmul double %108, 0x3FD5555555555555
%110 = getelementptr inbounds double, double* %10, i64 %100
store double %109, double* %110
%111 = add nuw nsw i64 %89, 2
%112 = icmp eq i64 %111, %13
br i1 %112, label %113, label %88
113: ; preds = %84, %88, %65, %4
ret i32 0
}