declare CAdd = fun {$ X} fun {$ Y} X+Y end end {Browse {{CAdd 2} 3}} declare Add1 = {CAdd 1} {Browse {Add1 7}} {Browse {Add1 8}} {Browse {Add1 20}} Add2 = {CAdd 2} {Browse {Add2 8}}