\frac{{\left(\frac{1}{1 + e^{-s}}\right)}^{c_p} \cdot {\left(1 - \frac{1}{1 + e^{-s}}\right)}^{c_n}}{{\left(\frac{1}{1 + e^{-t}}\right)}^{c_p} \cdot {\left(1 - \frac{1}{1 + e^{-t}}\right)}^{c_n}}
(FPCore (c_p c_n t s) :precision binary64 (/ (* (pow (/ 1.0 (+ 1.0 (exp (- s)))) c_p) (pow (- 1.0 (/ 1.0 (+ 1.0 (exp (- s))))) c_n)) (* (pow (/ 1.0 (+ 1.0 (exp (- t)))) c_p) (pow (- 1.0 (/ 1.0 (+ 1.0 (exp (- t))))) c_n))))
double code(double c_p, double c_n, double t, double s) {
return (pow((1.0 / (1.0 + exp(-s))), c_p) * pow((1.0 - (1.0 / (1.0 + exp(-s)))), c_n)) / (pow((1.0 / (1.0 + exp(-t))), c_p) * pow((1.0 - (1.0 / (1.0 + exp(-t)))), c_n));
}