double coulomb_normalisation(double Z, double A, double mass, double kinetic,
                             double kinetic0) {
  const double p2 = kinetic * (kinetic + 2. * mass);
  const double p02 = kinetic0 * (kinetic0 + 2. * mass);
  double d = 7.2973525693E-03 * Z * 1.973269804E-16 * (kinetic + mass);
  return A * 1E-03 * p2 * p02 /
         (d * d * 3.14159265358979323846 * 6.02214076E+23);
}


x86 assembly (clang, -O0):
<coulomb_normalisation>:
push   %rbp
mov    %rsp,%rbp
movsd  %xmm0,-0x8(%rbp)
movsd  %xmm1,-0x10(%rbp)
movsd  %xmm2,-0x18(%rbp)
movsd  %xmm3,-0x20(%rbp)
movsd  %xmm4,-0x28(%rbp)
movsd  -0x20(%rbp),%xmm0
movsd  -0x20(%rbp),%xmm2
movsd  -0x18(%rbp),%xmm1
addsd  %xmm1,%xmm1
addsd  %xmm2,%xmm1
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x30(%rbp)
movsd  -0x28(%rbp),%xmm0
movsd  -0x28(%rbp),%xmm2
movsd  -0x18(%rbp),%xmm1
addsd  %xmm1,%xmm1
addsd  %xmm2,%xmm1
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x38(%rbp)
movsd  0xebb(%rip),%xmm0
mulsd  -0x8(%rbp),%xmm0
movsd  0xea6(%rip),%xmm1
mulsd  %xmm1,%xmm0
movsd  -0x20(%rbp),%xmm1
addsd  -0x18(%rbp),%xmm1
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  0xe7f(%rip),%xmm0
mulsd  -0x10(%rbp),%xmm0
mulsd  -0x30(%rbp),%xmm0
mulsd  -0x38(%rbp),%xmm0
movsd  -0x40(%rbp),%xmm1
mulsd  -0x40(%rbp),%xmm1
movsd  0xe56(%rip),%xmm2
mulsd  %xmm2,%xmm1
movsd  0xe42(%rip),%xmm2
mulsd  %xmm2,%xmm1
divsd  %xmm1,%xmm0
pop    %rbp
ret

x86 assembly (clang, -O2):
<coulomb_normalisation>:
movapd %xmm0,%xmm5
movapd %xmm2,%xmm0
addsd  %xmm2,%xmm0
movapd %xmm0,%xmm6
addsd  %xmm3,%xmm6
mulsd  %xmm3,%xmm6
addsd  %xmm4,%xmm0
mulsd  %xmm4,%xmm0
mulsd  0xed8(%rip),%xmm5
mulsd  0xed8(%rip),%xmm5
addsd  %xmm3,%xmm2
mulsd  %xmm5,%xmm2
unpcklpd %xmm2,%xmm1
movapd 0xecc(%rip),%xmm3
unpcklpd %xmm2,%xmm3
mulpd  %xmm1,%xmm3
shufpd $0x2,0xecb(%rip),%xmm6
shufpd $0x2,0xed2(%rip),%xmm0
mulpd  %xmm3,%xmm6
mulpd  %xmm6,%xmm0
movapd %xmm0,%xmm1
unpckhpd %xmm0,%xmm1
divsd  %xmm1,%xmm0
ret

LLVM IR (-O0):
define double @coulomb_normalisation(double %0, double %1, double %2, double %3, double %4) {
%6 = alloca double
%7 = alloca double
%8 = alloca double
%9 = alloca double
%10 = alloca double
%11 = alloca double
%12 = alloca double
%13 = alloca double
store double %0, double* %6
store double %1, double* %7
store double %2, double* %8
store double %3, double* %9
store double %4, double* %10
%14 = load double, double* %9
%15 = load double, double* %9
%16 = load double, double* %8
%17 = call double @llvm.fmuladd.f64(double 2.000000e+00, double %16, double %15)
%18 = fmul double %14, %17
store double %18, double* %11
%19 = load double, double* %10
%20 = load double, double* %10
%21 = load double, double* %8
%22 = call double @llvm.fmuladd.f64(double 2.000000e+00, double %21, double %20)
%23 = fmul double %19, %22
store double %23, double* %12
%24 = load double, double* %6
%25 = fmul double 0x3F7DE3D42A1ED29D, %24
%26 = fmul double %25, 0x3CAC7014A3063882
%27 = load double, double* %9
%28 = load double, double* %8
%29 = fadd double %27, %28
%30 = fmul double %26, %29
store double %30, double* %13
%31 = load double, double* %7
%32 = fmul double %31, 1.000000e-03
%33 = load double, double* %11
%34 = fmul double %32, %33
%35 = load double, double* %12
%36 = fmul double %34, %35
%37 = load double, double* %13
%38 = load double, double* %13
%39 = fmul double %37, %38
%40 = fmul double %39, 0x400921FB54442D18
%41 = fmul double %40, 0x44DFE185CA57C517
%42 = fdiv double %36, %41
ret double %42
}

LLVM IR (-O2):
define double @coulomb_normalisation(double %0, double %1, double %2, double %3, double %4) {
%6 = tail call double @llvm.fmuladd.f64(double %2, double 2.000000e+00, double %3)
%7 = fmul double %6, %3
%8 = tail call double @llvm.fmuladd.f64(double %2, double 2.000000e+00, double %4)
%9 = fmul double %8, %4
%10 = fmul double %0, 0x3F7DE3D42A1ED29D
%11 = fmul double %10, 0x3CAC7014A3063882
%12 = fadd double %2, %3
%13 = fmul double %11, %12
%14 = insertelement <2 x double> poison, double %1, i64 0
%15 = insertelement <2 x double> %14, double %13, i64 1
%16 = insertelement <2 x double> <double 1.000000e-03, double poison>, double %13, i64 1
%17 = fmul <2 x double> %15, %16
%18 = insertelement <2 x double> <double poison, double 0x400921FB54442D18>, double %7, i64 0
%19 = fmul <2 x double> %17, %18
%20 = insertelement <2 x double> <double poison, double 0x44DFE185CA57C517>, double %9, i64 0
%21 = fmul <2 x double> %19, %20
%22 = extractelement <2 x double> %21, i64 0
%23 = extractelement <2 x double> %21, i64 1
%24 = fdiv double %22, %23
ret double %24
}