summaryrefslogtreecommitdiff
path: root/stdlib/math.pcdt
blob: 3f375aedb16d5de20456bf5416936dfaf40b054c (plain)
1
2
3
4
5
6
7
8
9
10
store(
	ref((
		store(0, "last")
		if(not(eq(arg0, 1))
			update(multiply(sub(arg0, 1), arg1), "last")
		)
		sum(arg1, last)
	))
	"multiply"
)