#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 */
scalar_t__ fabs(double);
int /*<<< orphan*/ tf_dx(double *, int, int, double *, double *);
double tf_obj_gauss(double *x, double *y, double *w, int n, int k,
                    double lambda, double *beta, double *buf) {
  int i;
  double loss, pen;
  loss = 0;
  for (i = 0; i < n; i++)
    loss += w[i] * (y[i] - beta[i]) * (y[i] - beta[i]) / 2;
  pen = 0;
  tf_dx(x, n, k + 1, beta, buf);
  for (i = 0; i < n - k - 1; i++)
    pen += fabs(buf[i]);
  return loss + lambda * pen;
}


x86 assembly (clang, -O0):
<tf_obj_gauss>:
push   %rbp
mov    %rsp,%rbp
sub    $0x50,%rsp
mov    0x10(%rbp),%rax
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %ecx,-0x1c(%rbp)
mov    %r8d,-0x20(%rbp)
movsd  %xmm0,-0x28(%rbp)
mov    %r9,-0x30(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x40(%rbp)
movl   $0x0,-0x34(%rbp)
mov    -0x34(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    11d0 <tf_obj_gauss+0xb0>
mov    -0x18(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
mov    -0x30(%rbp),%rax
movslq -0x34(%rbp),%rcx
subsd  (%rax,%rcx,8),%xmm1
mulsd  %xmm1,%xmm0
mov    -0x10(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
mov    -0x30(%rbp),%rax
movslq -0x34(%rbp),%rcx
subsd  (%rax,%rcx,8),%xmm1
mulsd  %xmm1,%xmm0
movsd  0xe4c(%rip),%xmm1
divsd  %xmm1,%xmm0
addsd  -0x40(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
mov    -0x34(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
jmp    1157 <tf_obj_gauss+0x37>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x48(%rbp)
mov    -0x8(%rbp),%rdi
mov    -0x1c(%rbp),%esi
mov    -0x20(%rbp),%edx
add    $0x1,%edx
mov    -0x30(%rbp),%rcx
mov    0x10(%rbp),%r8
call   1040 <tf_dx@plt>
movl   $0x0,-0x34(%rbp)
mov    -0x34(%rbp),%eax
mov    -0x1c(%rbp),%ecx
sub    -0x20(%rbp),%ecx
sub    $0x1,%ecx
cmp    %ecx,%eax
jge    123c <tf_obj_gauss+0x11c>
mov    0x10(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
call   1030 <fabs@plt>
cvtsi2sd %rax,%xmm0
addsd  -0x48(%rbp),%xmm0
movsd  %xmm0,-0x48(%rbp)
mov    -0x34(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
jmp    11f9 <tf_obj_gauss+0xd9>
movsd  -0x40(%rbp),%xmm1
movsd  -0x28(%rbp),%xmm0
movsd  -0x48(%rbp),%xmm2
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
add    $0x50,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<tf_obj_gauss>:
push   %rbp
push   %r15
push   %r14
push   %rbx
sub    $0x18,%rsp
movsd  %xmm0,0x10(%rsp)
mov    %r8d,%r14d
mov    %ecx,%ebp
mov    0x40(%rsp),%r15
xorpd  %xmm4,%xmm4
test   %ecx,%ecx
jle    11e5 <tf_obj_gauss+0xc5>
mov    %ebp,%ebx
cmp    $0x1,%ebp
jne    1155 <tf_obj_gauss+0x35>
xorpd  %xmm4,%xmm4
xor    %ecx,%ecx
jmp    11bc <tf_obj_gauss+0x9c>
mov    %ebx,%eax
and    $0xfffffffe,%eax
xorpd  %xmm4,%xmm4
xor    %ecx,%ecx
movsd  0xe98(%rip),%xmm0
nopl   0x0(%rax,%rax,1)
movsd  (%rsi,%rcx,8),%xmm1
movsd  0x8(%rsi,%rcx,8),%xmm2
subsd  (%r9,%rcx,8),%xmm1
movsd  (%rdx,%rcx,8),%xmm3
mulsd  %xmm1,%xmm3
mulsd  %xmm1,%xmm3
mulsd  %xmm0,%xmm3
subsd  0x8(%r9,%rcx,8),%xmm2
addsd  %xmm4,%xmm3
movsd  0x8(%rdx,%rcx,8),%xmm4
mulsd  %xmm2,%xmm4
mulsd  %xmm2,%xmm4
mulsd  %xmm0,%xmm4
addsd  %xmm3,%xmm4
add    $0x2,%rcx
cmp    %rcx,%rax
jne    1170 <tf_obj_gauss+0x50>
test   $0x1,%bl
je     11e5 <tf_obj_gauss+0xc5>
movsd  (%rsi,%rcx,8),%xmm0
subsd  (%r9,%rcx,8),%xmm0
movsd  (%rdx,%rcx,8),%xmm1
mulsd  %xmm0,%xmm1
mulsd  %xmm0,%xmm1
mulsd  0xe1f(%rip),%xmm1
addsd  %xmm1,%xmm4
movsd  %xmm4,0x8(%rsp)
lea    0x1(%r14),%edx
mov    %ebp,%esi
mov    %r9,%rcx
mov    %r15,%r8
call   1040 <tf_dx@plt>
not    %r14d
add    %ebp,%r14d
test   %r14d,%r14d
xorpd  %xmm1,%xmm1
jle    12f9 <tf_obj_gauss+0x1d9>
mov    %r14d,%ebp
lea    -0x1(%rbp),%rax
mov    %ebp,%r14d
and    $0x3,%r14d
cmp    $0x3,%rax
jae    122e <tf_obj_gauss+0x10e>
xorpd  %xmm1,%xmm1
xor    %ebx,%ebx
jmp    12c0 <tf_obj_gauss+0x1a0>
and    $0xfffffffc,%ebp
xorpd  %xmm1,%xmm1
xor    %ebx,%ebx
nopw   0x0(%rax,%rax,1)
movsd  %xmm1,(%rsp)
movsd  (%r15,%rbx,8),%xmm0
call   1030 <fabs@plt>
xorps  %xmm0,%xmm0
cvtsi2sd %rax,%xmm0
addsd  (%rsp),%xmm0
movsd  %xmm0,(%rsp)
movsd  0x8(%r15,%rbx,8),%xmm0
call   1030 <fabs@plt>
xorps  %xmm0,%xmm0
cvtsi2sd %rax,%xmm0
addsd  (%rsp),%xmm0
movsd  %xmm0,(%rsp)
movsd  0x10(%r15,%rbx,8),%xmm0
call   1030 <fabs@plt>
xorps  %xmm0,%xmm0
cvtsi2sd %rax,%xmm0
addsd  (%rsp),%xmm0
movsd  %xmm0,(%rsp)
movsd  0x18(%r15,%rbx,8),%xmm0
call   1030 <fabs@plt>
xorps  %xmm1,%xmm1
cvtsi2sd %rax,%xmm1
addsd  (%rsp),%xmm1
add    $0x4,%rbx
cmp    %rbx,%rbp
jne    1240 <tf_obj_gauss+0x120>
test   %r14,%r14
je     12f9 <tf_obj_gauss+0x1d9>
lea    (%r15,%rbx,8),%rbx
xor    %ebp,%ebp
nopl   0x0(%rax,%rax,1)
movsd  %xmm1,(%rsp)
movsd  (%rbx,%rbp,8),%xmm0
call   1030 <fabs@plt>
movsd  (%rsp),%xmm1
xorps  %xmm0,%xmm0
cvtsi2sd %rax,%xmm0
addsd  %xmm0,%xmm1
add    $0x1,%rbp
cmp    %rbp,%r14
jne    12d0 <tf_obj_gauss+0x1b0>
movsd  0x10(%rsp),%xmm0
mulsd  %xmm1,%xmm0
addsd  0x8(%rsp),%xmm0
add    $0x18,%rsp
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define double @tf_obj_gauss(double* %0, double* %1, double* %2, i32 %3, i32 %4, double %5, double* %6, double* %7) {
%9 = alloca double*
%10 = alloca double*
%11 = alloca double*
%12 = alloca i32
%13 = alloca i32
%14 = alloca double
%15 = alloca double*
%16 = alloca double*
%17 = alloca i32
%18 = alloca double
%19 = alloca double
store double* %0, double** %9
store double* %1, double** %10
store double* %2, double** %11
store i32 %3, i32* %12
store i32 %4, i32* %13
store double %5, double* %14
store double* %6, double** %15
store double* %7, double** %16
store double 0.000000e+00, double* %18
store i32 0, i32* %17
br label %20
20: ; preds = %57, %8
%21 = load i32, i32* %17
%22 = load i32, i32* %12
%23 = icmp slt i32 %21, %22
br i1 %23, label %24, label %60
24: ; preds = %20
%25 = load double*, double** %11
%26 = load i32, i32* %17
%27 = sext i32 %26 to i64
%28 = getelementptr inbounds double, double* %25, i64 %27
%29 = load double, double* %28
%30 = load double*, double** %10
%31 = load i32, i32* %17
%32 = sext i32 %31 to i64
%33 = getelementptr inbounds double, double* %30, i64 %32
%34 = load double, double* %33
%35 = load double*, double** %15
%36 = load i32, i32* %17
%37 = sext i32 %36 to i64
%38 = getelementptr inbounds double, double* %35, i64 %37
%39 = load double, double* %38
%40 = fsub double %34, %39
%41 = fmul double %29, %40
%42 = load double*, double** %10
%43 = load i32, i32* %17
%44 = sext i32 %43 to i64
%45 = getelementptr inbounds double, double* %42, i64 %44
%46 = load double, double* %45
%47 = load double*, double** %15
%48 = load i32, i32* %17
%49 = sext i32 %48 to i64
%50 = getelementptr inbounds double, double* %47, i64 %49
%51 = load double, double* %50
%52 = fsub double %46, %51
%53 = fmul double %41, %52
%54 = fdiv double %53, 2.000000e+00
%55 = load double, double* %18
%56 = fadd double %55, %54
store double %56, double* %18
br label %57
57: ; preds = %24
%58 = load i32, i32* %17
%59 = add nsw i32 %58, 1
store i32 %59, i32* %17
br label %20
60: ; preds = %20
store double 0.000000e+00, double* %19
%61 = load double*, double** %9
%62 = load i32, i32* %12
%63 = load i32, i32* %13
%64 = add nsw i32 %63, 1
%65 = load double*, double** %15
%66 = load double*, double** %16
%67 = call i32 @tf_dx(double* %61, i32 %62, i32 %64, double* %65, double* %66)
store i32 0, i32* %17
br label %68
68: ; preds = %85, %60
%69 = load i32, i32* %17
%70 = load i32, i32* %12
%71 = load i32, i32* %13
%72 = sub nsw i32 %70, %71
%73 = sub nsw i32 %72, 1
%74 = icmp slt i32 %69, %73
br i1 %74, label %75, label %88
75: ; preds = %68
%76 = load double*, double** %16
%77 = load i32, i32* %17
%78 = sext i32 %77 to i64
%79 = getelementptr inbounds double, double* %76, i64 %78
%80 = load double, double* %79
%81 = call i64 @fabs(double %80)
%82 = sitofp i64 %81 to double
%83 = load double, double* %19
%84 = fadd double %83, %82
store double %84, double* %19
br label %85
85: ; preds = %75
%86 = load i32, i32* %17
%87 = add nsw i32 %86, 1
store i32 %87, i32* %17
br label %68
88: ; preds = %68
%89 = load double, double* %18
%90 = load double, double* %14
%91 = load double, double* %19
%92 = call double @llvm.fmuladd.f64(double %90, double %91, double %89)
ret double %92
}

LLVM IR (-O2):
define double @tf_obj_gauss(double* %0, double* nocapture %1, double* nocapture %2, i32 %3, i32 %4, double %5, double* %6, double* %7) {
%9 = icmp sgt i32 %3, 0
br i1 %9, label %10, label %63
10: ; preds = %8
%11 = zext i32 %3 to i64
%12 = and i64 %11, 1
%13 = icmp eq i32 %3, 1
br i1 %13, label %46, label %14
14: ; preds = %10
%15 = and i64 %11, 4294967294
br label %16
16: ; preds = %16, %14
%17 = phi i64 [ 0, %14 ], [ %43, %16 ]
%18 = phi double [ 0.000000e+00, %14 ], [ %42, %16 ]
%19 = phi i64 [ 0, %14 ], [ %44, %16 ]
%20 = getelementptr inbounds double, double* %2, i64 %17
%21 = load double, double* %20
%22 = getelementptr inbounds double, double* %1, i64 %17
%23 = load double, double* %22
%24 = getelementptr inbounds double, double* %6, i64 %17
%25 = load double, double* %24
%26 = fsub double %23, %25
%27 = fmul double %21, %26
%28 = fmul double %26, %27
%29 = fmul double %28, 5.000000e-01
%30 = fadd double %18, %29
%31 = or i64 %17, 1
%32 = getelementptr inbounds double, double* %2, i64 %31
%33 = load double, double* %32
%34 = getelementptr inbounds double, double* %1, i64 %31
%35 = load double, double* %34
%36 = getelementptr inbounds double, double* %6, i64 %31
%37 = load double, double* %36
%38 = fsub double %35, %37
%39 = fmul double %33, %38
%40 = fmul double %38, %39
%41 = fmul double %40, 5.000000e-01
%42 = fadd double %30, %41
%43 = add nuw nsw i64 %17, 2
%44 = add i64 %19, 2
%45 = icmp eq i64 %44, %15
br i1 %45, label %46, label %16
46: ; preds = %16, %10
%47 = phi double [ undef, %10 ], [ %42, %16 ]
%48 = phi i64 [ 0, %10 ], [ %43, %16 ]
%49 = phi double [ 0.000000e+00, %10 ], [ %42, %16 ]
%50 = icmp eq i64 %12, 0
br i1 %50, label %63, label %51
51: ; preds = %46
%52 = getelementptr inbounds double, double* %2, i64 %48
%53 = load double, double* %52
%54 = getelementptr inbounds double, double* %1, i64 %48
%55 = load double, double* %54
%56 = getelementptr inbounds double, double* %6, i64 %48
%57 = load double, double* %56
%58 = fsub double %55, %57
%59 = fmul double %53, %58
%60 = fmul double %58, %59
%61 = fmul double %60, 5.000000e-01
%62 = fadd double %49, %61
br label %63
63: ; preds = %51, %46, %8
%64 = phi double [ 0.000000e+00, %8 ], [ %47, %46 ], [ %62, %51 ]
%65 = add nsw i32 %4, 1
%66 = tail call i32 @tf_dx(double* %0, i32 %3, i32 %65, double* %6, double* %7)
%67 = xor i32 %4, -1
%68 = add i32 %67, %3
%69 = icmp sgt i32 %68, 0
br i1 %69, label %70, label %124
70: ; preds = %63
%71 = zext i32 %68 to i64
%72 = add nsw i64 %71, -1
%73 = and i64 %71, 3
%74 = icmp ult i64 %72, 3
br i1 %74, label %107, label %75
75: ; preds = %70
%76 = and i64 %71, 4294967292
br label %77
77: ; preds = %77, %75
%78 = phi i64 [ 0, %75 ], [ %104, %77 ]
%79 = phi double [ 0.000000e+00, %75 ], [ %103, %77 ]
%80 = phi i64 [ 0, %75 ], [ %105, %77 ]
%81 = getelementptr inbounds double, double* %7, i64 %78
%82 = load double, double* %81
%83 = tail call i64 @fabs(double %82)
%84 = sitofp i64 %83 to double
%85 = fadd double %79, %84
%86 = or i64 %78, 1
%87 = getelementptr inbounds double, double* %7, i64 %86
%88 = load double, double* %87
%89 = tail call i64 @fabs(double %88)
%90 = sitofp i64 %89 to double
%91 = fadd double %85, %90
%92 = or i64 %78, 2
%93 = getelementptr inbounds double, double* %7, i64 %92
%94 = load double, double* %93
%95 = tail call i64 @fabs(double %94)
%96 = sitofp i64 %95 to double
%97 = fadd double %91, %96
%98 = or i64 %78, 3
%99 = getelementptr inbounds double, double* %7, i64 %98
%100 = load double, double* %99
%101 = tail call i64 @fabs(double %100)
%102 = sitofp i64 %101 to double
%103 = fadd double %97, %102
%104 = add nuw nsw i64 %78, 4
%105 = add i64 %80, 4
%106 = icmp eq i64 %105, %76
br i1 %106, label %107, label %77
107: ; preds = %77, %70
%108 = phi double [ undef, %70 ], [ %103, %77 ]
%109 = phi i64 [ 0, %70 ], [ %104, %77 ]
%110 = phi double [ 0.000000e+00, %70 ], [ %103, %77 ]
%111 = icmp eq i64 %73, 0
br i1 %111, label %124, label %112
112: ; preds = %107, %112
%113 = phi i64 [ %121, %112 ], [ %109, %107 ]
%114 = phi double [ %120, %112 ], [ %110, %107 ]
%115 = phi i64 [ %122, %112 ], [ 0, %107 ]
%116 = getelementptr inbounds double, double* %7, i64 %113
%117 = load double, double* %116
%118 = tail call i64 @fabs(double %117)
%119 = sitofp i64 %118 to double
%120 = fadd double %114, %119
%121 = add nuw nsw i64 %113, 1
%122 = add i64 %115, 1
%123 = icmp eq i64 %122, %73
br i1 %123, label %124, label %112
124: ; preds = %107, %112, %63
%125 = phi double [ 0.000000e+00, %63 ], [ %108, %107 ], [ %120, %112 ]
%126 = tail call double @llvm.fmuladd.f64(double %5, double %125, double %64)
ret double %126
}