theorem
  s^\0 =s
proof
  now
    let n be Element of NAT;
    thus (s ^\0).n=s.(n+0) by Def2
      .=s.n;
  end;
  hence thesis by FUNCT_2:63;
end;
