%default total cool : (x : Bool) -> x === True cool ? = Refl