From 71f3c6290d9476ede6879a49cafaccf3265c5e31 Mon Sep 17 00:00:00 2001
From: Ozzie Gooen <ozzieagooen@gmail.com>
Date: Mon, 10 Feb 2020 23:45:54 +0000
Subject: [PATCH] Minor addition

---
 src/App.re                      | 1 +
 src/models/GlobalCatastrophe.re | 4 ++--
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/App.re b/src/App.re
index 9be2a29b..46e3e482 100644
--- a/src/App.re
+++ b/src/App.re
@@ -2,5 +2,6 @@
 let make = () => {
   <div className="w-full max-w-screen-xl mx-auto px-6">
     <FormBuilder.ModelForm model=EAFunds.Interface.model />
+    <FormBuilder.ModelForm model=GlobalCatastrophe.Interface.model />
   </div>;
 };
\ No newline at end of file
diff --git a/src/models/GlobalCatastrophe.re b/src/models/GlobalCatastrophe.re
index 97888bb0..6c843644 100644
--- a/src/models/GlobalCatastrophe.re
+++ b/src/models/GlobalCatastrophe.re
@@ -1,7 +1,7 @@
 module Model = {
   let make = (dateTime: MomentRe.Moment.t, currentDateTime: MomentRe.Moment.t) => {
     let yearDiff = MomentRe.diff(dateTime, currentDateTime, `days) /. 365.;
-    Prop.Value.Probability((100. -. yearDiff) /. 100.);
+    Prop.Value.Probability(0.001 *. yearDiff);
   };
 };
 
@@ -19,7 +19,7 @@ module Interface = {
   let model: Prop.Model.t =
     Prop.{
       name: "Global Catastrophe",
-      description: "The chances of catastrophe per year in the future.",
+      description: "The chances of having at least one catastrophe per year in the future, assuming no other catastrophe until then.",
       version: "1.0.0",
       author: "Ozzie Gooen",
       inputTypes: [|