Let x0 of type ι be given.
Let x1 of type ι be given.
Apply CRing_with_id_omega_exp_S with
x0,
x1,
0,
λ x2 x3 . x3 = x1 leaving 3 subgoals.
The subproof is completed by applying H0.
Apply nat_p_omega with
0.
The subproof is completed by applying nat_0.
Apply CRing_with_id_omega_exp_0 with
x0,
x1,
λ x2 x3 . field2b x0 x1 x3 = x1 leaving 2 subgoals.
The subproof is completed by applying H0.
Apply CRing_with_id_mult_com with
x0,
x1,
field4 x0,
λ x2 x3 . x3 = x1 leaving 4 subgoals.
The subproof is completed by applying H0.
The subproof is completed by applying H1.
Apply CRing_with_id_one_In with
x0.
The subproof is completed by applying H0.
Apply CRing_with_id_one_L with
x0,
x1 leaving 2 subgoals.
The subproof is completed by applying H0.
The subproof is completed by applying H1.