theorem
  REAL 0 = {0.TOP-REAL 0}
proof
  thus REAL 0 = { <*>REAL } by FINSEQ_2:94
    .= {0.TOP-REAL 0};
end;
