fact: Definition Cjoin_raw (x:Complete (Complete X)) (e:QposInf) := (approximate (approximate x (QposInf_mult (Qpos2QposInf (1#2)) e)) (QposInf_mult (Qpos2QposInf (1#2)) e))%Qpos.
imports: CoRN.metric2.UniformContinuity CoRN.model.structures.QposInf CoRN.metric2.Classification CoRN.model.totalorder.QposMinMax CoRN.model.totalorder.QMinMax