anchor.diff:  
   *)
   
  -let mouse = EbiAPI.UniProteinDB.getProteinSeqFeature "Q64446"
  -let rat = EbiAPI.UniProteinDB.getProteinSeqFeature "Q64535"
  -let human = EbiAPI.UniProteinDB.getProteinSeqFeature "P35670"
  -let sheep = EbiAPI.UniProteinDB.getProteinSeqFeature "Q9XT50"
  +let mouse = EbiAPI.UniProteinDB.getProteinSeqFeature "Q64446" |> Async.RunSynchronously
  +let rat = EbiAPI.UniProteinDB.getProteinSeqFeature "Q64535"   |> Async.RunSynchronously
  +let human = EbiAPI.UniProteinDB.getProteinSeqFeature "P35670" |> Async.RunSynchronously
  +let sheep = EbiAPI.UniProteinDB.getProteinSeqFeature "Q9XT50" |> Async.RunSynchronously
  +
  +(***include-value:mouse***)
   
   (**
   What we want to do now is getting an measure of phylogenetic relationship. We will do this by aligning the peptide-sequences with each other. For this we prepare the data and the alignment function.
  
positive.code: #I @"../../bin/BioFSharp.Parallel/net47/"
  #I @"../../bin/BioFSharp.Stats/net47/"
  #I @"../../bin/BioFSharp.Vis/net47/"
  #r @"../../packages/formatting/FSharp.Plotly/lib/netstandard2.0/FSharp.Plotly.dll"
  #r "BioFSharp.dll"
  #r "FSharpAux.dll"
  #r "BioFSharp.IO.dll"
  #r "BioFSharp.BioDB.dll"
  #r "SwaggerProvider.Runtime.dll"
  
  open BioFSharp.BioDB
  open FSharp.Plotly
  
negative.code: (**
  Now let's see what we get. The colored areas depict the cell membrane. The line graph represents the amino acids of the protein with their given hydrophobicity.
  *)
  let shapes = 
      Chart.Line ((Array.indexed hydrophobicityArr),Color = Colors.toHex false Colors.Table.Office.blue)
      |> Chart.withShapes(mouseLocInfo |> Seq.indexed |> Seq.choose createBackgroundShape)
      |> Chart.withX_AxisStyle("Sequenceindex")
      |> Chart.withY_AxisStyle("Hydrophobicity")
  
  (*** include-value:shapes ***)
  
  (**
  As you can see the hydrophobic areas overlap with the membrane areas.
  