aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/time/duration.lux
diff options
context:
space:
mode:
authorEduardo Julian2022-06-12 13:33:48 -0400
committerEduardo Julian2022-06-12 13:33:48 -0400
commit8c3a1afab9efeb86e2f53d743551fc689fbad257 (patch)
tree396b2fd29bac407544d2136a0d9e6e3b8b2c30af /stdlib/source/library/lux/time/duration.lux
parent9c21fd1f33eb52fb971d493ad21a67036d68b841 (diff)
De-sigil-ification: suffix : [Part 4]
Diffstat (limited to 'stdlib/source/library/lux/time/duration.lux')
-rw-r--r--stdlib/source/library/lux/time/duration.lux48
1 files changed, 24 insertions, 24 deletions
diff --git a/stdlib/source/library/lux/time/duration.lux b/stdlib/source/library/lux/time/duration.lux
index e59e4c9f2..e608a8075 100644
--- a/stdlib/source/library/lux/time/duration.lux
+++ b/stdlib/source/library/lux/time/duration.lux
@@ -60,18 +60,18 @@
(-> Duration Duration Int)
(i./ (representation param) (representation subject)))
- (implementation: .public equivalence
+ (def: .public equivalence
(Equivalence Duration)
-
- (def: (= param subject)
- (i.= (representation param) (representation subject))))
+ (implementation
+ (def: (= param subject)
+ (i.= (representation param) (representation subject)))))
- (implementation: .public order
+ (def: .public order
(Order Duration)
-
- (def: equivalence ..equivalence)
- (def: (< param subject)
- (i.< (representation param) (representation subject))))
+ (implementation
+ (def: equivalence ..equivalence)
+ (def: (< param subject)
+ (i.< (representation param) (representation subject)))))
(with_template [<op> <name>]
[(def: .public <name>
@@ -106,11 +106,11 @@
(def: .public leap_year
(..composite ..day ..normal_year))
-(implementation: .public monoid
+(def: .public monoid
(Monoid Duration)
-
- (def: identity ..empty)
- (def: composite ..composite))
+ (implementation
+ (def: identity ..empty)
+ (def: composite ..composite)))
(with_template [<value> <definition>]
[(def: <definition> <value>)]
@@ -181,21 +181,21 @@
{.#Left _} (..inverse span)
{.#Right _} span)))))
-(implementation: .public codec
+(def: .public codec
(Codec Text Duration)
-
- (def: encoded ..encoded)
- (def: decoded (<text>.result ..parser)))
+ (implementation
+ (def: encoded ..encoded)
+ (def: decoded (<text>.result ..parser))))
(def: .public (difference from to)
(-> Duration Duration Duration)
(|> from ..inverse (..composite to)))
-(implementation: .public enum
+(def: .public enum
(Enum Duration)
-
- (def: order ..order)
- (def: succ
- (..composite ..milli_second))
- (def: pred
- (..composite (..inverse ..milli_second))))
+ (implementation
+ (def: order ..order)
+ (def: succ
+ (..composite ..milli_second))
+ (def: pred
+ (..composite (..inverse ..milli_second)))))