From 2a80e5b219a0ad79cc7da02b802b0f248fd2fb62 Mon Sep 17 00:00:00 2001
From: George Thomas <georgefsthomas@gmail.com>
Date: Thu, 19 Feb 2026 16:26:10 +0000
Subject: [PATCH] Minor simplification

---
 exe/GarnetRs/Wrapped.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/exe/GarnetRs/Wrapped.hs b/exe/GarnetRs/Wrapped.hs
index e98a2c0..6ac7a08 100644
--- a/exe/GarnetRs/Wrapped.hs
+++ b/exe/GarnetRs/Wrapped.hs
@@ -22,7 +22,7 @@ data T = T
     , b :: Word8
     }
 convertT :: T -> Raw.T
-convertT T{a, b} = Raw.T{a = CBool $ fromBool a, b}
+convertT T{a, b} = Raw.T{a = fromBool a, b}
 
 data Shape
     = Circle CDouble