def attempt.pair
import bend-kit-property@0.4.0.0/property.bend as Propertyimport Base
35def attempt.pair(~T: Type, ~shrink: T -> List<&1, T>, ~test: T -> T & Bool, pair: T & T) -> T & Maybe<&1, T>:
36 (original, probe) = pair
37 (original, smaller.start(~T, ~test, shrink(probe)))