open System
[<EntryPoint>]
let main argv =
    printf "%A\n" (List.filter (fun x -> x % 3 <> 0) [1..7])
    0