@@ -13,7 +13,7 @@ module Rel8.Expr.Time
1313 , diffTime
1414 , subtractTime
1515
16− -- Working with @DiffTime@
16+ -- * Working with @DiffTime@
1717 , scaleInterval
1818 , second, seconds
1919 , minute, minutes
@@ -97,7 +97,7 @@ second :: Expr DiffTime
9797second = singleton "second"
9898
9999
100−-- | Create a literal interval from an integral number of seconds.
100+-- | Create a literal interval from a number of seconds.
101101seconds :: Expr Double -> Expr DiffTime
102102seconds = (`scaleInterval` second)
103103
@@ -107,7 +107,7 @@ minute :: Expr DiffTime
107107minute = singleton "minute"
108108
109109
110−-- | Create a literal interval from an integral number of minutes.
110+-- | Create a literal interval from a number of minutes.
111111minutes :: Expr Double -> Expr DiffTime
112112minutes = (`scaleInterval` minute)
113113
@@ -117,7 +117,7 @@ hour :: Expr DiffTime
117117hour = singleton "hour"
118118
119119
120−-- | Create a literal interval from an integral number of hours.
120+-- | Create a literal interval from a number of hours.
121121hours :: Expr Double -> Expr DiffTime
122122hours = (`scaleInterval` hour)
123123