haskell - Haskell Criterion - 'nf' が適用される引数が少なすぎる

Question

私はHaskellの初心者です。二分探索アルゴリズムのベンチマーク(基準)に取り組んでいます。エラーが発生し続けます: 'nf' が適用される引数が少なすぎます。何が間違っていますか。

ありがとう

binSear array serNum lowInx highInx
   | highInx < lowInx       = -1
   | array!!sred > serNum = binSear array serNum lowInx (mid-1)
   | array!!sred < serNum = binSear array serNum (mid+1) highInx
   | otherwise            = mid
   where
   mid = lowInx + ((highInx - lowInx) `div` 2)

main = do
        let arr = [1..10000000]
        defaultMain [
            bench "1" $ nf (binSear arr 54527 0 9999999)
          ]