refactor list computation expression using CPS