diff options
author | Eduardo Julian | 2022-12-22 17:21:26 -0400 |
---|---|---|
committer | Eduardo Julian | 2022-12-22 17:21:26 -0400 |
commit | 6f1bf11af05bd03183fee7721ac99eca826ca041 (patch) | |
tree | 9661fdef01ebb7e4c1ead05e839d608bfab86217 /stdlib/source/specification/lux/abstract/mix.lux | |
parent | 4f4a96635abb04239102e4b72dc2a9c6f678dcd2 (diff) |
Added some explicit machinery for the Any type.
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/specification/lux/abstract/mix.lux | 25 |
1 files changed, 0 insertions, 25 deletions
diff --git a/stdlib/source/specification/lux/abstract/mix.lux b/stdlib/source/specification/lux/abstract/mix.lux deleted file mode 100644 index 614b7439f..000000000 --- a/stdlib/source/specification/lux/abstract/mix.lux +++ /dev/null @@ -1,25 +0,0 @@ -(.require - [library - [lux (.except) - [abstract - [monad (.only do)] - [functor - [\\test (.only Injection Comparison)]]] - [math - ["[0]" random] - [number - ["n" nat]]] - [test - ["_" property (.only Test)]]]] - [\\library - ["[0]" /]]) - -(def .public (spec injection comparison (open "/#[0]")) - (All (_ f) (-> (Injection f) (Comparison f) (/.Mix f) Test)) - (do random.monad - [subject random.nat - parameter random.nat] - (<| (_.for [/.Mix]) - (_.coverage [/.mix] - (n.= (/#mix n.+ parameter (injection subject)) - (n.+ parameter subject)))))) |