AlgoPult calc: ok