From 22a9646bf1c5634152634519b097e77b15c32c3a Mon Sep 17 00:00:00 2001
From: Roman Galochkin <roman.redrat@gmail.com>
Date: Thu, 27 Feb 2020 11:50:46 +0300
Subject: [PATCH] Adds right color annotation

---
 src/components/DistBuilder.re | 17 +++++++++--------
 1 file changed, 9 insertions(+), 8 deletions(-)

diff --git a/src/components/DistBuilder.re b/src/components/DistBuilder.re
index d8c7b280..3ccedc35 100644
--- a/src/components/DistBuilder.re
+++ b/src/components/DistBuilder.re
@@ -195,8 +195,9 @@ let make = () => {
       })
     | "RightLimited" =>
       RightLimited({
-        xPoint: reform.state.values.xPoint,
-        excludingProbabilityMass: reform.state.values.excludingProbabilityMass,
+        xPoint: reform.state.values.xPoint2,
+        excludingProbabilityMass:
+          reform.state.values.excludingProbabilityMass2,
       })
     | "LeftAndRightLimited" =>
       LeftAndRightLimited(
@@ -315,14 +316,14 @@ let make = () => {
                <Col span=4>
                  <FieldFloat
                    field=FormConfig.XPoint
-                   label="X-point"
+                   label="Left X-point"
                    className=Styles.groupA
                  />
                </Col>
                <Col span=4>
                  <FieldFloat
                    field=FormConfig.ExcludingProbabilityMass
-                   label="Excluding Probability Mass"
+                   label="Left Excluding Probability Mass"
                    className=Styles.groupA
                  />
                </Col>
@@ -330,21 +331,21 @@ let make = () => {
              |> E.showIf(
                   E.L.contains(
                     reform.state.values.domainType,
-                    ["LeftLimited", "RightLimited", "LeftAndRightLimited"],
+                    ["LeftLimited", "LeftAndRightLimited"],
                   ),
                 )}
             {<>
                <Col span=4>
                  <FieldFloat
                    field=FormConfig.XPoint2
-                   label="X-point (2)"
+                   label="Right X-point"
                    className=Styles.groupB
                  />
                </Col>
                <Col span=4>
                  <FieldFloat
                    field=FormConfig.ExcludingProbabilityMass2
-                   label="Excluding Probability Mass (2)"
+                   label="Right Excluding Probability Mass"
                    className=Styles.groupB
                  />
                </Col>
@@ -352,7 +353,7 @@ let make = () => {
              |> E.showIf(
                   E.L.contains(
                     reform.state.values.domainType,
-                    ["LeftAndRightLimited"],
+                    ["RightLimited", "LeftAndRightLimited"],
                   ),
                 )}
           </Row>