https://github.com/math-comp/analysis/blob/2e72931660397c110203fb615472a8bbfc227f52/theories/topology.v#L421