anchor.diff:  ﻿
  +open System.IO;
  +open System.Text.RegularExpressions;
  +
   /// Matrix Transpose.
   let transpose xss =
    let rec f xss acc =
  
positive.code:  TargetOutputs = List.replicate outputSize 0.0
  }
  
  let training_samples = [| |]
  let teaching_inputs = [| |]
  let testing_samples = [| |]
  let teaching_samples_inputs = [| |]
  
  let epoch = 1000
  
  let trained =
   train
    epoch network
    ((Array.toList training_samples), (Array.toList teaching_inputs))
    ((Array.toList testing_samples), (Array.toList teaching_samples_inputs))
  
  (* val trained : Network = //Error: (Training: 0.016551, Test: 0.017999)
    {LearningRate = 0.001;
  
negative.code:   let training_index = [0..(training_samples.Length - 1)]
    let training_rand_index = shuffleList training_index.Length rand training_index
    let shuffled_training_s = dataAtIndex training_samples training_rand_index
    let shuffled_training_i = dataAtIndex teachingInputs training_rand_index
  
    let testing_index = [0..(testing_samples.Length - 1)]
    let testing_rand_index = shuffleList testing_index.Length rand testing_index
    let shuffled_testing_s = dataAtIndex testing_samples testing_rand_index
    let shuffled_testing_i = dataAtIndex testOutputs testing_rand_index
  
    let trained = List.fold2 (funcNet trainOnce) netAcc shuffled_training_s shuffled_training_i
    let rms_trained_err = networkDistance trained
  