extern double french_call(double S, double X, double T, double t1, double r,
                          double b, double v) {
  double vst1, d1;
  assert(((S) == (S)) && (S) >= 0.000001 && (S) <= 1000000000000.0);
  assert(((X) == (X)) && (X) >= 0.000001 && (X) <= 1000000000000.0);
  assert(((T) == (T)) && (T) >= (1.0 / (253.0 * 24.0)) && (T) <= (20.0));
  assert(((r) == (r)) && (r) >= 0.0 && (r) <= 1000.0);
  assert(((b) == (b)) && (b) >= -1000.0 && (b) <= 1000.0);
  assert(((v) == (v)) && (v) >= 0.0000001 && v <= 100.99999);
  vst1 = v * sqrt(t1);
  d1 = (log(S / X) + b * T + ((v) * (v)) / 2.0 * t1) / vst1;
  return S * exp((b - r) * T) * cnd(d1) - X * exp(-r * T) * cnd(d1 - vst1);
}


x86 assembly (clang, -O0):
<french_call>:
push   %rbp
mov    %rsp,%rbp
sub    $0x80,%rsp
movsd  %xmm0,-0x8(%rbp)
movsd  %xmm1,-0x10(%rbp)
movsd  %xmm2,-0x18(%rbp)
movsd  %xmm3,-0x20(%rbp)
movsd  %xmm4,-0x28(%rbp)
movsd  %xmm5,-0x30(%rbp)
movsd  %xmm6,-0x38(%rbp)
movsd  -0x8(%rbp),%xmm0
xor    %eax,%eax
ucomisd -0x8(%rbp),%xmm0
mov    %al,-0x49(%rbp)
jne    11c8 <french_call+0x78>
jp     11c8 <french_call+0x78>
movsd  -0x8(%rbp),%xmm0
xor    %eax,%eax
movsd  0xe58(%rip),%xmm1
ucomisd %xmm1,%xmm0
mov    %al,-0x49(%rbp)
jb     11c8 <french_call+0x78>
movsd  0xe4b(%rip),%xmm0
ucomisd -0x8(%rbp),%xmm0
setae  %al
mov    %al,-0x49(%rbp)
mov    -0x49(%rbp),%al
and    $0x1,%al
movzbl %al,%edi
mov    $0x0,%al
call   1030 <assert@plt>
movsd  -0x10(%rbp),%xmm0
xor    %eax,%eax
ucomisd -0x10(%rbp),%xmm0
mov    %al,-0x4a(%rbp)
jne    1221 <french_call+0xd1>
jp     1221 <french_call+0xd1>
movsd  -0x10(%rbp),%xmm0
xor    %eax,%eax
movsd  0xdff(%rip),%xmm1
ucomisd %xmm1,%xmm0
mov    %al,-0x4a(%rbp)
jb     1221 <french_call+0xd1>
movsd  0xdf2(%rip),%xmm0
ucomisd -0x10(%rbp),%xmm0
setae  %al
mov    %al,-0x4a(%rbp)
mov    -0x4a(%rbp),%al
and    $0x1,%al
movzbl %al,%edi
mov    $0x0,%al
call   1030 <assert@plt>
movsd  -0x18(%rbp),%xmm0
xor    %eax,%eax
ucomisd -0x18(%rbp),%xmm0
mov    %al,-0x4b(%rbp)
jne    127a <french_call+0x12a>
jp     127a <french_call+0x12a>
movsd  -0x18(%rbp),%xmm0
xor    %eax,%eax
movsd  0xdb6(%rip),%xmm1
ucomisd %xmm1,%xmm0
mov    %al,-0x4b(%rbp)
jb     127a <french_call+0x12a>
movsd  0xda9(%rip),%xmm0
ucomisd -0x18(%rbp),%xmm0
setae  %al
mov    %al,-0x4b(%rbp)
mov    -0x4b(%rbp),%al
and    $0x1,%al
movzbl %al,%edi
mov    $0x0,%al
call   1030 <assert@plt>
movsd  -0x28(%rbp),%xmm0
xor    %eax,%eax
ucomisd -0x28(%rbp),%xmm0
mov    %al,-0x4c(%rbp)
jne    12ce <french_call+0x17e>
jp     12ce <french_call+0x17e>
movsd  -0x28(%rbp),%xmm0
xor    %eax,%eax
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
mov    %al,-0x4c(%rbp)
jb     12ce <french_call+0x17e>
movsd  0xd5d(%rip),%xmm0
ucomisd -0x28(%rbp),%xmm0
setae  %al
mov    %al,-0x4c(%rbp)
mov    -0x4c(%rbp),%al
and    $0x1,%al
movzbl %al,%edi
mov    $0x0,%al
call   1030 <assert@plt>
movsd  -0x30(%rbp),%xmm0
xor    %eax,%eax
ucomisd -0x30(%rbp),%xmm0
mov    %al,-0x4d(%rbp)
jne    1327 <french_call+0x1d7>
jp     1327 <french_call+0x1d7>
movsd  -0x30(%rbp),%xmm0
xor    %eax,%eax
movsd  0xd21(%rip),%xmm1
ucomisd %xmm1,%xmm0
mov    %al,-0x4d(%rbp)
jb     1327 <french_call+0x1d7>
movsd  0xd04(%rip),%xmm0
ucomisd -0x30(%rbp),%xmm0
setae  %al
mov    %al,-0x4d(%rbp)
mov    -0x4d(%rbp),%al
and    $0x1,%al
movzbl %al,%edi
mov    $0x0,%al
call   1030 <assert@plt>
movsd  -0x38(%rbp),%xmm0
xor    %eax,%eax
ucomisd -0x38(%rbp),%xmm0
mov    %al,-0x4e(%rbp)
jne    1380 <french_call+0x230>
jp     1380 <french_call+0x230>
movsd  -0x38(%rbp),%xmm0
xor    %eax,%eax
movsd  0xcd0(%rip),%xmm1
ucomisd %xmm1,%xmm0
mov    %al,-0x4e(%rbp)
jb     1380 <french_call+0x230>
movsd  0xcc3(%rip),%xmm0
ucomisd -0x38(%rbp),%xmm0
setae  %al
mov    %al,-0x4e(%rbp)
mov    -0x4e(%rbp),%al
and    $0x1,%al
movzbl %al,%edi
mov    $0x0,%al
call   1030 <assert@plt>
movsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x80(%rbp)
movsd  -0x20(%rbp),%xmm0
call   1070 <sqrt@plt>
movaps %xmm0,%xmm1
movsd  -0x80(%rbp),%xmm0
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  -0x8(%rbp),%xmm0
divsd  -0x10(%rbp),%xmm0
call   1050 <log@plt>
movsd  -0x30(%rbp),%xmm1
movsd  -0x18(%rbp),%xmm2
mulsd  %xmm2,%xmm1
addsd  %xmm0,%xmm1
movsd  -0x38(%rbp),%xmm0
mulsd  -0x38(%rbp),%xmm0
movsd  0xc59(%rip),%xmm2
divsd  %xmm2,%xmm0
movsd  -0x20(%rbp),%xmm2
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
divsd  -0x40(%rbp),%xmm0
movsd  %xmm0,-0x48(%rbp)
movsd  -0x8(%rbp),%xmm0
movsd  %xmm0,-0x78(%rbp)
movsd  -0x30(%rbp),%xmm0
subsd  -0x28(%rbp),%xmm0
mulsd  -0x18(%rbp),%xmm0
call   1040 <exp@plt>
movaps %xmm0,%xmm1
movsd  -0x78(%rbp),%xmm0
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x60(%rbp)
movsd  -0x48(%rbp),%xmm0
mov    $0x1,%al
call   1060 <cnd@plt>
cvtsi2sd %eax,%xmm0
movsd  %xmm0,-0x58(%rbp)
movsd  -0x10(%rbp),%xmm0
movsd  %xmm0,-0x70(%rbp)
movsd  -0x28(%rbp),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
mulsd  -0x18(%rbp),%xmm0
call   1040 <exp@plt>
movaps %xmm0,%xmm1
movsd  -0x70(%rbp),%xmm0
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x68(%rbp)
movsd  -0x48(%rbp),%xmm0
subsd  -0x40(%rbp),%xmm0
mov    $0x1,%al
call   1060 <cnd@plt>
movsd  -0x68(%rbp),%xmm1
movsd  -0x60(%rbp),%xmm0
movsd  -0x58(%rbp),%xmm2
cvtsi2sd %eax,%xmm3
mulsd  %xmm3,%xmm1
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
add    $0x80,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<french_call>:
sub    $0x48,%rsp
ucomisd %xmm0,%xmm0
setnp  %al
ucomisd 0xe9d(%rip),%xmm0
setae  %cl
and    %al,%cl
movsd  0xe98(%rip),%xmm7
movsd  %xmm0,0x40(%rsp)
ucomisd %xmm0,%xmm7
movsd  %xmm6,0x8(%rsp)
movsd  %xmm5,0x38(%rsp)
movaps %xmm4,0x20(%rsp)
movsd  %xmm3,(%rsp)
movsd  %xmm2,0x10(%rsp)
movsd  %xmm1,0x18(%rsp)
setae  %al
and    %cl,%al
movzbl %al,%edi
xor    %eax,%eax
call   1030 <assert@plt>
movsd  0x18(%rsp),%xmm1
ucomisd %xmm1,%xmm1
setnp  %al
ucomisd 0xe40(%rip),%xmm1
setae  %cl
and    %al,%cl
movsd  0xe3b(%rip),%xmm0
ucomisd %xmm1,%xmm0
setae  %al
and    %cl,%al
movzbl %al,%edi
xor    %eax,%eax
call   1030 <assert@plt>
movsd  0x10(%rsp),%xmm1
ucomisd %xmm1,%xmm1
setnp  %al
ucomisd 0xe1b(%rip),%xmm1
setae  %cl
and    %al,%cl
movsd  0xe16(%rip),%xmm0
ucomisd %xmm1,%xmm0
setae  %al
and    %cl,%al
movzbl %al,%edi
xor    %eax,%eax
call   1030 <assert@plt>
xorpd  %xmm1,%xmm1
movapd 0x20(%rsp),%xmm0
ucomisd %xmm1,%xmm0
setae  %al
movsd  0xdf2(%rip),%xmm1
ucomisd %xmm0,%xmm1
setae  %cl
and    %al,%cl
movzbl %cl,%edi
xor    %eax,%eax
call   1030 <assert@plt>
movsd  0x38(%rsp),%xmm0
ucomisd %xmm0,%xmm0
setnp  %al
ucomisd 0xdd2(%rip),%xmm0
setae  %cl
and    %al,%cl
movsd  0xdbd(%rip),%xmm1
ucomisd %xmm0,%xmm1
setae  %al
and    %cl,%al
movzbl %al,%edi
xor    %eax,%eax
call   1030 <assert@plt>
movsd  0x8(%rsp),%xmm1
ucomisd %xmm1,%xmm1
setnp  %al
ucomisd 0xda5(%rip),%xmm1
setae  %cl
and    %al,%cl
movsd  0xda0(%rip),%xmm0
ucomisd %xmm1,%xmm0
setae  %al
and    %cl,%al
movzbl %al,%edi
xor    %eax,%eax
call   1030 <assert@plt>
movsd  (%rsp),%xmm0
ucomisd 0xd90(%rip),%xmm0
jb     12c5 <french_call+0x175>
movsd  (%rsp),%xmm0
sqrtsd %xmm0,%xmm0
jmp    12cf <french_call+0x17f>
movsd  (%rsp),%xmm0
call   1070 <sqrt@plt>
mulsd  0x8(%rsp),%xmm0
movsd  %xmm0,0x30(%rsp)
movsd  0x40(%rsp),%xmm0
divsd  0x18(%rsp),%xmm0
call   1050 <log@plt>
movapd %xmm0,%xmm2
movsd  0x38(%rsp),%xmm0
movapd %xmm0,%xmm1
movsd  0x10(%rsp),%xmm3
mulsd  %xmm3,%xmm1
addsd  %xmm1,%xmm2
movsd  0x8(%rsp),%xmm1
mulsd  %xmm1,%xmm1
mulsd  0xd26(%rip),%xmm1
mulsd  (%rsp),%xmm1
addsd  %xmm1,%xmm2
divsd  0x30(%rsp),%xmm2
movsd  %xmm2,0x8(%rsp)
subsd  0x20(%rsp),%xmm0
mulsd  %xmm3,%xmm0
call   1040 <exp@plt>
mulsd  0x40(%rsp),%xmm0
movsd  %xmm0,(%rsp)
movsd  0x8(%rsp),%xmm0
mov    $0x1,%al
call   1060 <cnd@plt>
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
mulsd  (%rsp),%xmm0
movsd  %xmm0,(%rsp)
movapd 0x20(%rsp),%xmm0
xorpd  0xcdb(%rip),%xmm0
mulsd  0x10(%rsp),%xmm0
call   1040 <exp@plt>
movsd  %xmm0,0x20(%rsp)
movsd  0x8(%rsp),%xmm0
subsd  0x30(%rsp),%xmm0
mov    $0x1,%al
call   1060 <cnd@plt>
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
movsd  0x20(%rsp),%xmm1
mulsd  0x18(%rsp),%xmm1
mulsd  %xmm0,%xmm1
movsd  (%rsp),%xmm0
subsd  %xmm1,%xmm0
add    $0x48,%rsp
ret

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

