anchor.diff:                          stmt.reset()
                           let keep = check_phrase doc
                           if keep then
  +                            printfn "weights for this doc: %A" w
                               yield doc // TODO the score too
                   }
               let killFunc() =
  
positive.code:                         else has
                  ) terms
  
              let docids = 
                  found
                  |> Array.collect (fun (term,entries) ->
                      let neg = 
                          match term with
                          | plan.Word (neg,_) -> neg
  
negative.code:                 // last byte of mantissa is 2*x
                  // previous bytes are 2*x+1
  
                  //printfn "mantissa: %A" a
                  //printfn "e: %d" e
  
                  // we have an array of centimal digits here, all of
                  // which appear to the right of the decimal point.
  