Expression 1, p15

(FPCore (a b c d e) :precision binary64 (+ (+ (+ (+ e d) c) b) a))

double code(double a, double b, double c, double d, double e) {
	return (((e + d) + c) + b) + a;
}

real(8) function code(a, b, c, d, e)
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    real(8), intent (in) :: d
    real(8), intent (in) :: e
    code = (((e + d) + c) + b) + a
end function

public static double code(double a, double b, double c, double d, double e) {
	return (((e + d) + c) + b) + a;
}

def code(a, b, c, d, e):
	return (((e + d) + c) + b) + a

function code(a, b, c, d, e)
	return Float64(Float64(Float64(Float64(e + d) + c) + b) + a)
end

function tmp = code(a, b, c, d, e)
	tmp = (((e + d) + c) + b) + a;
end

code[a_, b_, c_, d_, e_] := N[(N[(N[(N[(e + d), $MachinePrecision] + c), $MachinePrecision] + b), $MachinePrecision] + a), $MachinePrecision]

\begin{array}{l}

\\
\left(\left(\left(e + d\right) + c\right) + b\right) + a
\end{array}