theorem
  MemberFunc (X, A).x in [. 0, 1 .]
proof
  0 <= MemberFunc (X, A).x & MemberFunc (X, A).x <= 1 by Th38;
  hence thesis by XXREAL_1:1;
end;
