<commit_before>﻿namespace FSharpPlus.Control

open System
open System.Text
open System.Runtime.CompilerServices
open System.Runtime.InteropServices
open FSharpPlus.Internals


[<Extension;Sealed>]
type Item1 =
    static member inline       Item1 (t :'a          ) = (^a : (member Item1: _ ) t)
    [<Extension>]static member Item1 ((a, _, _, _, _)) = a
    [<Extension>]static member Item1 ((a, _, _, _)   ) = a
    [<Extension>]static member Item1 ((a, _, _)      ) = a
    [<Extension>]static member Item1 ((a, _)         ) = a

    static member inline Invoke value = 
        let inline call_2 (_:^a, b:^b) = ((^a or ^b) : (static member Item1: _ -> _) b)
        let inline call (a:'a, b:'b) = call_2 (a, b)
        call (Unchecked.defaultof<Item1> , value)

[<Extension;Sealed>]
type Item2 =
    static member inline       Item2 (t :'a          ) = (^a : (member Item2: _ ) t)
    [<Extension>]static member Item2 ((_, b, _, _, _)) = b
    [<Extension>]static member Item2 ((_, b, _, _)   ) = b
    [<Extension>]static member Item2 ((_, b, _)      ) = b
    [<Extension>]static member Item2 ((_, b)         ) = b

    static member inline Invoke value = 
        let inline call_2 (_:^a, b:^b) = ((^a or ^b) : (static member Item2: _ -> _) b)
        let inline call (a:'a, b:'b) = call_2 (a, b)
        call (Unchecked.defaultof<Item2> , value)

[<Extension;Sealed>]
type Item3 =
    static member inline       Item3 (t :'a          ) = (^a : (member Item3: _ ) t)
    [<Extension>]static member Item3 ((_, _, c, _, _)) = c
    [<Extension>]static member Item3 ((_, _, c, _)   ) = c
    [<Extension>]static member Item3 ((_, _, c)      ) = c

    static member inline Invoke value = 
        let inline call_2 (_:^a, b:^b) = ((^a or ^b) : (static member Item3: _ -> _) b)
        let inline call (a:'a, b:'b) = call_2 (a, b)
        call (Unchecked.defaultof<Item3> , value)

[<Extension;Sealed>]
type Item4 =
    static member inline       Item4 (t :'a          ) = (^a : (member Item4: _ ) t)
    [<Extension>]static member Item4 ((_, _, _, d, _)) = d
    [<Extension>]static member Item4 ((_, _, _, d)   ) = d

    static member inline Invoke value = 
        let inline call_2 (_:^a, b:^b) = ((^a or ^b) : (static member Item4: _ -> _) b)
        let inline call (a:'a, b:'b) = call_2 (a, b)
        call (Unchecked.defaultof<Item4> , value)

[<Extension;Sealed>]
type Item5 =
    static member inline       Item5 (t :'a          ) = (^a : (member Item5: _ ) t)
    [<Extension>]static member Item5 ((_, _, _, _, e)) = e

    static member inline Invoke value = 
        let inline call_2 (_:^a, b:^b) = ((^a or ^b) : (static member Item5: _ -> _) b)
        let inline call (a:'a, b:'b) = call_2 (a, b)
        call (Unchecked.defaultof<Item5> , value)


type MapItem1 =   
    static member MapItem1 ((a, b, c, d, e)         , fn) = (fn a, b, c, d, e)
    static member MapItem1 ((a, b, c, d)            , fn) = (fn a, b, c, d)      
    static member MapItem1 ((a, b, c)               , fn) = (fn a, b, c)         
    static member MapItem1 ((a, b)                  , fn) = (fn a, b)

    static member inline Invoke f value = 
        let inline call_2 (_:^a, b:^b) = ((^a or ^b) : (static member MapItem1: _ * _ -> _) b, f)
        let inline call   (a:'a, b:'b) = call_2 (a, b)
        call (Unchecked.defaultof<MapItem1> , value)

[<Extension;Sealed>]
type MapItem2 =<commit_msg>Fix future problem after F# 4.1 tuple's breaking change The code removed would result in ambiguous overload resolution.<commit_after>﻿namespace FSharpPlus.Control

open System
open System.Text
open System.Runtime.CompilerServices
open System.Runtime.InteropServices
open FSharpPlus.Internals


[<Extension;Sealed>]
type Item1 =
    [<Extension>]static member Item1 ((a, _, _, _, _)) = a
    [<Extension>]static member Item1 ((a, _, _, _)   ) = a
    [<Extension>]static member Item1 ((a, _, _)      ) = a
    [<Extension>]static member Item1 ((a, _)         ) = a

    static member inline Invoke value = 
        let inline call_2 (_:^a, b:^b) = ((^a or ^b) : (static member Item1: _ -> _) b)
        let inline call (a:'a, b:'b) = call_2 (a, b)
        call (Unchecked.defaultof<Item1> , value)

[<Extension;Sealed>]
type Item2 =
    [<Extension>]static member Item2 ((_, b, _, _, _)) = b
    [<Extension>]static member Item2 ((_, b, _, _)   ) = b
    [<Extension>]static member Item2 ((_, b, _)      ) = b
    [<Extension>]static member Item2 ((_, b)         ) = b

    static member inline Invoke value = 
        let inline call_2 (_:^a, b:^b) = ((^a or ^b) : (static member Item2: _ -> _) b)
        let inline call (a:'a, b:'b) = call_2 (a, b)
        call (Unchecked.defaultof<Item2> , value)

[<Extension;Sealed>]
type Item3 =
    [<Extension>]static member Item3 ((_, _, c, _, _)) = c
    [<Extension>]static member Item3 ((_, _, c, _)   ) = c
    [<Extension>]static member Item3 ((_, _, c)      ) = c

    static member inline Invoke value = 
        let inline call_2 (_:^a, b:^b) = ((^a or ^b) : (static member Item3: _ -> _) b)
        let inline call (a:'a, b:'b) = call_2 (a, b)
        call (Unchecked.defaultof<Item3> , value)

[<Extension;Sealed>]
type Item4 =
    [<Extension>]static member Item4 ((_, _, _, d, _)) = d
    [<Extension>]static member Item4 ((_, _, _, d)   ) = d

    static member inline Invoke value = 
        let inline call_2 (_:^a, b:^b) = ((^a or ^b) : (static member Item4: _ -> _) b)
        let inline call (a:'a, b:'b) = call_2 (a, b)
        call (Unchecked.defaultof<Item4> , value)

[<Extension;Sealed>]
type Item5 =
    [<Extension>]static member Item5 ((_, _, _, _, e)) = e

    static member inline Invoke value = 
        let inline call_2 (_:^a, b:^b) = ((^a or ^b) : (static member Item5: _ -> _) b)
        let inline call (a:'a, b:'b) = call_2 (a, b)
        call (Unchecked.defaultof<Item5> , value)


type MapItem1 =   
    static member MapItem1 ((a, b, c, d, e)         , fn) = (fn a, b, c, d, e)
    static member MapItem1 ((a, b, c, d)            , fn) = (fn a, b, c, d)      
    static member MapItem1 ((a, b, c)               , fn) = (fn a, b, c)         
    static member MapItem1 ((a, b)                  , fn) = (fn a, b)

    static member inline Invoke f value = 
        let inline call_2 (_:^a, b:^b) = ((^a or ^b) : (static member MapItem1: _ * _ -> _) b, f)
        let inline call   (a:'a, b:'b) = call_2 (a, b)
        call (Unchecked.defaultof<MapItem1> , value)

[<Extension;Sealed>]
type MapItem2 =
{'fraction_non_alphanumeric': 0.16298811544991512, 'fraction_numerical': 0.01697792869269949, 'mean_word_length': 2.476394849785408, 'pattern_counts': {'":': 0, '<': 55, '<?xml version=': 0, '>': 67, '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': '5413657', 'n_tokens_mistral': 2357, 'n_tokens_neox': 2290, 'n_words': 707}