tabcmp_str(tab1, tab2)
{
local i = 0;
loop
if (strcmp([tab1 + i], [tab2 + i]) | [tab1 + i] == 0)
return ([tab1 + i] - [tab2 + i]);
i++;
}
tabcmp_num(tab1, tab2, size)
if (size == 0)
return (0);
if (i == size & [tab1 + i] == [tab2 + i])