Insertion Sort

# Insertion Sort

Zerethon Official Sample `insertion-sort`, version 1.1.0, PHP 8.4.

- `insertion_sort.php` — the algorithm, as shown in Zerethon Tools
- `main.php` — entry file: a short demonstration
- `test_insertion_sort.php` — checks; set it as the entry file to run them

This project is your own copy. Changing it never changes the official sample.
See the algorithm animated: https://tools.zerethon.com/insertion-sort-visualizer

<?php

// Insertion Sort (Zerethon Official Sample: insertion-sort 1.1.0).
// The algorithm as shown in Zerethon Tools.

function insertion_sort(array $a): array {
    for ($i = 1; $i < count($a); $i++) {
        $key = $a[$i];
        $j = $i - 1;
        while ($j >= 0 && $a[$j] > $key) {
            $a[$j + 1] = $a[$j];
            $j--;
        }
        $a[$j + 1] = $key;
    }
    return $a;
}

<?php

require __DIR__ . '/insertion_sort.php';

$a = [38, 27, 43, 3, 9, 82, 10, 27];
echo 'Before: [' . implode(', ', $a) . "]\n";
$result = insertion_sort($a);
echo 'After:  [' . implode(', ', $result) . "]\n";
$expected = $a;
sort($expected);
echo 'Same as sort(): ' . ($result === $expected ? 'true' : 'false') . "\n";

<?php

// Checks for insertion_sort. To run them, set this file as the entry file
// (the ▶ button next to it in Files) and press Run.

require __DIR__ . '/insertion_sort.php';

/** Deterministic pseudo-random integers in [-50, 49] (the same as the Python checks). */
function numbers(int $seed, int $count): array
{
    $out = [];
    for ($i = 0; $i < $count; $i++) {
        $seed = ($seed * 1103515245 + 12345) % 2 ** 31;
        $out[] = $seed % 100 - 50;
    }

    return $out;
}

$cases = [[], [1], [2, 1], [1, 2, 3], [3, 2, 1], [5, 1, 5, 1, 5], [-3, 0, -1, 2]];
foreach ([[1, 10], [2, 50], [3, 200]] as [$seed, $size]) {
    $cases[] = numbers($seed, $size);
}

foreach ($cases as $a) {
    $result = insertion_sort($a);
    $expected = $a;
    sort($expected);
    if ($result !== $expected) {
        fwrite(STDERR, 'insertion_sort([' . implode(', ', array_slice($a, 0, 6)) . "...]) is wrong\n");
        exit(1);
    }
}

echo 'All ' . count($cases) . " checks passed.\n";