#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 exp(double);
int multiexp_lambda_array(float xincr, float param[], float *y,
                          float **dy_dparam, int nx, int nparam) {
  int i, j;
  float ex;
  double exincr[20];
  double excur[20];
  if (xincr <= 0)
    return -1;
  for (j = 1; j < nparam - 1; j += 2) {
    if (param[j + 1] < 0)
      return -1;
    excur[j] = 1.0;
    exincr[j] = exp(-(double)param[j + 1] * xincr);
  }
  for (i = 0; i < nx; i++) {
    y[i] = 0;
    for (j = 1; j < nparam - 1; j += 2) {
      dy_dparam[i][j] = ex = (float)excur[j];
      ex *= param[j];
      y[i] += ex;
      dy_dparam[i][j + 1] = -ex * xincr * (float)i;
      excur[j] *= exincr[j];
    }
  }
  return 0;
}


x86 assembly (clang, -O0):
<multiexp_lambda_array>:
push   %rbp
mov    %rsp,%rbp
sub    $0x180,%rsp
movss  %xmm0,-0x8(%rbp)
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %rdx,-0x20(%rbp)
mov    %ecx,-0x24(%rbp)
mov    %r8d,-0x28(%rbp)
xorps  %xmm0,%xmm0
ucomiss -0x8(%rbp),%xmm0
jb     114c <multiexp_lambda_array+0x3c>
movl   $0xffffffff,-0x4(%rbp)
jmp    1312 <multiexp_lambda_array+0x202>
movl   $0x1,-0x30(%rbp)
mov    -0x30(%rbp),%eax
mov    -0x28(%rbp),%ecx
sub    $0x1,%ecx
cmp    %ecx,%eax
jge    11f9 <multiexp_lambda_array+0xe9>
mov    -0x10(%rbp),%rax
mov    -0x30(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
xorps  %xmm0,%xmm0
ucomiss (%rax,%rcx,4),%xmm0
jbe    118a <multiexp_lambda_array+0x7a>
movl   $0xffffffff,-0x4(%rbp)
jmp    1312 <multiexp_lambda_array+0x202>
movslq -0x30(%rbp),%rax
movsd  0xe6a(%rip),%xmm0
movsd  %xmm0,-0x180(%rbp,%rax,8)
ff ff
mov    -0x10(%rbp),%rax
mov    -0x30(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movss  (%rax,%rcx,4),%xmm0
cvtss2sd %xmm0,%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movss  -0x8(%rbp),%xmm1
cvtss2sd %xmm1,%xmm1
mulsd  %xmm1,%xmm0
call   1030 <exp@plt>
movslq -0x30(%rbp),%rax
movsd  %xmm0,-0xe0(%rbp,%rax,8)
ff ff
mov    -0x30(%rbp),%eax
add    $0x2,%eax
mov    %eax,-0x30(%rbp)
jmp    1153 <multiexp_lambda_array+0x43>
movl   $0x0,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0x24(%rbp),%eax
jge    130b <multiexp_lambda_array+0x1fb>
mov    -0x18(%rbp),%rax
movslq -0x2c(%rbp),%rcx
xorps  %xmm0,%xmm0
movss  %xmm0,(%rax,%rcx,4)
movl   $0x1,-0x30(%rbp)
mov    -0x30(%rbp),%eax
mov    -0x28(%rbp),%ecx
sub    $0x1,%ecx
cmp    %ecx,%eax
jge    12f8 <multiexp_lambda_array+0x1e8>
movslq -0x30(%rbp),%rax
movsd  -0x180(%rbp,%rax,8),%xmm0
ff ff
cvtsd2ss %xmm0,%xmm0
movss  %xmm0,-0x34(%rbp)
mov    -0x20(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x30(%rbp),%rcx
movss  %xmm0,(%rax,%rcx,4)
mov    -0x10(%rbp),%rax
movslq -0x30(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
mulss  -0x34(%rbp),%xmm0
movss  %xmm0,-0x34(%rbp)
movss  -0x34(%rbp),%xmm0
mov    -0x18(%rbp),%rax
movslq -0x2c(%rbp),%rcx
addss  (%rax,%rcx,4),%xmm0
movss  %xmm0,(%rax,%rcx,4)
movss  -0x34(%rbp),%xmm0
movd   %xmm0,%eax
xor    $0x80000000,%eax
movd   %eax,%xmm0
mulss  -0x8(%rbp),%xmm0
cvtsi2ssl -0x2c(%rbp),%xmm1
mulss  %xmm1,%xmm0
mov    -0x20(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    -0x30(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movss  %xmm0,(%rax,%rcx,4)
movslq -0x30(%rbp),%rax
movsd  -0xe0(%rbp,%rax,8),%xmm0
ff ff
movslq -0x30(%rbp),%rax
mulsd  -0x180(%rbp,%rax,8),%xmm0
ff ff
movsd  %xmm0,-0x180(%rbp,%rax,8)
ff ff
mov    -0x30(%rbp),%eax
add    $0x2,%eax
mov    %eax,-0x30(%rbp)
jmp    1223 <multiexp_lambda_array+0x113>
jmp    12fd <multiexp_lambda_array+0x1ed>
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    1200 <multiexp_lambda_array+0xf0>
movl   $0x0,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x180,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<multiexp_lambda_array>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x168,%rsp
movaps %xmm0,%xmm5
mov    $0xffffffff,%eax
xorps  %xmm0,%xmm0
ucomiss %xmm5,%xmm0
jae    127d <multiexp_lambda_array+0x16d>
mov    %r8d,%r15d
mov    %rsi,%rbx
mov    %rdi,%r12
mov    %ecx,0x8(%rsp)
mov    %rdx,0x10(%rsp)
lea    -0x1(%r15),%eax
mov    %eax,0x4(%rsp)
cmp    $0x3,%r8d
jl     11c6 <multiexp_lambda_array+0xb6>
xorps  %xmm0,%xmm0
cvtss2sd %xmm5,%xmm0
movsd  %xmm0,0x18(%rsp)
mov    0x4(%rsp),%r13d
mov    $0x1,%ebp
movabs $0x3ff0000000000000,%r14
movss  %xmm5,0xc(%rsp)
nopl   0x0(%rax)
movss  0x4(%r12,%rbp,4),%xmm0
xorps  %xmm1,%xmm1
ucomiss %xmm0,%xmm1
ja     1278 <multiexp_lambda_array+0x168>
mov    %r14,0x20(%rsp,%rbp,8)
cvtss2sd %xmm0,%xmm0
xorps  0xe5d(%rip),%xmm0
mulsd  0x18(%rsp),%xmm0
call   1030 <exp@plt>
movss  0xc(%rsp),%xmm5
movsd  %xmm0,0xc0(%rsp,%rbp,8)
add    $0x2,%rbp
cmp    %r13,%rbp
jb     1180 <multiexp_lambda_array+0x70>
mov    0x8(%rsp),%ecx
test   %ecx,%ecx
jle    1274 <multiexp_lambda_array+0x164>
movslq 0x4(%rsp),%rax
mov    %ecx,%ecx
xor    %edx,%edx
movaps 0xe2e(%rip),%xmm0
mov    0x10(%rsp),%rbp
jmp    11f9 <multiexp_lambda_array+0xe9>
nopl   0x0(%rax)
add    $0x1,%rdx
cmp    %rcx,%rdx
je     1274 <multiexp_lambda_array+0x164>
movl   $0x0,(%rbx,%rdx,4)
cmp    $0x3,%r15d
jl     11f0 <multiexp_lambda_array+0xe0>
mov    0x0(%rbp,%rdx,8),%rsi
xorps  %xmm1,%xmm1
cvtsi2ss %edx,%xmm1
mov    $0x1,%edi
nopw   0x0(%rax,%rax,1)
movsd  0x20(%rsp,%rdi,8),%xmm2
xorps  %xmm3,%xmm3
cvtsd2ss %xmm2,%xmm3
movss  %xmm3,(%rsi,%rdi,4)
mulss  (%r12,%rdi,4),%xmm3
movss  (%rbx,%rdx,4),%xmm4
addss  %xmm3,%xmm4
movss  %xmm4,(%rbx,%rdx,4)
xorps  %xmm0,%xmm3
mulss  %xmm5,%xmm3
mulss  %xmm1,%xmm3
movss  %xmm3,0x4(%rsi,%rdi,4)
mulsd  0xc0(%rsp,%rdi,8),%xmm2
movsd  %xmm2,0x20(%rsp,%rdi,8)
add    $0x2,%rdi
cmp    %rax,%rdi
jl     1220 <multiexp_lambda_array+0x110>
jmp    11f0 <multiexp_lambda_array+0xe0>
xor    %eax,%eax
jmp    127d <multiexp_lambda_array+0x16d>
mov    $0xffffffff,%eax
add    $0x168,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
define i32 @multiexp_lambda_array(float %0, float* nocapture %1, float* nocapture %2, float** nocapture %3, i32 %4, i32 %5) {
%7 = alloca [20 x double]
%8 = alloca [20 x double]
%9 = bitcast [20 x double]* %7 to i8*
%10 = bitcast [20 x double]* %8 to i8*
%11 = fcmp ugt float %0, 0.000000e+00
br i1 %11, label %12, label %70
12: ; preds = %6
%13 = add nsw i32 %5, -1
%14 = icmp sgt i32 %5, 2
br i1 %14, label %15, label %18
15: ; preds = %12
%16 = fpext float %0 to double
%17 = zext i32 %13 to i64
br label %23
18: ; preds = %29, %12
%19 = icmp sgt i32 %4, 0
br i1 %19, label %20, label %70
20: ; preds = %18
%21 = sext i32 %13 to i64
%22 = zext i32 %4 to i64
br label %38
23: ; preds = %15, %29
%24 = phi i64 [ 1, %15 ], [ %36, %29 ]
%25 = add nuw nsw i64 %24, 1
%26 = getelementptr inbounds float, float* %1, i64 %25
%27 = load float, float* %26
%28 = fcmp olt float %27, 0.000000e+00
br i1 %28, label %70, label %29
29: ; preds = %23
%30 = getelementptr inbounds [20 x double], [20 x double]* %8, i64 0, i64 %24
store double 1.000000e+00, double* %30
%31 = fpext float %27 to double
%32 = fneg double %31
%33 = fmul double %16, %32
%34 = tail call double @exp(double %33)
%35 = getelementptr inbounds [20 x double], [20 x double]* %7, i64 0, i64 %24
store double %34, double* %35
%36 = add nuw nsw i64 %24, 2
%37 = icmp ult i64 %36, %17
br i1 %37, label %23, label %18
38: ; preds = %20, %67
%39 = phi i64 [ 0, %20 ], [ %68, %67 ]
%40 = getelementptr inbounds float, float* %2, i64 %39
store float 0.000000e+00, float* %40
br i1 %14, label %41, label %67
41: ; preds = %38
%42 = getelementptr inbounds float*, float** %3, i64 %39
%43 = load float*, float** %42
%44 = trunc i64 %39 to i32
%45 = sitofp i32 %44 to float
br label %46
46: ; preds = %41, %46
%47 = phi i64 [ 1, %41 ], [ %65, %46 ]
%48 = getelementptr inbounds [20 x double], [20 x double]* %8, i64 0, i64 %47
%49 = load double, double* %48
%50 = fptrunc double %49 to float
%51 = getelementptr inbounds float, float* %43, i64 %47
store float %50, float* %51
%52 = getelementptr inbounds float, float* %1, i64 %47
%53 = load float, float* %52
%54 = fmul float %53, %50
%55 = load float, float* %40
%56 = fadd float %55, %54
store float %56, float* %40
%57 = fneg float %54
%58 = fmul float %57, %0
%59 = fmul float %58, %45
%60 = add nuw nsw i64 %47, 1
%61 = getelementptr inbounds float, float* %43, i64 %60
store float %59, float* %61
%62 = getelementptr inbounds [20 x double], [20 x double]* %7, i64 0, i64 %47
%63 = load double, double* %62
%64 = fmul double %49, %63
store double %64, double* %48
%65 = add nuw nsw i64 %47, 2
%66 = icmp slt i64 %65, %21
br i1 %66, label %46, label %67
67: ; preds = %46, %38
%68 = add nuw nsw i64 %39, 1
%69 = icmp eq i64 %68, %22
br i1 %69, label %70, label %38
70: ; preds = %23, %67, %18, %6
%71 = phi i32 [ -1, %6 ], [ 0, %18 ], [ 0, %67 ], [ -1, %23 ]
ret i32 %71
}