From 241252e55a65f800c10395648f229e8f8f077558 Mon Sep 17 00:00:00 2001
From: Yves Hauser <yves.hauser@gmail.com>
Date: Tue, 29 Nov 2022 21:55:53 +0100
Subject: [PATCH] Code formatting

---
 test/Actus/TestFramework.purs | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/test/Actus/TestFramework.purs b/test/Actus/TestFramework.purs
index 9a0035e..d744bce 100644
--- a/test/Actus/TestFramework.purs
+++ b/test/Actus/TestFramework.purs
@@ -63,11 +63,11 @@ runTest tc =
   riskFactors i ev date =
     case getValue i tc ev date of
       Just v -> case ev of
-        RR -> let RiskFactors rf = defaultRiskFactors in RiskFactors $ rf {o_rf_RRMO = v}
-        SC -> let RiskFactors rf = defaultRiskFactors in RiskFactors $ rf {o_rf_SCMO = v}
-        DV -> let RiskFactors rf = defaultRiskFactors in RiskFactors $ rf {dv_payoff = v}
-        XD -> let RiskFactors rf = defaultRiskFactors in RiskFactors $ rf {xd_payoff = v}
-        _  -> let RiskFactors rf = defaultRiskFactors in RiskFactors $ rf {o_rf_CURS = v}
+        RR -> let RiskFactors rf = defaultRiskFactors in RiskFactors $ rf { o_rf_RRMO = v }
+        SC -> let RiskFactors rf = defaultRiskFactors in RiskFactors $ rf { o_rf_SCMO = v }
+        DV -> let RiskFactors rf = defaultRiskFactors in RiskFactors $ rf { dv_payoff = v }
+        XD -> let RiskFactors rf = defaultRiskFactors in RiskFactors $ rf { xd_payoff = v }
+        _ -> let RiskFactors rf = defaultRiskFactors in RiskFactors $ rf { o_rf_CURS = v }
       Nothing -> defaultRiskFactors
 
 getValue :: String -> TestCase -> EventType -> DateTime -> Maybe Decimal