double smallj1(x)
double x;
{
  static double p[10] = {
      0.1921176307760798128049021316e+25, -0.2226092031387396254771375773e+24,
      0.7894463902082476734673226741e+22, -0.1269424373753606065436561036e+21,
      0.1092152214043184787101134641e+19, -0.5454629264396819144157448868e+16,
      0.1634659487571284628830445048e+14, -0.2909662785381647825756152444e+11,
      0.2853433451054763915026471449e+08, -0.1197705712815379389149134705e+05};
  static double q[10] = {
      0.3842352615521596256098041912e+25, 0.3507567066272028105798868716e+23,
      0.1611334311633414344007062889e+21, 0.4929612313959850319632645381e+18,
      0.1117536965288162684489793105e+16, 0.1969278625584719037168592923e+13,
      0.2735606122949877990248154504e+10, 0.2940957355049651347475558106e+07,
      0.2274736606126590905134610965e+04, 0.1000000000000000000000000000e+01};
  double xsq = x * x;
  return x * POLYNOM9(xsq, p) / POLYNOM9(xsq, q);
}


x86 assembly (clang, -O0):
<smallj1>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
movsd  %xmm0,-0x8(%rbp)
movsd  -0x8(%rbp),%xmm0
mulsd  -0x8(%rbp),%xmm0
movsd  %xmm0,-0x10(%rbp)
movsd  -0x8(%rbp),%xmm0
movsd  %xmm0,-0x20(%rbp)
movsd  -0x10(%rbp),%xmm0
lea    0x2eee(%rip),%rdi
mov    $0x1,%al
call   1030 <POLYNOM9@plt>
movsd  -0x20(%rbp),%xmm0
cvtsi2sd %eax,%xmm1
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x18(%rbp)
movsd  -0x10(%rbp),%xmm0
lea    0x2f19(%rip),%rdi
mov    $0x1,%al
call   1030 <POLYNOM9@plt>
movsd  -0x18(%rbp),%xmm0
cvtsi2sd %eax,%xmm1
divsd  %xmm1,%xmm0
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<smallj1>:
sub    $0x18,%rsp
movsd  %xmm0,0x8(%rsp)
mulsd  %xmm0,%xmm0
movsd  %xmm0,0x10(%rsp)
lea    0x2f05(%rip),%rdi
mov    $0x1,%al
call   1030 <POLYNOM9@plt>
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
mulsd  0x8(%rsp),%xmm0
movsd  %xmm0,0x8(%rsp)
lea    0x2f34(%rip),%rdi
movsd  0x10(%rsp),%xmm0
mov    $0x1,%al
call   1030 <POLYNOM9@plt>
cvtsi2sd %eax,%xmm1
movsd  0x8(%rsp),%xmm0
divsd  %xmm1,%xmm0
add    $0x18,%rsp
ret

LLVM IR (-O0):
@smallj1.p = internal global [10 x double] [double 0x44F96D32D23F81F6, double 0xC4C791D5A48249E2, double 0x447ABF5B1E4481A3, double 0xC41B86B888E4628F, double 0x43AE50354DED669D, double 0xC33360F4D7AF9213, double 0x42ADBBF9F63281B1, double 0xC21B192D3A374413, double 0x417B3663E82B3400, double 0xC0C764874FF9B01D]
@smallj1.q = internal global [10 x double] [double 0x45096D32D23F81F6, double 0x449DB5D2DBD38142, double 0x44217859E3D7D5A6, double 0x439B5D668335965A, double 0x430FC326CEB70715, double 0x427CA82272730B81, double 0x41E461C12D5E6567, double 0x4146700EAD724458, double 0x40A1C57924702F7B, double 1.000000e+00]
define double @smallj1(double %0) {
%2 = alloca double
%3 = alloca double
store double %0, double* %2
%4 = load double, double* %2
%5 = load double, double* %2
%6 = fmul double %4, %5
store double %6, double* %3
%7 = load double, double* %2
%8 = load double, double* %3
%9 = call i32 (double, double*, ...) bitcast (i32 (...)* @POLYNOM9 to i32 (double, double*, ...)*)(double %8, double* getelementptr inbounds ([10 x double], [10 x double]* @smallj1.p, i64 0, i64 0))
%10 = sitofp i32 %9 to double
%11 = fmul double %7, %10
%12 = load double, double* %3
%13 = call i32 (double, double*, ...) bitcast (i32 (...)* @POLYNOM9 to i32 (double, double*, ...)*)(double %12, double* getelementptr inbounds ([10 x double], [10 x double]* @smallj1.q, i64 0, i64 0))
%14 = sitofp i32 %13 to double
%15 = fdiv double %11, %14
ret double %15
}

LLVM IR (-O2):
@smallj1.p = internal global [10 x double] [double 0x44F96D32D23F81F6, double 0xC4C791D5A48249E2, double 0x447ABF5B1E4481A3, double 0xC41B86B888E4628F, double 0x43AE50354DED669D, double 0xC33360F4D7AF9213, double 0x42ADBBF9F63281B1, double 0xC21B192D3A374413, double 0x417B3663E82B3400, double 0xC0C764874FF9B01D]
@smallj1.q = internal global [10 x double] [double 0x45096D32D23F81F6, double 0x449DB5D2DBD38142, double 0x44217859E3D7D5A6, double 0x439B5D668335965A, double 0x430FC326CEB70715, double 0x427CA82272730B81, double 0x41E461C12D5E6567, double 0x4146700EAD724458, double 0x40A1C57924702F7B, double 1.000000e+00]
define double @smallj1(double %0) {
%2 = fmul double %0, %0
%3 = tail call i32 (double, double*, ...) bitcast (i32 (...)* @POLYNOM9 to i32 (double, double*, ...)*)(double %2, double* getelementptr inbounds ([10 x double], [10 x double]* @smallj1.p, i64 0, i64 0))
%4 = sitofp i32 %3 to double
%5 = fmul double %4, %0
%6 = tail call i32 (double, double*, ...) bitcast (i32 (...)* @POLYNOM9 to i32 (double, double*, ...)*)(double %2, double* getelementptr inbounds ([10 x double], [10 x double]* @smallj1.q, i64 0, i64 0))
%7 = sitofp i32 %6 to double
%8 = fdiv double %5, %7
ret double %8
}