fact: Definition simpson (fr: Q): CR := (' (iw / 6) * (f fr + f (fr + halfiw)%Q * '4 + f (fr + iw)%Q))%CR.
imports: List NPeano QArith Qabs Qpossec Qsums Qround Qmetric ZArith CRArith CRsum util.Qgcd Program uneven_CRplus stdlib_omissions.P stdlib_omissions.Z stdlib_omissions.Q Coq.ZArith.Zsqrt_compat