def adaptive_search.result

bend-edit-distance@0.2.2.0 · src/Myers.bend:398

import Base

398def adaptive_search.result(search: Search, blocks: Nat, columns: Nat, +attempts: Nat,
399                           retry: Nat -> Nat -> Search) -> Search:
400  match search:
401    case Search{distance, work, consumed, _}:
402      +next_blocks = Nat.add(blocks, work)
403      +next_columns = Nat.add(columns, consumed)
404      adaptive_search.step(distance, next_blocks, next_columns, 1n+attempts,
405        _ => retry(next_blocks, next_columns))