theorem
  ((ast C)term(a,t))at f = (ast C)term(a at f,t at f) by Def60;
