fact: Definition ConcatSequences {R : ConstructiveReals} (xn yn : nat -> CRcarrier R) (lenX n : nat) : CRcarrier R := if lt_dec n lenX then xn n else yn (n - lenX)%nat.
imports: List Permutation Orders Sorted Mergesort QArith Qpower ConstructiveReals ConstructiveAbs ConstructiveMinMax ConstructiveSum ConstructiveLimits ConstructiveRcomplete ConstructiveDiagonal ConstructiveUniformCont