1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25
(.using [library [lux "*" ["_" test {"+" Test}] [abstract [monad {"+" do}]] [control ["[0]" try]] [data ["[0]" text ("[1]#[0]" equivalence)]] [math ["[0]" random {"+" Random}] [number ["[0]" nat] ["[0]" frac]]]]] [\\library ["[0]" /]]) (def: .public test Test (do [! random.monad] [] (<| (_.covering /._) (_.test "TBD" true))))