QPQ-AG/sophia
10
0
Fork 0
Code Issues 41 Pull Requests 5 Actions Packages Projects Releases 16 Wiki Activity

Fix var

Browse Source
This commit is contained in:
radrow 2021-06-26 19:10:49 +02:00
parent b22eeffc3d
commit 2e6c01cb75
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
priv/stdlib/List.aes
View File

@ -80,7 +80,7 @@ namespace List =
* `b` only if `(b - a) mod step == 0`. `step` should be bigger than 0. * `b` only if `(b - a) mod step == 0`. `step` should be bigger than 0.
*/ */
function from_to_step(a : int, b : int, s : int) : list(int) = function from_to_step(a : int, b : int, s : int) : list(int) =
require(step > 0, "List.from_to_step: non-positive step") require(s > 0, "List.from_to_step: non-positive step")
from_to_step_(a, b - (b-a) mod s, s, []) from_to_step_(a, b - (b-a) mod s, s, [])
private function from_to_step_(a : int, b : int, s : int, acc : list(int)) : list(int) = private function from_to_step_(a : int, b : int, s : int, acc : list(int)) : list(int) =
if(b < a) acc if(b < a) acc