// Examples:
// mm(floor(uniform(30,35)), normal(50,20), [.25,.5])
// mm(floor(normal(28,4)), normal(32,2), uniform(20,24), [.5,.2,.1])
// mm(5 to 20, floor(normal(20,2)), [.5, .5])"
// floor(3 to 4)
// uniform(0,1) > 0.3 ? lognormal(6.652, -0.41): 0

// let timeDist ={
//   let ingredients = DistPlusRenderer.Inputs.Ingredients.make(
//     ~guesstimatorString="(floor(10 to 15))",
//     ~domain=RightLimited({xPoint: 50.0, excludingProbabilityMass: 0.3}),
//     ~unit=
//       DistTypes.TimeDistribution({zero: MomentRe.momentNow(), unit: `years}),
//     ());
//   let inputs = DistPlusRenderer.Inputs.make(~distPlusIngredients=ingredients,())
//   inputs |> DistPlusRenderer.run
// }

// let setup = dist =>
//   DistPlusRenderer.Inputs.make(~distPlusIngredients=dist,())
//   |> DistPlusRenderer.run
//   |> E.R.fmap(distPlus => <DistPlusPlot distPlus />)
//   |> E.R.toOption
//   |> E.O.toExn("")

// let simpleExample = (name, guesstimatorString) =>
//   <>
//     <h3 className="text-gray-600 text-lg font-bold">
//       {name |> ReasonReact.string}
//     </h3>
//     {setup(DistPlusRenderer.Inputs.Ingredients.make(~guesstimatorString, ()))}
//   </>;

// let timeExample = (name, guesstimatorString) =>
//   <>
//     <h3 className="text-gray-600 text-lg font-bold">
//       {name |> ReasonReact.string}
//     </h3>
//     {setup(
//        DistPlusRenderer.Inputs.Ingredients.make(
//          ~guesstimatorString,
//          ~unit=TimeDistribution({zero: MomentRe.momentNow(), unit: `years}),
//          (),
//        ),
//      )}
//   </>;

// let distributions = () =>
//   <div>
//     <div>
//       <h2 className="text-gray-800 text-xl font-bold">
//         {"Initial Section" |> ReasonReact.string}
//       </h2>
//         {simpleExample("Continuous", "5 to 20")}
//         {simpleExample("Continuous, wide range", "1 to 1000000")}
//         {simpleExample("Continuous, tiny values", "0.000000001 to 0.00000001")}
//         {simpleExample(
//            "Continuous large values",
//            "50000000000000 to 200000000000000000",
//          )}
//         {simpleExample("Discrete", "floor(10 to 20)")}
//         {simpleExample(
//            "Discrete and below 0, normal(10,30)",
//            "floor(normal(10,30))",
//          )}
//         {simpleExample("Discrete, wide range", "floor(10 to 200000)")}
//         {simpleExample("Mixed", "mm(5 to 20, floor(20 to 30), [.5,.5])")}
//         {simpleExample("Mixed, Early-Discrete Point", "mm(1, 5 to 20, [.5,.5])")}
//         {simpleExample(
//            "Mixed, Two-Discrete Points",
//            "mm(0,10, 5 to 20, [.5,.5,.5])",
//          )}
//         <h2 className="text-gray-800 text-xl font-bold">
//           {"Over Time" |> ReasonReact.string}
//         </h2>
//         {timeExample("Continuous", "5 to 20")}
//         {timeExample("Continuous Over Long Period", "500 to 200000")}
//         {timeExample("Continuous Over Short Period", "0.0001 to 0.001")}
//         {timeExample(
//            "Continuous Over Very Long Period",
//            "500 to 20000000000000",
//          )}
//         {timeExample("Discrete", "floor(5 to 20)")}
//         {timeExample("Mixed", "mm(5 to 20, floor(5 to 20), [.5,.5])")}
//     </div>
//   </div>;

// let entry = EntryTypes.(entry(~title="Mixed Distributions", ~render=distributions));