LLVM IR (-O2):
define double @french_call(double %0, double %1, double %2, double %3, double %4, double %5, double %6) {
%8 = fcmp ord double %0, 0.000000e+00
%9 = fcmp oge double %0, 0x3EB0C6F7A0B5ED8D
%10 = and i1 %8, %9
%11 = fcmp ole double %0, 1.000000e+12
%12 = and i1 %11, %10
%13 = zext i1 %12 to i32
%14 = tail call i32 (i32, ...) bitcast (i32 (...)* @assert to i32 (i32, ...)*)(i32 %13)
%15 = fcmp ord double %1, 0.000000e+00
%16 = fcmp oge double %1, 0x3EB0C6F7A0B5ED8D
%17 = and i1 %15, %16
%18 = fcmp ole double %1, 1.000000e+12
%19 = and i1 %18, %17
%20 = zext i1 %19 to i32
%21 = tail call i32 (i32, ...) bitcast (i32 (...)* @assert to i32 (i32, ...)*)(i32 %20)
%22 = fcmp ord double %2, 0.000000e+00
%23 = fcmp oge double %2, 0x3F2596179C29D2CE
%24 = and i1 %22, %23
%25 = fcmp ole double %2, 2.000000e+01
%26 = and i1 %25, %24
%27 = zext i1 %26 to i32
%28 = tail call i32 (i32, ...) bitcast (i32 (...)* @assert to i32 (i32, ...)*)(i32 %27)
%29 = fcmp oge double %4, 0.000000e+00
%30 = fcmp ole double %4, 1.000000e+03
%31 = and i1 %29, %30
%32 = zext i1 %31 to i32
%33 = tail call i32 (i32, ...) bitcast (i32 (...)* @assert to i32 (i32, ...)*)(i32 %32)
%34 = fcmp ord double %5, 0.000000e+00
%35 = fcmp oge double %5, -1.000000e+03
%36 = and i1 %34, %35
%37 = fcmp ole double %5, 1.000000e+03
%38 = and i1 %37, %36
%39 = zext i1 %38 to i32
%40 = tail call i32 (i32, ...) bitcast (i32 (...)* @assert to i32 (i32, ...)*)(i32 %39)
%41 = fcmp ord double %6, 0.000000e+00
%42 = fcmp oge double %6, 0x3E7AD7F29ABCAF48
%43 = and i1 %41, %42
%44 = fcmp ole double %6, 0x40593FFFD60E94EE
%45 = and i1 %44, %43
%46 = zext i1 %45 to i32
%47 = tail call i32 (i32, ...) bitcast (i32 (...)* @assert to i32 (i32, ...)*)(i32 %46)
%48 = tail call double @sqrt(double %3)
%49 = fmul double %48, %6
%50 = fdiv double %0, %1
%51 = tail call double @log(double %50)
%52 = tail call double @llvm.fmuladd.f64(double %5, double %2, double %51)
%53 = fmul double %6, %6
%54 = fmul double %53, 5.000000e-01
%55 = tail call double @llvm.fmuladd.f64(double %54, double %3, double %52)
%56 = fdiv double %55, %49
%57 = fsub double %5, %4
%58 = fmul double %57, %2
%59 = tail call double @exp(double %58)
%60 = fmul double %59, %0
%61 = tail call i32 (double, ...) bitcast (i32 (...)* @cnd to i32 (double, ...)*)(double %56)
%62 = sitofp i32 %61 to double
%63 = fneg double %4
%64 = fmul double %63, %2
%65 = tail call double @exp(double %64)
%66 = fsub double %56, %49
%67 = tail call i32 (double, ...) bitcast (i32 (...)* @cnd to i32 (double, ...)*)(double %66)
%68 = sitofp i32 %67 to double
%69 = fneg double %65
%70 = fmul double %69, %1
%71 = fmul double %70, %68
%72 = tail call double @llvm.fmuladd.f64(double %60, double %62, double %71)
ret double %72
}