procedure main() sumElems([5,1,4,2,3]) end procedure sumElems(L) if *L = 0 then return 0 else return L[1] + sumElems(L[2:0]) end