let sum (result, i : int * int) : int = result + i