type cutie=record
x,y,z:1..3500;
end;

 tablou=array[1..3500] of cutie;
var    f,g:text; t:1..100;i,j,k:1..3500;n:1..3500;aux:cutie;a:tablou; l:array[1..3500] of integer; ok:boolean;
max,min:integer;

begin
assign(f,'cutii.in');
assign(g,'cutii.out');
reset(f); rewrite(g);
readln(f,n,t);
for i:=1 to t do begin

for j:=1 to n do readln(f, a[j].x, a[j].y, a[j].z);
for k:=1 to n-1 do begin
min:=k;
for j:=k+1 to n do if a[j].x<a[min].x then min:=j;
aux:=a[min]; a[min]:=a[k]; a[k]:=aux;


      end;
l[n]:=1;
for k:=n-1 downto 1 do
begin
l[k]:=1;
for j:=1+k to n do
if (a[k].x< a[j].x) and (a[k].y<a[j].y) and (a[k].z<a[j].z) and (l[k]<1+l[j]) then

l[k]:=1+l[j];
end;
max:=l[1];
for k:=2 to n do
if max<l[k] then max:=l[k];
writeln(g, max);    end;
close(f);
close(g);
end.