Walms

type FizzBuzzer = int -> string

module FizzBuzzer =
    
    type ValidFizzBuzzer = private ValidFizzBuzzer of FizzBuzzer
    
    let createFizzBuzzer (possibleFizzBuzzer: FizzBuzzer) : Result<ValidFizzBuzzer, string> =
        if possibleFizzBuzzer 3  = "Fizz" then
            Ok (ValidFizzBuzzer possibleFizzBuzzer)
        else