<commit_before>-- |
-- Module      : Test.Speculate.Function.A1000
-- Copyright   : (c) 2018 <NAME>
-- License     : 3-Clause BSD  (see the file LICENSE)
-- Maintainer  : <NAME> <<EMAIL>>
--
-- This module is part of Speculate.
--
-- This module exports a Listable instance for functions along with two toy Eq
-- and Ord instances for functions based on 1000 sample return values.
module Test.Speculate.Function.A100 () where

import Test.Speculate.Function

instance (Listable a, Eq b) => Eq (a -> b) where
  (==) = areEqualFor 1000

instance (Listable a, Ord b) => Ord (a -> b) where
  compare = compareFor 1000<commit_msg>Fix module name (A100 -> A1000)<commit_after>-- |
-- Module      : Test.Speculate.Function.A1000
-- Copyright   : (c) 2018 <NAME>
-- License     : 3-Clause BSD  (see the file LICENSE)
-- Maintainer  : <NAME> <<EMAIL>>
--
-- This module is part of Speculate.
--
-- This module exports a Listable instance for functions along with two toy Eq
-- and Ord instances for functions based on 1000 sample return values.
module Test.Speculate.Function.A1000 () where

import Test.Speculate.Function

instance (Listable a, Eq b) => Eq (a -> b) where
  (==) = areEqualFor 1000

instance (Listable a, Ord b) => Ord (a -> b) where
  compare = compareFor 1000
{'fraction_non_alphanumeric': 0.12450748620961387, 'fraction_numerical': 0.04412923561859732, 'mean_word_length': 3.1639344262295084, 'pattern_counts': {'":': 0, '<': 11, '<?xml version=': 0, '>': 20, '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': '4722571', 'n_tokens_mistral': 434, 'n_tokens_neox': 384, 'n_words': 153}