@colisweb/rescript-toolkit 3.7.0 → 3.7.2

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@colisweb/rescript-toolkit",
-  "version": "3.7.0",
+  "version": "3.7.2",
   "type": "module",
   "scripts": {
     "clean": "rescript clean",

package/src/decoders/Toolkit__Decoders.res

@@ -290,6 +290,20 @@ module UnitMeasure = {
     })
   }
 
+  module Speed = {
+    module Config = Toolkit__Utils_UnitMeasure.Speed
+
+    module WithUnit = MakeWithUnit({
+      include Config
+      let errorPrefix = "Speed with unit"
+    })
+
+    module Km_h = Make({
+      include Config
+      let wrapValue = Config.wrapValue(#km_h)
+    })
+  }
+
   module Volume = {
     module Config = Toolkit__Utils_UnitMeasure.Volume
 

package/src/form/Toolkit__FormValidationFunctions.res

@@ -323,6 +323,18 @@ let optionalPosFloatEnergyCapacityKWh = (intl, value) => {
   }
 }
 
+let optionalPosFloatSpeedKm_h = (intl, value) => {
+  switch value {
+  | "" => None
+  | v =>
+    switch v->Toolkit__Decoders.UnitMeasure.Speed.WithUnit.decodeFromString {
+    | Ok(#km_h(_)) => None
+    | _ =>
+      Some(Intl.formatMessageWithValues(intl, Msg.wrongFormat, {"exemple": "'10 km/h' '0.5 km/h'"}))
+    }
+  }
+}
+
 let requiredPosFloatWeightG = (intl, value) => {
   switch value {
   | "" => Some(Intl.formatMessage(intl, Msg.requiredValue))

package/src/utils/Toolkit__Utils_UnitMeasure.res

@@ -180,6 +180,42 @@ module Dimension = {
   }
 }
 
+module Speed = {
+  include Unit({
+    @deriving(jsConverter)
+    type unitEnum = [
+      | @as(`km/h`) #km_h
+    ]
+  })
+
+  type t = [
+    | #km_h(float)
+  ]
+
+  let wrapValue = (unit: unitEnum, value: float): t =>
+    switch unit {
+    | #km_h => #km_h(value)
+    }
+
+  let toValue = value =>
+    switch value {
+    | #km_h(v) => v
+    }
+
+  let display = (value, ~digits=2, ()) => {
+    open Js.Float
+    switch value {
+    | #km_h(v) => v->toFixedWithPrecision(~digits) ++ " km/h"
+    }
+  }
+
+  let toString = value => {
+    switch value {
+    | #km_h(v) => v->Float.toString ++ " km/h"
+    }
+  }
+}
+
 module Volume = {
   include Unit({
     @deriving(jsConverter)