diff options
Diffstat (limited to 'stdlib/source/lux/control/security/privacy.lux')
| -rw-r--r-- | stdlib/source/lux/control/security/privacy.lux | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/stdlib/source/lux/control/security/privacy.lux b/stdlib/source/lux/control/security/privacy.lux index e24d49acb..51d530673 100644 --- a/stdlib/source/lux/control/security/privacy.lux +++ b/stdlib/source/lux/control/security/privacy.lux @@ -74,24 +74,24 @@ (-> Type Type) (type (All [label] (constructor (All [value] (Private value label)))))) - (structure: #export Functor<Private> + (structure: #export functor (:~ (privatize Functor)) (def: (map f fa) (|> fa :representation f :abstraction))) - (structure: #export Apply<Private> + (structure: #export apply (:~ (privatize Apply)) - (def: functor Functor<Private>) + (def: &functor ..functor) (def: (apply ff fa) (:abstraction ((:representation ff) (:representation fa))))) - (structure: #export Monad<Private> + (structure: #export monad (:~ (privatize Monad)) - (def: functor Functor<Private>) + (def: &functor ..functor) (def: wrap (|>> :abstraction)) |