let fileInfo = FileInfo(file)
let getFolderInfo folder =
let files = folder |> Directory.EnumerateFiles
let filesSize = files |> getFilesSize
|> Directory.EnumerateDirectories
|> Seq.iter (fun (folder, _, filesSize) -> printfn "%s - %i" folder filesSize)