theorem
  Functors([:A,B:],C) ~= Functors(A,Functors(B,C))
proof
  take export(A,B,C);
  thus thesis;
end;
