calcRPN