anchor.diff:              |> mergeFinePolynomial (mergeResolution)
               |> (normF minProb)
               |> powerToMw charge
  +
  
positive.code: 
          // Implementation according to BRAIN - algortihm
          /// Generates the distribution of the isotopic abundancy
          let ofFormula (limit:int) (fml:Formula) =
              let calcP0 (fml:Formula) = 
                  fml 
  
negative.code:         let normalizeByProbSum minProb (pols: Polynomial list) = 
              let sum = 
                  pols
                  |> List.filter (fun x -> x.Probability > minProb)
                  |> List.sumBy (fun x -> x.Probability)
              pols 
              |> List.map (fun x -> {x with Probability = x.Probability/sum})
  