(.module:
  [lux #*
   data/text/format
   [abstract/monad (#+ do)]
   ["r" math/random (#+ Random)]
   ["_" test (#+ Test)]]
  {1
   ["." /]}
  ["." / #_
   ["#." code]
   ["#." syntax]
   ["#." poly #_
    ["#/." equivalence]
    ["#/." functor]
    ["#/." json]]
   ])

(def: #export test
  Test
  (<| (_.context (%name (name-of /._)))
      ($_ _.and
          /code.test
          /syntax.test
          /poly/equivalence.test
          /poly/functor.test
          /poly/json.test
          )))