let I be set ; :: thesis: for i being object holds (EmptyMS I) . i = {}
let i be object ; :: thesis: (EmptyMS I) . i = {}
per cases ( i in I or not i in I ) ;
end;