let mark = [  (0.0, RangeSlider.Mark.Value "0°F")
              (3.0, RangeSlider.Mark.Value "3°F")
              (5.0, RangeSlider.Mark.Value "5°F")
              (7.65, RangeSlider.Mark.Value "7.65°F")
              (10.0, RangeSlider.Mark.Value "10°") 
           ] |> Map.ofList

let layout =
  RangeSlider.rangeSlider "my-range-slider" [
        RangeSlider.Attr.min 0.0
        RangeSlider.Attr.max 10.0
        RangeSlider.Attr.step -0.001
        RangeSlider.Attr.marks mark
        RangeSlider.Attr.value [ 3.0; 7.65 ] 
  ]
