anchor.diff:              Some [ 2I; 3I; 5I; 7I; 11I; 13I; 17I; 19I; 23I ]
           | _ -> None
   
  +    // todo: document what is s
       let m = num - 1I
       let calcS m =
           let rec inner s (n : bigint) =
  
positive.code:     let s = calcS m
      let d = m / bigint.Pow(2I, s)
  
      let result =
          match bases with
          | Some b ->
  
negative.code:         tryPow 1
  
  let checkBases num =
      // todo: change into array only
      let bases =
          match num with
          | prim when prim < 1373653I ->
  