void fleg(float x, float pl[], int nl) {
  int j;
  float twox, f2, f1, d;
  pl[1] = 1.0;
  pl[2] = x;
  if (nl > 2) {
    twox = 2.0 * x;
    f2 = x;
    d = 1.0;
    for (j = 3; j <= nl; j++) {
      f1 = d++;
      f2 += twox;
      pl[j] = (f2 * pl[j - 1] - f1 * pl[j - 2]) / d;
    }
  }
}


x86 assembly (clang, -O0):
<fleg>:
push   %rbp
mov    %rsp,%rbp
movss  %xmm0,-0x4(%rbp)
mov    %rdi,-0x10(%rbp)
mov    %esi,-0x14(%rbp)
mov    -0x10(%rbp),%rax
movss  0xee4(%rip),%xmm0
movss  %xmm0,0x4(%rax)
movss  -0x4(%rbp),%xmm0
mov    -0x10(%rbp),%rax
movss  %xmm0,0x8(%rax)
cmpl   $0x2,-0x14(%rbp)
jle    1216 <fleg+0x116>
movss  -0x4(%rbp),%xmm0
cvtss2sd %xmm0,%xmm1
movsd  0xebe(%rip),%xmm0
mulsd  %xmm1,%xmm0
cvtsd2ss %xmm0,%xmm0
movss  %xmm0,-0x1c(%rbp)
movss  -0x4(%rbp),%xmm0
movss  %xmm0,-0x20(%rbp)
movss  0xe97(%rip),%xmm0
movss  %xmm0,-0x28(%rbp)
movl   $0x3,-0x18(%rbp)
mov    -0x18(%rbp),%eax
cmp    -0x14(%rbp),%eax
jg     1211 <fleg+0x111>
movss  -0x28(%rbp),%xmm0
movss  0xe72(%rip),%xmm2
movaps %xmm0,%xmm1
addss  %xmm2,%xmm1
movss  %xmm1,-0x28(%rbp)
movss  %xmm0,-0x24(%rbp)
movss  -0x1c(%rbp),%xmm0
addss  -0x20(%rbp),%xmm0
movss  %xmm0,-0x20(%rbp)
movss  -0x20(%rbp),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movss  (%rax,%rcx,4),%xmm2
movss  -0x24(%rbp),%xmm1
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%ecx
sub    $0x2,%ecx
movslq %ecx,%rcx
mulss  (%rax,%rcx,4),%xmm1
movd   %xmm1,%eax
xor    $0x80000000,%eax
movd   %eax,%xmm1
mulss  %xmm2,%xmm0
addss  %xmm1,%xmm0
divss  -0x28(%rbp),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x18(%rbp),%rcx
movss  %xmm0,(%rax,%rcx,4)
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    1175 <fleg+0x75>
jmp    1216 <fleg+0x116>
pop    %rbp
ret

x86 assembly (clang, -O2):
<fleg>:
movl   $0x3f800000,0x4(%rdi)
movss  %xmm0,0x8(%rdi)
cmp    $0x3,%esi
jl     118b <fleg+0x8b>
movaps %xmm0,%xmm1
addss  %xmm0,%xmm1
add    $0x1,%esi
movaps %xmm1,%xmm2
addss  %xmm0,%xmm2
mulss  %xmm2,%xmm0
addss  0xed2(%rip),%xmm0
mulss  0xece(%rip),%xmm0
movss  %xmm0,0xc(%rdi)
cmp    $0x4,%esi
je     118b <fleg+0x8b>
movss  0xec0(%rip),%xmm5
mov    $0x4,%eax
movss  0xeb7(%rip),%xmm3
movaps %xmm5,%xmm4
nopl   0x0(%rax,%rax,1)
addss  %xmm3,%xmm4
addss  %xmm1,%xmm2
mulss  -0x8(%rdi,%rax,4),%xmm5
mulss  %xmm2,%xmm0
subss  %xmm5,%xmm0
divss  %xmm4,%xmm0
movss  %xmm0,(%rdi,%rax,4)
add    $0x1,%rax
movaps %xmm4,%xmm5
cmp    %rax,%rsi
jne    1160 <fleg+0x60>
ret

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

LLVM IR (-O2):
define void @fleg(float %0, float* nocapture %1, i32 %2) {
%4 = getelementptr inbounds float, float* %1, i64 1
store float 1.000000e+00, float* %4
%5 = getelementptr inbounds float, float* %1, i64 2
store float %0, float* %5
%6 = icmp sgt i32 %2, 2
br i1 %6, label %7, label %34
7: ; preds = %3
%8 = fmul float %0, 2.000000e+00
%9 = add nuw i32 %2, 1
%10 = zext i32 %9 to i64
%11 = fadd float %8, %0
%12 = tail call float @llvm.fmuladd.f32(float %11, float %0, float -1.000000e+00)
%13 = fmul float %12, 5.000000e-01
%14 = getelementptr inbounds float, float* %1, i64 3
store float %13, float* %14
%15 = icmp eq i32 %9, 4
br i1 %15, label %34, label %16
16: ; preds = %7, %16
%17 = phi i64 [ %32, %16 ], [ 4, %7 ]
%18 = phi float [ %30, %16 ], [ %13, %7 ]
%19 = phi float [ %26, %16 ], [ %11, %7 ]
%20 = phi float [ %25, %16 ], [ 2.000000e+00, %7 ]
%21 = phi i64 [ %17, %16 ], [ 3, %7 ]
%22 = add nsw i64 %21, -1
%23 = getelementptr inbounds float, float* %1, i64 %22
%24 = load float, float* %23
%25 = fadd float %20, 1.000000e+00
%26 = fadd float %8, %19
%27 = fneg float %20
%28 = fmul float %24, %27
%29 = tail call float @llvm.fmuladd.f32(float %26, float %18, float %28)
%30 = fdiv float %29, %25
%31 = getelementptr inbounds float, float* %1, i64 %17
store float %30, float* %31
%32 = add nuw nsw i64 %17, 1
%33 = icmp eq i64 %32, %10
br i1 %33, label %34, label %16
34: ; preds = %16, %7, %3
ret void
}