<commit_before>module Data.Array.Parallel.Prelude (
    module Data.Array.Parallel.Prelude.PArr
  , module Data.Array.Parallel.Prelude.Int
) where

import Data.Array.Parallel.Prelude.PArr
import Data.Array.Parallel.Prelude.Int
<commit_msg>Temporary hack for passing PArrays from unvectorised to vectorised code<commit_after>{-# LANGUAGE PArr #-}

module Data.Array.Parallel.Prelude (
    module Data.Array.Parallel.Prelude.PArr
  , module Data.Array.Parallel.Prelude.Int
  
  , PArray, fromPArrayP, fromPArrayPA
) where

import Data.Array.Parallel.Prelude.PArr
import Data.Array.Parallel.Prelude.Int

import Data.Array.Parallel.Lifted.PArray
import Data.Array.Parallel.Lifted.Closure
import Data.Array.Parallel.Lifted.Combinators

fromPArrayP :: PArray a -> [:a:]
{-# NOINLINE fromPArrayP #-}
fromPArrayP _ = error "fromPArray"

fromPArrayPA :: PA a -> PArray a :-> PArray a
{-# INLINE fromPArrayPA #-}
fromPArrayPA pa = closure1 (\x -> x) (\xs -> xs)
 
{'fraction_non_alphanumeric': 0.11752360965372508, 'fraction_numerical': 0.001049317943336831, 'mean_word_length': 4.359550561797753, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 8, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '5912393', 'n_tokens_mistral': 345, 'n_tokens_neox': 353, 'n_words': 68}