The Remove(selector, tab) command is similar to the remove function. The boolean valued function selector is called on each element in tab. A copy of tab is returned with the elements for which selector returns true removed.

The selector parameter is a procedure that accepts two arguments.  The first argument is the encoded name (see EncodeName) of the procedure and the second argument is the rtable containing the profiling data.

$\mathrm{with}\left(\mathrm{CodeTools}\left[\mathrm{Profiling}\right]\right)\:$

selector := proc(n,t)
    # check the total number of function calls
    if (t[1][1] > 5) then
        return true;
    else
    return false;
    end if;
end proc;

$\mathrm{selector}≔\mathbf{proc}\left(n\&comma;t\right)\mathbf{if}5<t\&lsqb;1\&rsqb;\&lsqb;1\&rsqb;\mathbf{then}\mathbf{return}\mathrm{true}\mathbf{else}\mathbf{return}\mathrm{false}\mathbf{end\; if}\mathbf{end\; proc}$

a := proc( )
    return 1;
end proc;

$a≔\mathbf{proc}\left(\right)\mathbf{return}1\mathbf{end\; proc}$

b := proc( )
    local i;
    for i from 1 to 10 do
        a();
    end do;
end proc;

$b≔\mathbf{proc}\left(\right)\mathbf{local}i\&semi;\mathbf{for}i\mathbf{to}10\mathbf{do}a\left(\right)\mathbf{end\; do}\mathbf{end\; proc}$

$t≔\mathrm{Build}\left(\mathrm{procs}=\left[a\&comma;b\right]\&comma;\mathrm{commands}='b\left(\right)'\right)$

$t≔table\left(\left[\mathrm{\_Inert\_ASSIGNEDNAME}\left(''b''\&comma;''PROC''\right)=\left[\begin{array}{ccc}1& 0& 0\\ 1& 0& 0\\ 10& 0& 0\end{array}\right]\&comma;\mathrm{\_Inert\_ASSIGNEDNAME}\left(''a''\&comma;''PROC''\right)=\left[\begin{array}{ccc}10& 0& 0\\ 10& 0& 0\end{array}\right]\right]\right)$

$\mathrm{PrintProfiles}\left(t\right)$

a
a := proc()
     |Calls Seconds  Words|
PROC |   10   0.000      0|
   1 |   10   0.000      0| return 1
end proc

b
b := proc()
local i;
     |Calls Seconds  Words|
PROC |    1   0.000      0|
   1 |    1   0.000      0| for i to 10 do
   2 |   10   0.000      0|     a()
                            end do
end proc

$s≔\mathrm{Remove}\left(\mathrm{selector}\&comma;t\right)$

$s≔table\left(\left[\mathrm{\_Inert\_ASSIGNEDNAME}\left(''b''\&comma;''PROC''\right)=\left[\begin{array}{ccc}1& 0& 0\\ 1& 0& 0\\ 10& 0& 0\end{array}\right]\right]\right)$

$\mathrm{PrintProfiles}\left(s\right)$

b
b := proc()
local i;
     |Calls Seconds  Words|
PROC |    1   0.000      0|
   1 |    1   0.000      0| for i to 10 do
   2 |   10   0.000      0|     a()
                            end do
end proc