unison/unison-src/transcripts/fix2693.md
2024-06-25 11:11:07 -07:00

298 B

scratch/main> builtins.merge
loop : List Nat -> Nat -> List Nat
loop l = cases
  0 -> l
  n -> loop (n +: l) (drop n 1)

range : Nat -> List Nat
range = loop []
scratch/main> add
> range 2000

Should be cached:

> range 2000