contract ColBcom =
    entrypoint compute(x : int) : int =
        /* résultat */ x + 1