theorem Th1:
  Card ff = ff
proof
  now
    let x;
    assume x in dom ff;
    then reconsider M = ff.x as Cardinal by Def1;
    card M = M;
    hence ff.x = card (ff.x);
  end;
  hence thesis by Def2;
end;
