anchor.diff:  open FSharpAux
   open ModificationInfo
   open System
  +
  +//Remarks via https://en.wikipedia.org/wiki/Proteinogenic_amino_acid
  +
   ///Contains the AminoAcid type and its according functions. The AminoAcid type is a complex presentation of amino acids, allowing modifications
   module AminoAcids =
   
  
positive.code:     [<StructuralEquality;StructuralComparison>]
      type AminoAcid =
          /// 'A' - Ala - Alanine
          | Ala        
          /// 'C' - Cys - Cysteine
          | Cys
          /// 'D' - Asp - Aspartic Acid
          | Asp
          /// 'E' - Glu - Glutamic Acid
          | Glu 
          /// 'F' - Phe - Phenylalanine
          | Phe
          /// 'G' - Gly - Glycine
          | Gly
          /// 'H' - His - Histidine
          | His
          /// 'I' - Ile - Isoleucine
          | Ile
          /// 'K' - Lys - Lysine
          | Lys
          /// 'L' - Leu - Leucine
          | Leu
          /// 'M' - Met - Methionine
          | Met
          /// 'N' - Asn - Asparagine
          | Asn
          /// 'O' - Pyl - Pyrrolysine
          | Pyl
          /// 'P' - Pro - Proline
          | Pro        
          /// 'Q' - Gln - Glutamine
          | Gln
          /// 'R' - Arg - Arginine
          | Arg
          /// 'S' - Ser - *Serine
          | Ser        
          /// 'T' - Thr - Threonine
          | Thr
          /// 'U' - Sel - Selenocysteine
          ///
          /// Warning: 'Sel' is not the official UPAC abbreviation. 
          /// This case will be removed in favor of 'Sec' in the next major release
          | [<Obsolete("This case has a typo and will be removed in the next major release. use AminoAcid.Sec instead.")>] Sel 
          /// 'U' - Sec - Selenocysteine
          | Sec
          /// 'V' - Val - Valine
          | Val
          /// 'W' - Trp - Tryptophan
          | Trp
          /// 'Y' - Tyr - Tyrosine
          | Tyr
  
          /// 'X' - Xaa - Unspecified 
  
negative.code:     let isNegCharged (aa:AminoAcid) =
          AminoAcidSetNegCharged.Contains aa 
  
      [<Obsolete("use isPolarUncharged instead")>]
      /// Returns true, if the AminoAcid has a polar side chain
      let isPolar (aa:AminoAcid) = 
          AminoAcidSetPolar.Contains aa    
          
      /// Returns true, if the AminoAcid has a polar, uncharged side chain
      let isPolarUncharged (aa:AminoAcid) = 
          aminoAcidSetPolarUncharged.Contains aa
  
      /// Returns true, if the AminoAcid has a hydrophobic side chain
      let isHydrophobic (aa:AminoAcid) = 
  