theorem
  x in dom criticals g implies x c= (criticals g).x by ORDINAL4:10;
