From a3af974ab4e079f9000c4c34cd5ff468986ca609 Mon Sep 17 00:00:00 2001 From: Kai Stevenson Date: Tue, 28 Feb 2023 22:16:22 -0800 Subject: changed syntax to be a little more normal --- stdlib/math.pcdt | 18 ++++++++---------- 1 file changed, 8 insertions(+), 10 deletions(-) (limited to 'stdlib') diff --git a/stdlib/math.pcdt b/stdlib/math.pcdt index e4b0fe0..3f375ae 100644 --- a/stdlib/math.pcdt +++ b/stdlib/math.pcdt @@ -1,12 +1,10 @@ store( - ref(( - store(0; last;) - if(not(eq(arg0() 1;)) - ( - update(multiply(sub(arg0() 1;) arg1()) last;) - ) - ) - sum(arg1() last()) - )) - multiply; + ref(( + store(0, "last") + if(not(eq(arg0, 1)) + update(multiply(sub(arg0, 1), arg1), "last") + ) + sum(arg1, last) + )) + "multiply" ) -- cgit v1.3.1