reserve a,b,c,v,v1,x,y for object;
reserve V,A for set;
reserve d for TypeSCNominativeData of V,A;
reserve p,q,r for SCPartialNominativePredicate of V,A;
reserve n for Nat;
reserve X for Function;
reserve f,g,h for SCBinominativeFunction of V,A;

theorem
  a in V & d in dom f implies
  NDentry(<*f*>,<*a*>,d) is NonatomicND of V,A
  proof
    assume a in V & d in dom f;
    then NDentry(<*f*>,<*a*>,d) = naming(V,A,a,f.d) by Th26;
    hence thesis;
  end;
