From 7bd6e70f395f4dbc9ea7e36bba52778119b1c2e4 Mon Sep 17 00:00:00 2001
From: Koz Ross <koz.ross@retro-freedom.nz>
Date: Fri, 19 Jul 2024 13:17:32 +1200
Subject: [PATCH] Update writeBits use in NQueens

---
 plutus-benchmark/bitwise/src/PlutusBenchmark/NQueens.hs | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/plutus-benchmark/bitwise/src/PlutusBenchmark/NQueens.hs b/plutus-benchmark/bitwise/src/PlutusBenchmark/NQueens.hs
index 50550d62960..d510c428ff0 100644
--- a/plutus-benchmark/bitwise/src/PlutusBenchmark/NQueens.hs
+++ b/plutus-benchmark/bitwise/src/PlutusBenchmark/NQueens.hs
@@ -1,12 +1,9 @@
 -- editorconfig-checker-disable-file
 {-# LANGUAGE MultiWayIf        #-}
 {-# LANGUAGE NoImplicitPrelude #-}
-{-# LANGUAGE TypeApplications  #-}
 
 module PlutusBenchmark.NQueens (nqueens) where
 
-import PlutusTx.Builtins (complementByteString, findFirstSetBit, orByteString, replicateByte,
-                          shiftByteString, writeBits)
 import PlutusTx.Prelude
 
 -- Based on Qiu, Zongyan (February 2002). "Bit-vector encoding of n-queen problem". ACM SIGPLAN Notices. 37 (2): 68–70
@@ -76,4 +73,4 @@ selectByteString which bs
 
 {-# INLINE writeBit #-}
 writeBit :: BuiltinByteString -> Integer -> Bool -> BuiltinByteString
-writeBit bs i b = writeBits bs . toBuiltin @[(Integer, Bool)] $ [(i, b)]
+writeBit bs i b = writeBits bs [i] [b]