enraged.fs

// This is okay:
type Regex<'T> = 
    | Seq of Regex<'T> list
    | Alt of Regex<'T> list
    | Singleton of 'T

// This is okay:
type Regex<'T> = 
    private Seq of Regex<'T> list
    | Alt of Regex<'T> list
    | Singleton of 'T

// This is NOT OKAY:
type Regex<'T> = private
    | Seq of Regex<'T> list
    | Alt of Regex<'T> list
    | Singleton of 'T
    
// Settled on:

type Regex<'T> =
    private 
    | Seq of Regex<'T> list
    | Alt of Regex<'T> list
    | Singleton of 'T