∀ {R : Type uR} {M : Type uM} [inst : CommRing R] [inst_1 : AddCommGroup M] [inst_2 : Module R M] [Module.Flat R M]
  [Module.Finite R M] (p : PrimeSpectrum R), Module.rankAtStalk M p = 0 ↔ p ∉ Module.support R M