vyre-conform 0.1.0

use crate::proof::algebra::checker::support::{
    boundary_grid_u32, call_binary, engine_failure_violation, simple_rng, violation,
    ZERO_PRODUCT_COUNTEREXAMPLES,
};
use crate::spec::law::{AlgebraicLaw, LawViolation};
use super::witnessed::*;

fn check_absorbing_exhaustive(
    op_id: &str,
    f: fn(&[u8]) -> Vec<u8>,
    z: u32,
) -> Result<(u64, Option<LawViolation>), LawViolation> {
    let mut cases = 0u64;
    for a in 0u32..256 {
        cases += 2;
        let az = call_binary(f, a, z).map_err(|e| engine_failure_violation(op_id, e))?;
        if az != z {
            return Ok((
                cases,
                Some(violation(op_id, "absorbing(right)", a, z, 0, az, z)),
            ));
        }
        let za = call_binary(f, z, a).map_err(|e| engine_failure_violation(op_id, e))?;
        if za != z {
            return Ok((
                cases,
                Some(violation(op_id, "absorbing(left)", z, a, 0, za, z)),
            ));
        }
    }
    Ok((cases, None))
}