COBOL → brikc lift → PCD Blueprint → brikc build → Rust / JS / Python / Go / C

PROCEDURE DIVISION.
    COMPUTE INTEREST = PRINCIPAL * RATE / 100.
    IF INTEREST > MAX-INTEREST
        MOVE MAX-INTEREST TO INTEREST
    END-IF.
    COMPUTE TOTAL = PRINCIPAL + INTEREST.

circuit interest_calc {
    domain principal: Range [0, 1000000];
    domain rate: Range [0, 30];
    domain max_interest: Range [0, 100000];

    let interest = MUL8(principal, DIV8(rate, 100));
    let capped = CLAMP(interest, 0, max_interest);
    let total = ADD8(principal, capped);
    OUTPUT total;
}