def tput_keeps

minebender-game@1.0.0.0 · proof_solver.bend:1916

import Base
import minebender-game@1.0.0.0/types.bend as T
import minebender-game@1.0.0.0/board.bend as B
import minebender-game@1.0.0.0/solver.bend as S
import minebender-game@1.0.0.0/proof_cells.bend as PS

1916def tput_keeps(+b: Bool, +t: S.Todo, +rest: List<&2, S.Todo>, +q: T.Pos, m: {tcontains(rest, q) == True{} : Bool}) ->
1917  {tcontains(List.filter.put(S.Todo, t, rest, b), q) == True{} : Bool}:
1918  match b:
1919    case False{}:
1920      m
1921    case True{}:
1922      match t:
1923        case S.Todo{c, rel}:
1924          %Equal.sym(Bool, tcontains(rest, q), True{}, m) : {Bool.or(B.same(c, q), _) == True{} : Bool}
1925          PS.or_true_r(B.same(c, q))