deffunc H1( Element of NAT , Element of NAT ) -> Element of COMPLEX = (((Coef $1) . $2) * (z #N $2)) * (w #N ($1 -' $2));
for n being Element of NAT ex seq being Complex_Sequence st
for k being Element of NAT holds
( ( k <= n implies seq . k = H1(n,k) ) & ( k > n implies seq . k = 0 ) ) from SIN_COS:sch 1();
hence ex b1 being Complex_Sequence st
for k being Element of NAT holds
( ( k <= n implies b1 . k = (((Coef n) . k) * (z |^ k)) * (w |^ (n -' k)) ) & ( n < k implies b1 . k = 0 ) ) ; :: thesis: verum