deffunc H1( Element of TOL X) -> Element of MapsT X = id$ $1;
thus ex f being Function of (TOL X),(MapsT X) st
for x being Element of TOL X holds f . x = H1(x) from FUNCT_2:sch 4(); :: thesis: verum