fs-draft.git

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
<?php
/**
 */
function list_group($list, $collation = null)
    {
        if ($collation == null)
            {
                $collation = (function ($x, $y) {return ($x == $y);});
            }
        $groups = [];
        foreach ($list as $element)
            {
                $found = false;
                $group = null;
                foreach ($groups as $group_)
                    {
                        if ($collation($group_[0], $element))
                            {
                                $group = $group_;
                                $found = true;
                                break;
                            }
                    }
                if (! $found)
                    {
                        $group = [];
                    }
                array_push($group, $element);
                if (! $found)
                    {
                        array_push($groups, $group);
                    }
            }
        return $groups;
    }
/**
 */
function list_clean($list, $collation = null)
    {
        return (
            array_map
                (
                    function ($group) {return $group[0];},
                    list_group($list, $collation)
                )
        );
    }
 
 
הההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההה
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX