1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24
(.module: [lux #* ["_" test (#+ Test)] [abstract [monad (#+ do)]] [data ["." text]] [math ["." random]]] ["." / #_ ["#." artifact] ["#." snapshot] [// ["@." artifact]]] {#program ["." /]}) (def: #export test Test (<| (_.covering /._) ($_ _.and /artifact.test /snapshot.test )))