void wf_gsb1cheb(x, order, k1, k2, basis) double x;
int order;
double k1, k2;
double *basis;
{
  int i;
  double xnorm;
  basis[0] = 1.0;
  if (order == 1)
    return;
  xnorm = (x + k1) * k2;
  basis[1] = xnorm;
  if (order == 2)
    return;
  for (i = 2; i < order; i++)
    basis[i] = 2. * xnorm * basis[i - 1] - basis[i - 2];
  return;
}


x86 assembly (clang, -O0):
<wf_gsb1cheb>:
push   %rbp
mov    %rsp,%rbp
movsd  %xmm0,-0x8(%rbp)
mov    %edi,-0xc(%rbp)
movsd  %xmm1,-0x18(%rbp)
movsd  %xmm2,-0x20(%rbp)
mov    %rsi,-0x28(%rbp)
mov    -0x28(%rbp),%rax
movsd  0xeda(%rip),%xmm0
movsd  %xmm0,(%rax)
cmpl   $0x1,-0xc(%rbp)
jne    1139 <wf_gsb1cheb+0x39>
jmp    11ed <wf_gsb1cheb+0xed>
movsd  -0x8(%rbp),%xmm0
addsd  -0x18(%rbp),%xmm0
mulsd  -0x20(%rbp),%xmm0
movsd  %xmm0,-0x38(%rbp)
movsd  -0x38(%rbp),%xmm0
mov    -0x28(%rbp),%rax
movsd  %xmm0,0x8(%rax)
cmpl   $0x2,-0xc(%rbp)
jne    116a <wf_gsb1cheb+0x6a>
jmp    11ed <wf_gsb1cheb+0xed>
movl   $0x2,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    11e8 <wf_gsb1cheb+0xe8>
movsd  0xe83(%rip),%xmm0
mulsd  -0x38(%rbp),%xmm0
mov    -0x28(%rbp),%rax
mov    -0x2c(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm2
mov    -0x28(%rbp),%rax
mov    -0x2c(%rbp),%ecx
sub    $0x2,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm1
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x28(%rbp),%rax
movslq -0x2c(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    1171 <wf_gsb1cheb+0x71>
jmp    11ed <wf_gsb1cheb+0xed>
pop    %rbp
ret

x86 assembly (clang, -O2):
<wf_gsb1cheb>:
movabs $0x3ff0000000000000,%rax
mov    %rax,(%rsi)
cmp    $0x1,%edi
je     11c7 <wf_gsb1cheb+0xc7>
addsd  %xmm1,%xmm0
mulsd  %xmm2,%xmm0
movsd  %xmm0,0x8(%rsi)
cmp    $0x3,%edi
jl     11c7 <wf_gsb1cheb+0xc7>
movapd %xmm0,%xmm1
addsd  %xmm0,%xmm1
mulsd  %xmm1,%xmm0
addsd  0xec0(%rip),%xmm0
movsd  %xmm0,0x10(%rsi)
je     11c7 <wf_gsb1cheb+0xc7>
mov    %edi,%eax
add    $0xfffffffffffffffd,%rax
cmp    $0x4,%edi
jne    1166 <wf_gsb1cheb+0x66>
mov    $0x1,%edx
mov    $0x3,%ecx
test   $0x1,%al
jne    11b9 <wf_gsb1cheb+0xb9>
jmp    11c7 <wf_gsb1cheb+0xc7>
mov    %rax,%rdx
and    $0xfffffffffffffffe,%rdx
neg    %rdx
mov    $0x3,%ecx
cs nopw 0x0(%rax,%rax,1)
nop
mulsd  %xmm1,%xmm0
subsd  -0x10(%rsi,%rcx,8),%xmm0
movsd  %xmm0,(%rsi,%rcx,8)
mulsd  %xmm1,%xmm0
subsd  -0x8(%rsi,%rcx,8),%xmm0
movsd  %xmm0,0x8(%rsi,%rcx,8)
lea    (%rdx,%rcx,1),%rdi
add    $0x2,%rdi
add    $0x2,%rcx
cmp    $0x3,%rdi
jne    1180 <wf_gsb1cheb+0x80>
lea    -0x2(%rcx),%rdx
test   $0x1,%al
je     11c7 <wf_gsb1cheb+0xc7>
mulsd  %xmm0,%xmm1
subsd  (%rsi,%rdx,8),%xmm1
movsd  %xmm1,(%rsi,%rcx,8)
ret

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

LLVM IR (-O2):
define void @wf_gsb1cheb(double %0, i32 %1, double %2, double %3, double* nocapture %4) {
store double 1.000000e+00, double* %4
%6 = icmp eq i32 %1, 1
br i1 %6, label %56, label %7
7: ; preds = %5
%8 = fadd double %0, %2
%9 = fmul double %8, %3
%10 = getelementptr inbounds double, double* %4, i64 1
store double %9, double* %10
%11 = icmp sgt i32 %1, 2
br i1 %11, label %12, label %56
12: ; preds = %7
%13 = fmul double %9, 2.000000e+00
%14 = tail call double @llvm.fmuladd.f64(double %13, double %9, double -1.000000e+00)
%15 = getelementptr inbounds double, double* %4, i64 2
store double %14, double* %15
%16 = icmp eq i32 %1, 3
br i1 %16, label %56, label %17
17: ; preds = %12
%18 = zext i32 %1 to i64
%19 = add nsw i64 %18, -3
%20 = and i64 %19, 1
%21 = icmp eq i32 %1, 4
br i1 %21, label %45, label %22
22: ; preds = %17
%23 = and i64 %19, -2
br label %24
24: ; preds = %24, %22
%25 = phi i64 [ 3, %22 ], [ %42, %24 ]
%26 = phi double [ %14, %22 ], [ %40, %24 ]
%27 = phi i64 [ 2, %22 ], [ %35, %24 ]
%28 = phi i64 [ 0, %22 ], [ %43, %24 ]
%29 = add nsw i64 %27, -1
%30 = getelementptr inbounds double, double* %4, i64 %29
%31 = load double, double* %30
%32 = fneg double %31
%33 = tail call double @llvm.fmuladd.f64(double %13, double %26, double %32)
%34 = getelementptr inbounds double, double* %4, i64 %25
store double %33, double* %34
%35 = add nuw nsw i64 %25, 1
%36 = add nsw i64 %25, -1
%37 = getelementptr inbounds double, double* %4, i64 %36
%38 = load double, double* %37
%39 = fneg double %38
%40 = tail call double @llvm.fmuladd.f64(double %13, double %33, double %39)
%41 = getelementptr inbounds double, double* %4, i64 %35
store double %40, double* %41
%42 = add nuw nsw i64 %25, 2
%43 = add i64 %28, 2
%44 = icmp eq i64 %43, %23
br i1 %44, label %45, label %24
45: ; preds = %24, %17
%46 = phi i64 [ 3, %17 ], [ %42, %24 ]
%47 = phi double [ %14, %17 ], [ %40, %24 ]
%48 = phi i64 [ 1, %17 ], [ %25, %24 ]
%49 = icmp eq i64 %20, 0
br i1 %49, label %56, label %50
50: ; preds = %45
%51 = getelementptr inbounds double, double* %4, i64 %48
%52 = load double, double* %51
%53 = fneg double %52
%54 = tail call double @llvm.fmuladd.f64(double %13, double %47, double %53)
%55 = getelementptr inbounds double, double* %4, i64 %46
store double %54, double* %55
br label %56
56: ; preds = %50, %45, %12, %7, %5
ret void
}