\left(a + b\right) \cdot \left(a + b\right)
(FPCore (a b) :precision binary64 (* (+ a b) (+ a b)))
double code(double a, double b) { return (a + b) * (a + b); }