:$ f(l...)
	~ l!len
		:a = 0
		~ a := l(1)
		~ l!remove(1)
		@a + f(l=l)
	~~
		@0

{f(1,2,3,4,5)}