fact: Record PartialFunctionXY {X Y : Set} {Yeq : Y -> Y -> Prop} : Type := { Domain : X -> Set; partialApply : forall x : X, Domain x -> Y; DomainProp : forall (x : X) (p q : Domain x), Yeq (partialApply x p) (partialApply x q); }.
imports: List QArith ConstructiveReals ConstructiveAbs ConstructiveMinMax ConstructiveSum ConstructiveLimits ConstructiveRcomplete