anchor.diff:          |] |> Array.unzip3 |> fun (i, lc, lf) -> dsharp.stack(i), dsharp.stack(lc), dsharp.stack(lf)
   
       let data, _, targetFine =
  -        Directory.CreateDirectory(path) |> ignore
           if not (File.Exists(file)) then download url file
           if not (Directory.Exists(pathExtracted)) then extractTarGz file path
           if train then loadCIFAR100 (Path.Combine(pathExtracted, "train.bin")) 50000
  
positive.code: module DataUtil =
      /// Synchronously downloads the given URL to the given local file.
      let download (url:string) (localFileName:string) =
          let wc = new WebClient()
          printfn "Downloading %A to %A" url localFileName
          wc.DownloadFile(url, localFileName)
          wc.Dispose()
  
      let extractTarStream (stream:Stream) (outputDir:string) =
          let buffer:byte[] = Array.zeroCreate 100
  
negative.code:         |] |> Array.unzip |> fun (i, l) -> dsharp.stack(i), dsharp.stack(l)
  
      let data, target =
          if not (File.Exists(file)) then download url file
          if not (Directory.Exists(pathExtracted)) then extractTarGz file path
          let files = [|"data_batch_1.bin"; "data_batch_2.bin"; "data_batch_3.bin"; "data_batch_4.bin"; "data_batch_5.bin"; "test_batch.bin"|] |> Array.map (fun f -> Path.Combine(pathExtracted, f))
  