aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/aedifex/repository/identity.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/test/aedifex/repository/identity.lux')
-rw-r--r--stdlib/source/test/aedifex/repository/identity.lux36
1 files changed, 18 insertions, 18 deletions
diff --git a/stdlib/source/test/aedifex/repository/identity.lux b/stdlib/source/test/aedifex/repository/identity.lux
index 90a2e1681..5e357ecca 100644
--- a/stdlib/source/test/aedifex/repository/identity.lux
+++ b/stdlib/source/test/aedifex/repository/identity.lux
@@ -1,27 +1,27 @@
(.using
- [library
- [lux "*"
- ["_" test {"+" Test}]
- [abstract
- [\\specification
- ["$[0]" equivalence]]]
- [math
- ["[0]" random {"+" Random}]]]]
- [\\program
- ["[0]" /]])
+ [library
+ [lux "*"
+ ["_" test {"+" Test}]
+ [abstract
+ [\\specification
+ ["$[0]" equivalence]]]
+ [math
+ ["[0]" random {"+" Random}]]]]
+ [\\program
+ ["[0]" /]])
(def: .public random
(Random /.Identity)
- ($_ random.and
- (random.ascii/alpha 10)
- (random.ascii/alpha 10)
- ))
+ (all random.and
+ (random.ascii/alpha 10)
+ (random.ascii/alpha 10)
+ ))
(def: .public test
Test
(<| (_.covering /._)
(_.for [/.User /.Password /.Identity]
- ($_ _.and
- (_.for [/.equivalence]
- ($equivalence.spec /.equivalence ..random))
- ))))
+ (all _.and
+ (_.for [/.equivalence]
+ ($equivalence.spec /.equivalence ..random))
+ ))))