data WithDefault : (0 a : Type) -> (0 _ : a) -> TypeDefaultedValue : WithDefault a defSpecifiedValue : a -> WithDefault a defEq a => Eq (WithDefault a def)Ord a => Ord (WithDefault a def)Reflect a => Reflect (WithDefault a def)Reify a => Reify (WithDefault a def)TTC a => TTC (WithDefault a def)specified : a -> WithDefault a defdefaulted : WithDefault a defspecifyValue : a -> WithDefault a def -> WithDefault a defreplaceSpecified : WithDefault a def -> WithDefault a def'collapseDefault : WithDefault a def -> aonWithDefault : Lazy b -> (a -> b) -> WithDefault a def -> bcollapseDefaults : Eq a => WithDefault a def -> WithDefault a def -> Either (a, a) aisDefaulted : WithDefault a def -> BoolisSpecified : WithDefault a def -> Bool