1. # 5. Reproducibility with the same seed
  2. my $new_out = run «raku -Ilib -e 'use Noise::Simplex; say Noise::Simplex::Simplex.new(seed => 12345).build-permutation-table.join(",")'», :out;
  3. my @new_perm = $new_out.out.slurp.trim.split(',');
  4. my $new_out2 = run «raku -Ilib -e 'use Noise::Simplex; say Noise::Simplex::Simplex.new(seed => 12345).build-permutation-table.join(",")'», :out;
  5. my @new_perm2 = $new_out2.out.slurp.trim.split(',');
  6. is-deeply @new_perm, @new_perm2, 'Same seed gives same permutation';