From f0f76ff96eea1afca84091309329a32544b96a39 Mon Sep 17 00:00:00 2001
From: Ozzie Gooen <ozzieagooen@gmail.com>
Date: Wed, 4 Mar 2020 10:19:37 +0000
Subject: [PATCH 1/2] Minor changes

---
 src/components/charts/DistPlusPlot.re        | 8 ++++----
 src/components/charts/DistPlusPlotReducer.re | 2 --
 2 files changed, 4 insertions(+), 6 deletions(-)

diff --git a/src/components/charts/DistPlusPlot.re b/src/components/charts/DistPlusPlot.re
index 5d7cd16c..7712a7c7 100644
--- a/src/components/charts/DistPlusPlot.re
+++ b/src/components/charts/DistPlusPlot.re
@@ -245,7 +245,7 @@ let make = (~distPlus: DistTypes.distPlus) => {
                 <button
                   className=button
                   onClick={_ => dispatch(CHANGE_LOG(index))}>
-                  {(state.log ? "log" : "linear") |> ReasonReact.string}
+                  {(config.log ? "x-log" : "x-linear") |> ReasonReact.string}
                 </button>
                 <button
                   className=button
@@ -259,18 +259,18 @@ let make = (~distPlus: DistTypes.distPlus) => {
                 <button
                   className=button
                   onClick={_ => dispatch(HEIGHT_INCREMENT(index))}>
-                  {"Expand" |> ReasonReact.string}
+                  {"expand" |> ReasonReact.string}
                 </button>
                 <button
                   className=button
                   onClick={_ => dispatch(HEIGHT_DECREMENT(index))}>
-                  {"Compress" |> ReasonReact.string}
+                  {"shrink" |> ReasonReact.string}
                 </button>
                 {index != 0
                    ? <button
                        className=button
                        onClick={_ => dispatch(REMOVE_DIST(index))}>
-                       {"Remove" |> ReasonReact.string}
+                       {"remove" |> ReasonReact.string}
                      </button>
                    : ReasonReact.null}
               </div>
diff --git a/src/components/charts/DistPlusPlotReducer.re b/src/components/charts/DistPlusPlotReducer.re
index 2019e9d6..c3088a28 100644
--- a/src/components/charts/DistPlusPlotReducer.re
+++ b/src/components/charts/DistPlusPlotReducer.re
@@ -5,7 +5,6 @@ type chartConfig = {
 };
 
 type state = {
-  log: bool,
   showStats: bool,
   showParams: bool,
   distributions: list(chartConfig),
@@ -87,7 +86,6 @@ let reducer = (state: state, action: action) =>
   };
 
 let init = {
-  log: false,
   showStats: false,
   showParams: false,
   distributions: [

From fc0400f09309107c1913330d8f652dc48ff2ac1a Mon Sep 17 00:00:00 2001
From: Ozzie Gooen <ozzieagooen@gmail.com>
Date: Wed, 4 Mar 2020 10:27:50 +0000
Subject: [PATCH 2/2] Added extra showcase options

---
 showcase/entries/Continuous.re | 63 +++++++++++++++++++++++++++++-----
 1 file changed, 54 insertions(+), 9 deletions(-)

diff --git a/showcase/entries/Continuous.re b/showcase/entries/Continuous.re
index e801baf4..78e104ce 100644
--- a/showcase/entries/Continuous.re
+++ b/showcase/entries/Continuous.re
@@ -20,23 +20,68 @@ let setup = dist =>
        ~sampleCount=10000,
        ~outputXYPoints=2000,
        ~truncateTo=Some(1000),
-     );
+     )
+  |> E.O.React.fmapOrNull(distPlus => <DistPlusPlot distPlus />);
 
 let distributions = () =>
   <div>
     <div>
-      <h2> {"Single-Discrete" |> ReasonReact.string} </h2>
+      <h2 className="text-gray-800 text-xl font-bold">
+        {"Initial Section" |> ReasonReact.string}
+      </h2>
+      <h3 className="text-gray-600 text-lg font-bold">
+        {"Continuous" |> ReasonReact.string}
+      </h3>
+      {setup(DistPlusIngredients.make(~guesstimatorString="5 to 20", ()))}
+      <h3 className="text-gray-600 text-lg font-bold">
+        {"Discrete" |> ReasonReact.string}
+      </h3>
+      {setup(
+         DistPlusIngredients.make(~guesstimatorString="floor(10 to 20)", ()),
+       )}
+      <h3 className="text-gray-600 text-lg font-bold">
+        {"Mixed" |> ReasonReact.string}
+      </h3>
       {setup(
          DistPlusIngredients.make(
-           ~guesstimatorString=
-             "uniform(0,1) > 0.3 ? lognormal(6.652, -0.41): 0",
-           ~domain=
-             RightLimited({xPoint: 50.0, excludingProbabilityMass: 0.3}),
+           ~guesstimatorString="mm(5 to 20, floor(20 to 30), [.5,.5])",
            (),
          ),
-       )
-       |> E.O.React.fmapOrNull(distPlus => <DistPlusPlot distPlus />)}
+       )}
+      <h2 className="text-gray-800 text-xl font-bold">
+        {"Over Time" |> ReasonReact.string}
+      </h2>
+      <h3 className="text-gray-600 text-lg font-bold">
+        {"Continuous" |> ReasonReact.string}
+      </h3>
+      {setup(
+         DistPlusIngredients.make(
+           ~guesstimatorString="5 to 20",
+           ~unit=TimeDistribution({zero: MomentRe.momentNow(), unit: `years}),
+           (),
+         ),
+       )}
+      <h3 className="text-gray-600 text-lg font-bold">
+        {"Discrete" |> ReasonReact.string}
+      </h3>
+      {setup(
+         DistPlusIngredients.make(
+           ~guesstimatorString="floor(10 to 20)",
+           ~unit=TimeDistribution({zero: MomentRe.momentNow(), unit: `years}),
+           (),
+         ),
+       )}
+      <h3 className="text-gray-600 text-lg font-bold">
+        {"Mixed" |> ReasonReact.string}
+      </h3>
+      {setup(
+         DistPlusIngredients.make(
+           ~guesstimatorString="mm(5 to 20, floor(20 to 30), [.5,.5])",
+           ~unit=TimeDistribution({zero: MomentRe.momentNow(), unit: `years}),
+           (),
+         ),
+       )}
     </div>
   </div>;
 
-let entry = EntryTypes.(entry(~title="Pdf", ~render=distributions));
+let entry = EntryTypes.(entry(~title="Pdf", ~render=distributions));
\ No newline at end of file