theorem
Hex.GraphIso.Nauty.mem_cells_succ_congr
{ptn : Array Nat}
{level nn : Nat}
(hnn : nn ≤ ptn.size)
(hend : ptn[ptn.size - 1]! ≤ level)
(hvals : ∀ (q : Nat), q < ptn.size → ptn[q]! ≤ level ∨ level + 1 < ptn[q]!)
{c e : Nat}
:
Cell membership agrees between adjacent levels when no entry sits at the intermediate value.