
theorem e1a:
for F1,F2,L being Field
for E1 being FieldExtension of F1,
    K1 being E1-extending FieldExtension of F1
for h1 being Function of F1,L, h2 being Function of E1,L,
    h3 being Function of K1,L
st h2 is h1-extending & h3 is h2-extending holds h3 is h1-extending
proof
let F1,F2,L be Field,
    E1 be FieldExtension of F1, K1 be E1-extending FieldExtension of F1;
let h1 be Function of F1,L, h2 be Function of E1,L,
    h3 be Function of K1,L;
assume AS: h2 is h1-extending & h3 is h2-extending;
now let a be Element of F1;
  thus h3.a = h3.@(a,E1) by FIELD_7:def 4
           .= h2.@(a,E1) by AS
           .= h2.a by FIELD_7:def 4
           .= h1.a by AS;
  end;
hence thesis;
end;
