law among_hi

minebender-game@1.0.0.0 · proof_solver.bend:280

import Base
import minebender-game@1.0.0.0/types.bend as T
import minebender-game@1.0.0.0/proof_cells.bend as PS
import minebender-game@1.0.0.0/proof_sums.bend as PU

280law among_hi:
281  for +w: Nat
282  for +h: Nat
283  for +part: T.Grid(Maybe<&2, Bool>)
284  for +layout: T.Grid(Bool)
285  for +comp: {completes(w, h, part, layout) == True{} : Bool}
286  for +ps: List<&2, T.Pos>
287  for +ons: {PS.allp(~PS.WH, ~PS.onb, PS.WH{w, h}, ps) == True{} : Bool}
288  {Nat.is_le(PU.csum(~Bool, ~one, False{}, layout, ps),
289    Nat.add(PU.csum(~Maybe<&2, Bool>, ~tf, None{}, part, ps), PU.csum(~Maybe<&2, Bool>, ~nf, None{}, part, ps))) == True{} : Bool}