theorem lembas1: :: FIELD_6:60
for F being Field
for E being FieldExtension of F
for a being b1 -algebraic Element of E
for p being Polynomial of F holds Ext_eval (p,a) in Lin (Base a)