|> List.filter (fun i -> i % 5 = 0 || i % 3 = 0)
printfn "%d" (finnMultiplier 10)
let runTests (testCases) =
printfn "Running tests..."
printfn "Got %i test cases" (Seq.length testCases)
let checkTest (n, expected) =
let multiplier = finnMultiplier n
let passed = expected = multiplier
printfn "[ %-5b ] finnMultipler %-3i = %-4i (result was %i)" passed n expected multiplier
Seq.iter checkTest testCases