theorem CReal.riemannSumDeepCauchyCross : ((x0 : ((x0 : CReal) -> CReal)) -> ((x1 : CReal) -> ((x2 : CReal) -> ((x3 : CReal.le x1 x2) -> ((x4 : CReal.UniformlyContinuousOn x0 x1 x2) -> ((x5 : CReal.UniformlyContinuousOn x0 x1 x2) -> ((x6 : AxNat) -> CReal.Within (Rat.sub (CReal.seq (CReal.riemannSum x0 x1 x2 (AxNat.add (AxNat.add (AxNat.mul (AxNat.succ (CReal.bound (CReal.add x2 (CReal.neg x1)))) (CReal.UniformlyContinuousOn.modulus x0 x1 x2 x4 x6)) (CReal.bound (CReal.add x2 (CReal.neg x1)))) AxNat.zero)) x6) (CReal.seq (CReal.riemannSum x0 x1 x2 (AxNat.add (AxNat.add (AxNat.mul (AxNat.succ (CReal.bound (CReal.add x2 (CReal.neg x1)))) (CReal.UniformlyContinuousOn.modulus x0 x1 x2 x5 x6)) (CReal.bound (CReal.add x2 (CReal.neg x1)))) AxNat.zero)) x6)) (Rat.add (Rat.add (Rat.add (Rat.add (Rat.add (Rat.natDivSucc (AxNat.succ AxNat.zero) x6) (Rat.natDivSucc (AxNat.succ AxNat.zero) (AxNat.succ (AxNat.mul (AxNat.succ (AxNat.succ AxNat.zero)) x6)))) ((fun (x7 : AxNat) => Rat.add (CReal.seq (CReal.mul (CReal.ofNat (AxNat.succ (AxNat.add (AxNat.add (AxNat.mul (AxNat.succ (CReal.bound (CReal.add x2 (CReal.neg x1)))) (CReal.UniformlyContinuousOn.modulus x0 x1 x2 x4 x6)) (CReal.bound (CReal.add x2 (CReal.neg x1)))) AxNat.zero))) (CReal.mul (CReal.ofRat (Rat.natDivSucc (AxNat.succ AxNat.zero) x6)) (CReal.mul (CReal.add x2 (CReal.neg x1)) (CReal.ofRat (Rat.natDivSucc (AxNat.succ AxNat.zero) (AxNat.add (AxNat.add (AxNat.mul (AxNat.succ (CReal.bound (CReal.add x2 (CReal.neg x1)))) (CReal.UniformlyContinuousOn.modulus x0 x1 x2 x4 x6)) (CReal.bound (CReal.add x2 (CReal.neg x1)))) AxNat.zero)))))) x7) (Rat.natDivSucc (AxNat.succ (AxNat.succ AxNat.zero)) x7)) x6)) (Rat.add (Rat.natDivSucc (AxNat.succ AxNat.zero) (AxNat.succ (AxNat.mul (AxNat.succ (AxNat.succ AxNat.zero)) x6))) (Rat.natDivSucc (AxNat.succ AxNat.zero) x6))) (Rat.add (Rat.natDivSucc (AxNat.succ AxNat.zero) x6) (Rat.natDivSucc (AxNat.succ AxNat.zero) x6))) (Rat.add (Rat.add (Rat.add (Rat.natDivSucc (AxNat.succ AxNat.zero) x6) (Rat.natDivSucc (AxNat.succ AxNat.zero) (AxNat.succ (AxNat.mul (AxNat.succ (AxNat.succ AxNat.zero)) x6)))) ((fun (x7 : AxNat) => Rat.add (CReal.seq (CReal.mul (CReal.ofNat (AxNat.succ (AxNat.add (AxNat.add (AxNat.mul (AxNat.succ (CReal.bound (CReal.add x2 (CReal.neg x1)))) (CReal.UniformlyContinuousOn.modulus x0 x1 x2 x5 x6)) (CReal.bound (CReal.add x2 (CReal.neg x1)))) AxNat.zero))) (CReal.mul (CReal.ofRat (Rat.natDivSucc (AxNat.succ AxNat.zero) x6)) (CReal.mul (CReal.add x2 (CReal.neg x1)) (CReal.ofRat (Rat.natDivSucc (AxNat.succ AxNat.zero) (AxNat.add (AxNat.add (AxNat.mul (AxNat.succ (CReal.bound (CReal.add x2 (CReal.neg x1)))) (CReal.UniformlyContinuousOn.modulus x0 x1 x2 x5 x6)) (CReal.bound (CReal.add x2 (CReal.neg x1)))) AxNat.zero)))))) x7) (Rat.natDivSucc (AxNat.succ (AxNat.succ AxNat.zero)) x7)) x6)) (Rat.add (Rat.natDivSucc (AxNat.succ AxNat.zero) (AxNat.succ (AxNat.mul (AxNat.succ (AxNat.succ AxNat.zero)) x6))) (Rat.natDivSucc (AxNat.succ AxNat.zero) x6)))))))))))