File size: 695 Bytes
75e8855
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
/* alp-carry — carry-chain proof kernel
 * Copyright (C) 2026 Ahmad Ali Parr
 * SPDX-License-Identifier: AGPL-3.0-only
 */

/* Portable atomized solver — golden model for the verification obligation. */
#include "generated_constraints.h"

void atomic_solver_ref(const float *restrict neural,
                       float *restrict refined,
                       size_t dims)
{
    for (size_t i = 0; i < dims; i++) {
        float v = neural[i];
        float c = v < ALP_LO[i] ? ALP_LO[i] : (v > ALP_HI[i] ? ALP_HI[i] : v);
        float loe = v - ALP_EPS;
        float hie = v + ALP_EPS;
        float p = c < loe ? loe : c;
        if (p > hie) p = hie;
        refined[i] = p;
    }
}