Current library: Alpha v34, 4,223 checked-use theorems; Stable remains 432. Historical first admissions, original proof editions, and non-admitted aliases are preserved.
Exact expanded first-order arithmetic statement
forall p gb gc G hb hc H. (~((p) = 1) /\ forall pfa_factor_left_associates_prime pfa_factor_right_associates_prime. (p) = pfa_factor_left_associates_prime * pfa_factor_right_associates_prime -> pfa_factor_left_associates_prime = 1 \/ pfa_factor_right_associates_prime = 1) -> (((~((G) = 0)) /\ (((forall fom_index_pfp_associates_Gcoefficients. (exists fom_gap_pfp_associates_Gcoefficients_index_bound. fom_gap_pfp_associates_Gcoefficients_index_bound + S (fom_index_pfp_associates_Gcoefficients) = G) -> exists fom_value_pfp_associates_Gcoefficients. ((((exists fom_beta_height_pfp_associates_Gcoefficients_entry. fom_beta_height_pfp_associates_Gcoefficients_entry + S (fom_value_pfp_associates_Gcoefficients) = S ((S (fom_index_pfp_associates_Gcoefficients)) * gc)) /\ exists fom_beta_quotient_pfp_associates_Gcoefficients_entry. gb = fom_beta_quotient_pfp_associates_Gcoefficients_entry * S ((S (fom_index_pfp_associates_Gcoefficients)) * gc) + (fom_value_pfp_associates_Gcoefficients))) /\ (exists fom_gap_pfp_associates_Gcoefficients_value_bound. fom_gap_pfp_associates_Gcoefficients_value_bound + S (fom_value_pfp_associates_Gcoefficients) = p))) /\ ((((exists ff_h_pfp_associates_Gleading. ff_h_pfp_associates_Gleading + S (1) = S ((S (0)) * gc)) /\ exists ff_q_pfp_associates_Gleading. gb = ff_q_pfp_associates_Gleading * S ((S (0)) * gc) + (1)))))))) -> (((~((H) = 0)) /\ (((forall fom_index_pfp_associates_Hcoefficients. (exists fom_gap_pfp_associates_Hcoefficients_index_bound. fom_gap_pfp_associates_Hcoefficients_index_bound + S (fom_index_pfp_associates_Hcoefficients) = H) -> exists fom_value_pfp_associates_Hcoefficients. ((((exists fom_beta_height_pfp_associates_Hcoefficients_entry. fom_beta_height_pfp_associates_Hcoefficients_entry + S (fom_value_pfp_associates_Hcoefficients) = S ((S (fom_index_pfp_associates_Hcoefficients)) * hc)) /\ exists fom_beta_quotient_pfp_associates_Hcoefficients_entry. hb = fom_beta_quotient_pfp_associates_Hcoefficients_entry * S ((S (fom_index_pfp_associates_Hcoefficients)) * hc) + (fom_value_pfp_associates_Hcoefficients))) /\ (exists fom_gap_pfp_associates_Hcoefficients_value_bound. fom_gap_pfp_associates_Hcoefficients_value_bound + S (fom_value_pfp_associates_Hcoefficients) = p))) /\ ((((exists ff_h_pfp_associates_Hleading. ff_h_pfp_associates_Hleading + S (1) = S ((S (0)) * hc)) /\ exists ff_q_pfp_associates_Hleading. hb = ff_q_pfp_associates_Hleading * S ((S (0)) * hc) + (1)))))))) -> (((forall fom_index_pfp_associates_GH_canonical. (exists fom_gap_pfp_associates_GH_canonical_index_bound. fom_gap_pfp_associates_GH_canonical_index_bound + S (fom_index_pfp_associates_GH_canonical) = H) -> exists fom_value_pfp_associates_GH_canonical. ((((exists fom_beta_height_pfp_associates_GH_canonical_entry. fom_beta_height_pfp_associates_GH_canonical_entry + S (fom_value_pfp_associates_GH_canonical) = S ((S (fom_index_pfp_associates_GH_canonical)) * hc)) /\ exists fom_beta_quotient_pfp_associates_GH_canonical_entry. hb = fom_beta_quotient_pfp_associates_GH_canonical_entry * S ((S (fom_index_pfp_associates_GH_canonical)) * hc) + (fom_value_pfp_associates_GH_canonical))) /\ (exists fom_gap_pfp_associates_GH_canonical_value_bound. fom_gap_pfp_associates_GH_canonical_value_bound + S (fom_value_pfp_associates_GH_canonical) = p))) /\ ((exists pfgu_qb_associates_GH pfgu_qc_associates_GH pfgu_Q_associates_GH pfgu_pb_associates_GH pfgu_pc_associates_GH pfgu_P_associates_GH. ((((forall fom_index_pfp_associates_GH_productleft. (exists fom_gap_pfp_associates_GH_productleft_index_bound. fom_gap_pfp_associates_GH_productleft_index_bound + S (fom_index_pfp_associates_GH_productleft) = pfgu_Q_associates_GH) -> exists fom_value_pfp_associates_GH_productleft. ((((exists fom_beta_height_pfp_associates_GH_productleft_entry. fom_beta_height_pfp_associates_GH_productleft_entry + S (fom_value_pfp_associates_GH_productleft) = S ((S (fom_index_pfp_associates_GH_productleft)) * pfgu_qc_associates_GH)) /\ exists fom_beta_quotient_pfp_associates_GH_productleft_entry. pfgu_qb_associates_GH = fom_beta_quotient_pfp_associates_GH_productleft_entry * S ((S (fom_index_pfp_associates_GH_productleft)) * pfgu_qc_associates_GH) + (fom_value_pfp_associates_GH_productleft))) /\ (exists fom_gap_pfp_associates_GH_productleft_value_bound. fom_gap_pfp_associates_GH_productleft_value_bound + S (fom_value_pfp_associates_GH_productleft) = p))) /\ (((forall fom_index_pfp_associates_GH_productright. (exists fom_gap_pfp_associates_GH_productright_index_bound. fom_gap_pfp_associates_GH_productright_index_bound + S (fom_index_pfp_associates_GH_productright) = G) -> exists fom_value_pfp_associates_GH_productright. ((((exists fom_beta_height_pfp_associates_GH_productright_entry. fom_beta_height_pfp_associates_GH_productright_entry + S (fom_value_pfp_associates_GH_productright) = S ((S (fom_index_pfp_associates_GH_productright)) * gc)) /\ exists fom_beta_quotient_pfp_associates_GH_productright_entry. gb = fom_beta_quotient_pfp_associates_GH_productright_entry * S ((S (fom_index_pfp_associates_GH_productright)) * gc) + (fom_value_pfp_associates_GH_productright))) /\ (exists fom_gap_pfp_associates_GH_productright_value_bound. fom_gap_pfp_associates_GH_productright_value_bound + S (fom_value_pfp_associates_GH_productright) = p))) /\ (((((((pfgu_Q_associates_GH)=0 \/ (G)=0) /\ (((pfgu_P_associates_GH)=0)))) \/ (((~((pfgu_Q_associates_GH)=0)) /\ (((~((G)=0)) /\ (((pfgu_Q_associates_GH)+(G)=S (pfgu_P_associates_GH)))))))) /\ ((forall pfc_index_associates_GH_productcoefficients. (exists pfa_gap_associates_GH_productcoefficientsbound. pfa_gap_associates_GH_productcoefficientsbound + S (pfc_index_associates_GH_productcoefficients) = (pfgu_P_associates_GH)) -> exists pfc_value_associates_GH_productcoefficients. ((((exists ff_h_pfp_associates_GH_productcoefficientsentry. ff_h_pfp_associates_GH_productcoefficientsentry + S (pfc_value_associates_GH_productcoefficients) = S ((S (pfc_index_associates_GH_productcoefficients)) * pfgu_pc_associates_GH)) /\ exists ff_q_pfp_associates_GH_productcoefficientsentry. pfgu_pb_associates_GH = ff_q_pfp_associates_GH_productcoefficientsentry * S ((S (pfc_index_associates_GH_productcoefficients)) * pfgu_pc_associates_GH) + (pfc_value_associates_GH_productcoefficients))) /\ ((exists pfc_terms_code_associates_GH_productcoefficientscoefficient pfc_terms_scale_associates_GH_productcoefficientscoefficient pfc_natural_sum_associates_GH_productcoefficientscoefficient. ((forall pfc_index_associates_GH_productcoefficientscoefficientdiagonal. (exists pfa_gap_associates_GH_productcoefficientscoefficientdiagonalbound. pfa_gap_associates_GH_productcoefficientscoefficientdiagonalbound + S (pfc_index_associates_GH_productcoefficientscoefficientdiagonal) = (S (pfc_index_associates_GH_productcoefficients))) -> exists pfc_value_associates_GH_productcoefficientscoefficientdiagonal. ((((exists ff_h_pfp_associates_GH_productcoefficientscoefficientdiagonalentry. ff_h_pfp_associates_GH_productcoefficientscoefficientdiagonalentry + S (pfc_value_associates_GH_productcoefficientscoefficientdiagonal) = S ((S (pfc_index_associates_GH_productcoefficientscoefficientdiagonal)) * pfc_terms_scale_associates_GH_productcoefficientscoefficient)) /\ exists ff_q_pfp_associates_GH_productcoefficientscoefficientdiagonalentry. pfc_terms_code_associates_GH_productcoefficientscoefficient = ff_q_pfp_associates_GH_productcoefficientscoefficientdiagonalentry * S ((S (pfc_index_associates_GH_productcoefficientscoefficientdiagonal)) * pfc_terms_scale_associates_GH_productcoefficientscoefficient) + (pfc_value_associates_GH_productcoefficientscoefficientdiagonal))) /\ ((exists pfc_complement_associates_GH_productcoefficientscoefficientdiagonalterm pfc_left_associates_GH_productcoefficientscoefficientdiagonalterm pfc_right_associates_GH_productcoefficientscoefficientdiagonalterm. (((pfc_index_associates_GH_productcoefficientscoefficientdiagonal)+pfc_complement_associates_GH_productcoefficientscoefficientdiagonalterm=(pfc_index_associates_GH_productcoefficients)) /\ ((((((exists pfa_gap_associates_GH_productcoefficientscoefficientdiagonaltermleftinside. pfa_gap_associates_GH_productcoefficientscoefficientdiagonaltermleftinside + S (pfc_index_associates_GH_productcoefficientscoefficientdiagonal) = (pfgu_Q_associates_GH)) /\ ((((exists ff_h_pfp_associates_GH_productcoefficientscoefficientdiagonaltermleftentry. ff_h_pfp_associates_GH_productcoefficientscoefficientdiagonaltermleftentry + S (pfc_left_associates_GH_productcoefficientscoefficientdiagonalterm) = S ((S (pfc_index_associates_GH_productcoefficientscoefficientdiagonal)) * pfgu_qc_associates_GH)) /\ exists ff_q_pfp_associates_GH_productcoefficientscoefficientdiagonaltermleftentry. pfgu_qb_associates_GH = ff_q_pfp_associates_GH_productcoefficientscoefficientdiagonaltermleftentry * S ((S (pfc_index_associates_GH_productcoefficientscoefficientdiagonal)) * pfgu_qc_associates_GH) + (pfc_left_associates_GH_productcoefficientscoefficientdiagonalterm)))))) \/ (((exists pfc_gap_associates_GH_productcoefficientscoefficientdiagonaltermleftoutside. pfc_gap_associates_GH_productcoefficientscoefficientdiagonaltermleftoutside+(pfgu_Q_associates_GH)=(pfc_index_associates_GH_productcoefficientscoefficientdiagonal)) /\ (((pfc_left_associates_GH_productcoefficientscoefficientdiagonalterm)=0))))) /\ ((((((exists pfa_gap_associates_GH_productcoefficientscoefficientdiagonaltermrightinside. pfa_gap_associates_GH_productcoefficientscoefficientdiagonaltermrightinside + S (pfc_complement_associates_GH_productcoefficientscoefficientdiagonalterm) = (G)) /\ ((((exists ff_h_pfp_associates_GH_productcoefficientscoefficientdiagonaltermrightentry. ff_h_pfp_associates_GH_productcoefficientscoefficientdiagonaltermrightentry + S (pfc_right_associates_GH_productcoefficientscoefficientdiagonalterm) = S ((S (pfc_complement_associates_GH_productcoefficientscoefficientdiagonalterm)) * gc)) /\ exists ff_q_pfp_associates_GH_productcoefficientscoefficientdiagonaltermrightentry. gb = ff_q_pfp_associates_GH_productcoefficientscoefficientdiagonaltermrightentry * S ((S (pfc_complement_associates_GH_productcoefficientscoefficientdiagonalterm)) * gc) + (pfc_right_associates_GH_productcoefficientscoefficientdiagonalterm)))))) \/ (((exists pfc_gap_associates_GH_productcoefficientscoefficientdiagonaltermrightoutside. pfc_gap_associates_GH_productcoefficientscoefficientdiagonaltermrightoutside+(G)=(pfc_complement_associates_GH_productcoefficientscoefficientdiagonalterm)) /\ (((pfc_right_associates_GH_productcoefficientscoefficientdiagonalterm)=0))))) /\ (((pfc_value_associates_GH_productcoefficientscoefficientdiagonal)=pfc_left_associates_GH_productcoefficientscoefficientdiagonalterm*pfc_right_associates_GH_productcoefficientscoefficientdiagonalterm))))))))))) /\ (((exists fs_u_pfc_associates_GH_productcoefficientscoefficientsum fs_v_pfc_associates_GH_productcoefficientscoefficientsum. ((((exists fs_h_pfc_associates_GH_productcoefficientscoefficientsum_body_start. fs_h_pfc_associates_GH_productcoefficientscoefficientsum_body_start + S (0) = S ((S (0)) * fs_v_pfc_associates_GH_productcoefficientscoefficientsum)) /\ exists fs_q_pfc_associates_GH_productcoefficientscoefficientsum_body_start. fs_u_pfc_associates_GH_productcoefficientscoefficientsum = fs_q_pfc_associates_GH_productcoefficientscoefficientsum_body_start * S ((S (0)) * fs_v_pfc_associates_GH_productcoefficientscoefficientsum) + (0))) /\ ((((exists fs_h_pfc_associates_GH_productcoefficientscoefficientsum_body_terminal. fs_h_pfc_associates_GH_productcoefficientscoefficientsum_body_terminal + S (pfc_natural_sum_associates_GH_productcoefficientscoefficient) = S ((S (S (pfc_index_associates_GH_productcoefficients))) * fs_v_pfc_associates_GH_productcoefficientscoefficientsum)) /\ exists fs_q_pfc_associates_GH_productcoefficientscoefficientsum_body_terminal. fs_u_pfc_associates_GH_productcoefficientscoefficientsum = fs_q_pfc_associates_GH_productcoefficientscoefficientsum_body_terminal * S ((S (S (pfc_index_associates_GH_productcoefficients))) * fs_v_pfc_associates_GH_productcoefficientscoefficientsum) + (pfc_natural_sum_associates_GH_productcoefficientscoefficient))) /\ forall fs_i_pfc_associates_GH_productcoefficientscoefficientsum_body_steps. (exists fs_lt_pfc_associates_GH_productcoefficientscoefficientsum_body_steps_bound. fs_lt_pfc_associates_GH_productcoefficientscoefficientsum_body_steps_bound + S fs_i_pfc_associates_GH_productcoefficientscoefficientsum_body_steps = S (pfc_index_associates_GH_productcoefficients)) -> exists fs_a_pfc_associates_GH_productcoefficientscoefficientsum_body_steps fs_r_pfc_associates_GH_productcoefficientscoefficientsum_body_steps fs_s_pfc_associates_GH_productcoefficientscoefficientsum_body_steps. ((((exists fs_h_pfc_associates_GH_productcoefficientscoefficientsum_body_steps_summand. fs_h_pfc_associates_GH_productcoefficientscoefficientsum_body_steps_summand + S (fs_a_pfc_associates_GH_productcoefficientscoefficientsum_body_steps) = S ((S (fs_i_pfc_associates_GH_productcoefficientscoefficientsum_body_steps)) * pfc_terms_scale_associates_GH_productcoefficientscoefficient)) /\ exists fs_q_pfc_associates_GH_productcoefficientscoefficientsum_body_steps_summand. pfc_terms_code_associates_GH_productcoefficientscoefficient = fs_q_pfc_associates_GH_productcoefficientscoefficientsum_body_steps_summand * S ((S (fs_i_pfc_associates_GH_productcoefficientscoefficientsum_body_steps)) * pfc_terms_scale_associates_GH_productcoefficientscoefficient) + (fs_a_pfc_associates_GH_productcoefficientscoefficientsum_body_steps))) /\ ((((exists fs_h_pfc_associates_GH_productcoefficientscoefficientsum_body_steps_partial. fs_h_pfc_associates_GH_productcoefficientscoefficientsum_body_steps_partial + S (fs_r_pfc_associates_GH_productcoefficientscoefficientsum_body_steps) = S ((S (fs_i_pfc_associates_GH_productcoefficientscoefficientsum_body_steps)) * fs_v_pfc_associates_GH_productcoefficientscoefficientsum)) /\ exists fs_q_pfc_associates_GH_productcoefficientscoefficientsum_body_steps_partial. fs_u_pfc_associates_GH_productcoefficientscoefficientsum = fs_q_pfc_associates_GH_productcoefficientscoefficientsum_body_steps_partial * S ((S (fs_i_pfc_associates_GH_productcoefficientscoefficientsum_body_steps)) * fs_v_pfc_associates_GH_productcoefficientscoefficientsum) + (fs_r_pfc_associates_GH_productcoefficientscoefficientsum_body_steps))) /\ ((((exists fs_h_pfc_associates_GH_productcoefficientscoefficientsum_body_steps_successor. fs_h_pfc_associates_GH_productcoefficientscoefficientsum_body_steps_successor + S (fs_s_pfc_associates_GH_productcoefficientscoefficientsum_body_steps) = S ((S (S fs_i_pfc_associates_GH_productcoefficientscoefficientsum_body_steps)) * fs_v_pfc_associates_GH_productcoefficientscoefficientsum)) /\ exists fs_q_pfc_associates_GH_productcoefficientscoefficientsum_body_steps_successor. fs_u_pfc_associates_GH_productcoefficientscoefficientsum = fs_q_pfc_associates_GH_productcoefficientscoefficientsum_body_steps_successor * S ((S (S fs_i_pfc_associates_GH_productcoefficientscoefficientsum_body_steps)) * fs_v_pfc_associates_GH_productcoefficientscoefficientsum) + (fs_s_pfc_associates_GH_productcoefficientscoefficientsum_body_steps))) /\ fs_s_pfc_associates_GH_productcoefficientscoefficientsum_body_steps = fs_r_pfc_associates_GH_productcoefficientscoefficientsum_body_steps + fs_a_pfc_associates_GH_productcoefficientscoefficientsum_body_steps)))))) /\ ((((exists pfa_gap_associates_GH_productcoefficientscoefficientresiduebound. pfa_gap_associates_GH_productcoefficientscoefficientresiduebound + S (pfc_value_associates_GH_productcoefficients) = (p)) /\ ((exists pfa_offset_left_associates_GH_productcoefficientscoefficientresiduecongruence pfa_offset_right_associates_GH_productcoefficientscoefficientresiduecongruence. (pfc_natural_sum_associates_GH_productcoefficientscoefficient) + (p) * pfa_offset_left_associates_GH_productcoefficientscoefficientresiduecongruence = (pfc_value_associates_GH_productcoefficients) + (p) * pfa_offset_right_associates_GH_productcoefficientscoefficientresiduecongruence))))))))))))))))))) /\ ((forall pfrep_power_associates_GH_target pfrep_left_associates_GH_target pfrep_right_associates_GH_target. ((exists pfrep_position_associates_GH_targetfirst. ((pfrep_position_associates_GH_targetfirst+S (pfrep_power_associates_GH_target)=(pfgu_P_associates_GH)) /\ ((((exists ff_h_pfp_associates_GH_targetfirstentry. ff_h_pfp_associates_GH_targetfirstentry + S (pfrep_left_associates_GH_target) = S ((S (pfrep_position_associates_GH_targetfirst)) * pfgu_pc_associates_GH)) /\ exists ff_q_pfp_associates_GH_targetfirstentry. pfgu_pb_associates_GH = ff_q_pfp_associates_GH_targetfirstentry * S ((S (pfrep_position_associates_GH_targetfirst)) * pfgu_pc_associates_GH) + (pfrep_left_associates_GH_target)))))) \/ (((exists pfrep_gap_associates_GH_targetfirstoutside. pfrep_gap_associates_GH_targetfirstoutside+(pfgu_P_associates_GH)=(pfrep_power_associates_GH_target)) /\ (((pfrep_left_associates_GH_target)=0))))) -> ((exists pfrep_position_associates_GH_targetsecond. ((pfrep_position_associates_GH_targetsecond+S (pfrep_power_associates_GH_target)=(H)) /\ ((((exists ff_h_pfp_associates_GH_targetsecondentry. ff_h_pfp_associates_GH_targetsecondentry + S (pfrep_right_associates_GH_target) = S ((S (pfrep_position_associates_GH_targetsecond)) * hc)) /\ exists ff_q_pfp_associates_GH_targetsecondentry. hb = ff_q_pfp_associates_GH_targetsecondentry * S ((S (pfrep_position_associates_GH_targetsecond)) * hc) + (pfrep_right_associates_GH_target)))))) \/ (((exists pfrep_gap_associates_GH_targetsecondoutside. pfrep_gap_associates_GH_targetsecondoutside+(H)=(pfrep_power_associates_GH_target)) /\ (((pfrep_right_associates_GH_target)=0))))) -> pfrep_left_associates_GH_target=pfrep_right_associates_GH_target))))))) -> (((forall fom_index_pfp_associates_HG_canonical. (exists fom_gap_pfp_associates_HG_canonical_index_bound. fom_gap_pfp_associates_HG_canonical_index_bound + S (fom_index_pfp_associates_HG_canonical) = G) -> exists fom_value_pfp_associates_HG_canonical. ((((exists fom_beta_height_pfp_associates_HG_canonical_entry. fom_beta_height_pfp_associates_HG_canonical_entry + S (fom_value_pfp_associates_HG_canonical) = S ((S (fom_index_pfp_associates_HG_canonical)) * gc)) /\ exists fom_beta_quotient_pfp_associates_HG_canonical_entry. gb = fom_beta_quotient_pfp_associates_HG_canonical_entry * S ((S (fom_index_pfp_associates_HG_canonical)) * gc) + (fom_value_pfp_associates_HG_canonical))) /\ (exists fom_gap_pfp_associates_HG_canonical_value_bound. fom_gap_pfp_associates_HG_canonical_value_bound + S (fom_value_pfp_associates_HG_canonical) = p))) /\ ((exists pfgu_qb_associates_HG pfgu_qc_associates_HG pfgu_Q_associates_HG pfgu_pb_associates_HG pfgu_pc_associates_HG pfgu_P_associates_HG. ((((forall fom_index_pfp_associates_HG_productleft. (exists fom_gap_pfp_associates_HG_productleft_index_bound. fom_gap_pfp_associates_HG_productleft_index_bound + S (fom_index_pfp_associates_HG_productleft) = pfgu_Q_associates_HG) -> exists fom_value_pfp_associates_HG_productleft. ((((exists fom_beta_height_pfp_associates_HG_productleft_entry. fom_beta_height_pfp_associates_HG_productleft_entry + S (fom_value_pfp_associates_HG_productleft) = S ((S (fom_index_pfp_associates_HG_productleft)) * pfgu_qc_associates_HG)) /\ exists fom_beta_quotient_pfp_associates_HG_productleft_entry. pfgu_qb_associates_HG = fom_beta_quotient_pfp_associates_HG_productleft_entry * S ((S (fom_index_pfp_associates_HG_productleft)) * pfgu_qc_associates_HG) + (fom_value_pfp_associates_HG_productleft))) /\ (exists fom_gap_pfp_associates_HG_productleft_value_bound. fom_gap_pfp_associates_HG_productleft_value_bound + S (fom_value_pfp_associates_HG_productleft) = p))) /\ (((forall fom_index_pfp_associates_HG_productright. (exists fom_gap_pfp_associates_HG_productright_index_bound. fom_gap_pfp_associates_HG_productright_index_bound + S (fom_index_pfp_associates_HG_productright) = H) -> exists fom_value_pfp_associates_HG_productright. ((((exists fom_beta_height_pfp_associates_HG_productright_entry. fom_beta_height_pfp_associates_HG_productright_entry + S (fom_value_pfp_associates_HG_productright) = S ((S (fom_index_pfp_associates_HG_productright)) * hc)) /\ exists fom_beta_quotient_pfp_associates_HG_productright_entry. hb = fom_beta_quotient_pfp_associates_HG_productright_entry * S ((S (fom_index_pfp_associates_HG_productright)) * hc) + (fom_value_pfp_associates_HG_productright))) /\ (exists fom_gap_pfp_associates_HG_productright_value_bound. fom_gap_pfp_associates_HG_productright_value_bound + S (fom_value_pfp_associates_HG_productright) = p))) /\ (((((((pfgu_Q_associates_HG)=0 \/ (H)=0) /\ (((pfgu_P_associates_HG)=0)))) \/ (((~((pfgu_Q_associates_HG)=0)) /\ (((~((H)=0)) /\ (((pfgu_Q_associates_HG)+(H)=S (pfgu_P_associates_HG)))))))) /\ ((forall pfc_index_associates_HG_productcoefficients. (exists pfa_gap_associates_HG_productcoefficientsbound. pfa_gap_associates_HG_productcoefficientsbound + S (pfc_index_associates_HG_productcoefficients) = (pfgu_P_associates_HG)) -> exists pfc_value_associates_HG_productcoefficients. ((((exists ff_h_pfp_associates_HG_productcoefficientsentry. ff_h_pfp_associates_HG_productcoefficientsentry + S (pfc_value_associates_HG_productcoefficients) = S ((S (pfc_index_associates_HG_productcoefficients)) * pfgu_pc_associates_HG)) /\ exists ff_q_pfp_associates_HG_productcoefficientsentry. pfgu_pb_associates_HG = ff_q_pfp_associates_HG_productcoefficientsentry * S ((S (pfc_index_associates_HG_productcoefficients)) * pfgu_pc_associates_HG) + (pfc_value_associates_HG_productcoefficients))) /\ ((exists pfc_terms_code_associates_HG_productcoefficientscoefficient pfc_terms_scale_associates_HG_productcoefficientscoefficient pfc_natural_sum_associates_HG_productcoefficientscoefficient. ((forall pfc_index_associates_HG_productcoefficientscoefficientdiagonal. (exists pfa_gap_associates_HG_productcoefficientscoefficientdiagonalbound. pfa_gap_associates_HG_productcoefficientscoefficientdiagonalbound + S (pfc_index_associates_HG_productcoefficientscoefficientdiagonal) = (S (pfc_index_associates_HG_productcoefficients))) -> exists pfc_value_associates_HG_productcoefficientscoefficientdiagonal. ((((exists ff_h_pfp_associates_HG_productcoefficientscoefficientdiagonalentry. ff_h_pfp_associates_HG_productcoefficientscoefficientdiagonalentry + S (pfc_value_associates_HG_productcoefficientscoefficientdiagonal) = S ((S (pfc_index_associates_HG_productcoefficientscoefficientdiagonal)) * pfc_terms_scale_associates_HG_productcoefficientscoefficient)) /\ exists ff_q_pfp_associates_HG_productcoefficientscoefficientdiagonalentry. pfc_terms_code_associates_HG_productcoefficientscoefficient = ff_q_pfp_associates_HG_productcoefficientscoefficientdiagonalentry * S ((S (pfc_index_associates_HG_productcoefficientscoefficientdiagonal)) * pfc_terms_scale_associates_HG_productcoefficientscoefficient) + (pfc_value_associates_HG_productcoefficientscoefficientdiagonal))) /\ ((exists pfc_complement_associates_HG_productcoefficientscoefficientdiagonalterm pfc_left_associates_HG_productcoefficientscoefficientdiagonalterm pfc_right_associates_HG_productcoefficientscoefficientdiagonalterm. (((pfc_index_associates_HG_productcoefficientscoefficientdiagonal)+pfc_complement_associates_HG_productcoefficientscoefficientdiagonalterm=(pfc_index_associates_HG_productcoefficients)) /\ ((((((exists pfa_gap_associates_HG_productcoefficientscoefficientdiagonaltermleftinside. pfa_gap_associates_HG_productcoefficientscoefficientdiagonaltermleftinside + S (pfc_index_associates_HG_productcoefficientscoefficientdiagonal) = (pfgu_Q_associates_HG)) /\ ((((exists ff_h_pfp_associates_HG_productcoefficientscoefficientdiagonaltermleftentry. ff_h_pfp_associates_HG_productcoefficientscoefficientdiagonaltermleftentry + S (pfc_left_associates_HG_productcoefficientscoefficientdiagonalterm) = S ((S (pfc_index_associates_HG_productcoefficientscoefficientdiagonal)) * pfgu_qc_associates_HG)) /\ exists ff_q_pfp_associates_HG_productcoefficientscoefficientdiagonaltermleftentry. pfgu_qb_associates_HG = ff_q_pfp_associates_HG_productcoefficientscoefficientdiagonaltermleftentry * S ((S (pfc_index_associates_HG_productcoefficientscoefficientdiagonal)) * pfgu_qc_associates_HG) + (pfc_left_associates_HG_productcoefficientscoefficientdiagonalterm)))))) \/ (((exists pfc_gap_associates_HG_productcoefficientscoefficientdiagonaltermleftoutside. pfc_gap_associates_HG_productcoefficientscoefficientdiagonaltermleftoutside+(pfgu_Q_associates_HG)=(pfc_index_associates_HG_productcoefficientscoefficientdiagonal)) /\ (((pfc_left_associates_HG_productcoefficientscoefficientdiagonalterm)=0))))) /\ ((((((exists pfa_gap_associates_HG_productcoefficientscoefficientdiagonaltermrightinside. pfa_gap_associates_HG_productcoefficientscoefficientdiagonaltermrightinside + S (pfc_complement_associates_HG_productcoefficientscoefficientdiagonalterm) = (H)) /\ ((((exists ff_h_pfp_associates_HG_productcoefficientscoefficientdiagonaltermrightentry. ff_h_pfp_associates_HG_productcoefficientscoefficientdiagonaltermrightentry + S (pfc_right_associates_HG_productcoefficientscoefficientdiagonalterm) = S ((S (pfc_complement_associates_HG_productcoefficientscoefficientdiagonalterm)) * hc)) /\ exists ff_q_pfp_associates_HG_productcoefficientscoefficientdiagonaltermrightentry. hb = ff_q_pfp_associates_HG_productcoefficientscoefficientdiagonaltermrightentry * S ((S (pfc_complement_associates_HG_productcoefficientscoefficientdiagonalterm)) * hc) + (pfc_right_associates_HG_productcoefficientscoefficientdiagonalterm)))))) \/ (((exists pfc_gap_associates_HG_productcoefficientscoefficientdiagonaltermrightoutside. pfc_gap_associates_HG_productcoefficientscoefficientdiagonaltermrightoutside+(H)=(pfc_complement_associates_HG_productcoefficientscoefficientdiagonalterm)) /\ (((pfc_right_associates_HG_productcoefficientscoefficientdiagonalterm)=0))))) /\ (((pfc_value_associates_HG_productcoefficientscoefficientdiagonal)=pfc_left_associates_HG_productcoefficientscoefficientdiagonalterm*pfc_right_associates_HG_productcoefficientscoefficientdiagonalterm))))))))))) /\ (((exists fs_u_pfc_associates_HG_productcoefficientscoefficientsum fs_v_pfc_associates_HG_productcoefficientscoefficientsum. ((((exists fs_h_pfc_associates_HG_productcoefficientscoefficientsum_body_start. fs_h_pfc_associates_HG_productcoefficientscoefficientsum_body_start + S (0) = S ((S (0)) * fs_v_pfc_associates_HG_productcoefficientscoefficientsum)) /\ exists fs_q_pfc_associates_HG_productcoefficientscoefficientsum_body_start. fs_u_pfc_associates_HG_productcoefficientscoefficientsum = fs_q_pfc_associates_HG_productcoefficientscoefficientsum_body_start * S ((S (0)) * fs_v_pfc_associates_HG_productcoefficientscoefficientsum) + (0))) /\ ((((exists fs_h_pfc_associates_HG_productcoefficientscoefficientsum_body_terminal. fs_h_pfc_associates_HG_productcoefficientscoefficientsum_body_terminal + S (pfc_natural_sum_associates_HG_productcoefficientscoefficient) = S ((S (S (pfc_index_associates_HG_productcoefficients))) * fs_v_pfc_associates_HG_productcoefficientscoefficientsum)) /\ exists fs_q_pfc_associates_HG_productcoefficientscoefficientsum_body_terminal. fs_u_pfc_associates_HG_productcoefficientscoefficientsum = fs_q_pfc_associates_HG_productcoefficientscoefficientsum_body_terminal * S ((S (S (pfc_index_associates_HG_productcoefficients))) * fs_v_pfc_associates_HG_productcoefficientscoefficientsum) + (pfc_natural_sum_associates_HG_productcoefficientscoefficient))) /\ forall fs_i_pfc_associates_HG_productcoefficientscoefficientsum_body_steps. (exists fs_lt_pfc_associates_HG_productcoefficientscoefficientsum_body_steps_bound. fs_lt_pfc_associates_HG_productcoefficientscoefficientsum_body_steps_bound + S fs_i_pfc_associates_HG_productcoefficientscoefficientsum_body_steps = S (pfc_index_associates_HG_productcoefficients)) -> exists fs_a_pfc_associates_HG_productcoefficientscoefficientsum_body_steps fs_r_pfc_associates_HG_productcoefficientscoefficientsum_body_steps fs_s_pfc_associates_HG_productcoefficientscoefficientsum_body_steps. ((((exists fs_h_pfc_associates_HG_productcoefficientscoefficientsum_body_steps_summand. fs_h_pfc_associates_HG_productcoefficientscoefficientsum_body_steps_summand + S (fs_a_pfc_associates_HG_productcoefficientscoefficientsum_body_steps) = S ((S (fs_i_pfc_associates_HG_productcoefficientscoefficientsum_body_steps)) * pfc_terms_scale_associates_HG_productcoefficientscoefficient)) /\ exists fs_q_pfc_associates_HG_productcoefficientscoefficientsum_body_steps_summand. pfc_terms_code_associates_HG_productcoefficientscoefficient = fs_q_pfc_associates_HG_productcoefficientscoefficientsum_body_steps_summand * S ((S (fs_i_pfc_associates_HG_productcoefficientscoefficientsum_body_steps)) * pfc_terms_scale_associates_HG_productcoefficientscoefficient) + (fs_a_pfc_associates_HG_productcoefficientscoefficientsum_body_steps))) /\ ((((exists fs_h_pfc_associates_HG_productcoefficientscoefficientsum_body_steps_partial. fs_h_pfc_associates_HG_productcoefficientscoefficientsum_body_steps_partial + S (fs_r_pfc_associates_HG_productcoefficientscoefficientsum_body_steps) = S ((S (fs_i_pfc_associates_HG_productcoefficientscoefficientsum_body_steps)) * fs_v_pfc_associates_HG_productcoefficientscoefficientsum)) /\ exists fs_q_pfc_associates_HG_productcoefficientscoefficientsum_body_steps_partial. fs_u_pfc_associates_HG_productcoefficientscoefficientsum = fs_q_pfc_associates_HG_productcoefficientscoefficientsum_body_steps_partial * S ((S (fs_i_pfc_associates_HG_productcoefficientscoefficientsum_body_steps)) * fs_v_pfc_associates_HG_productcoefficientscoefficientsum) + (fs_r_pfc_associates_HG_productcoefficientscoefficientsum_body_steps))) /\ ((((exists fs_h_pfc_associates_HG_productcoefficientscoefficientsum_body_steps_successor. fs_h_pfc_associates_HG_productcoefficientscoefficientsum_body_steps_successor + S (fs_s_pfc_associates_HG_productcoefficientscoefficientsum_body_steps) = S ((S (S fs_i_pfc_associates_HG_productcoefficientscoefficientsum_body_steps)) * fs_v_pfc_associates_HG_productcoefficientscoefficientsum)) /\ exists fs_q_pfc_associates_HG_productcoefficientscoefficientsum_body_steps_successor. fs_u_pfc_associates_HG_productcoefficientscoefficientsum = fs_q_pfc_associates_HG_productcoefficientscoefficientsum_body_steps_successor * S ((S (S fs_i_pfc_associates_HG_productcoefficientscoefficientsum_body_steps)) * fs_v_pfc_associates_HG_productcoefficientscoefficientsum) + (fs_s_pfc_associates_HG_productcoefficientscoefficientsum_body_steps))) /\ fs_s_pfc_associates_HG_productcoefficientscoefficientsum_body_steps = fs_r_pfc_associates_HG_productcoefficientscoefficientsum_body_steps + fs_a_pfc_associates_HG_productcoefficientscoefficientsum_body_steps)))))) /\ ((((exists pfa_gap_associates_HG_productcoefficientscoefficientresiduebound. pfa_gap_associates_HG_productcoefficientscoefficientresiduebound + S (pfc_value_associates_HG_productcoefficients) = (p)) /\ ((exists pfa_offset_left_associates_HG_productcoefficientscoefficientresiduecongruence pfa_offset_right_associates_HG_productcoefficientscoefficientresiduecongruence. (pfc_natural_sum_associates_HG_productcoefficientscoefficient) + (p) * pfa_offset_left_associates_HG_productcoefficientscoefficientresiduecongruence = (pfc_value_associates_HG_productcoefficients) + (p) * pfa_offset_right_associates_HG_productcoefficientscoefficientresiduecongruence))))))))))))))))))) /\ ((forall pfrep_power_associates_HG_target pfrep_left_associates_HG_target pfrep_right_associates_HG_target. ((exists pfrep_position_associates_HG_targetfirst. ((pfrep_position_associates_HG_targetfirst+S (pfrep_power_associates_HG_target)=(pfgu_P_associates_HG)) /\ ((((exists ff_h_pfp_associates_HG_targetfirstentry. ff_h_pfp_associates_HG_targetfirstentry + S (pfrep_left_associates_HG_target) = S ((S (pfrep_position_associates_HG_targetfirst)) * pfgu_pc_associates_HG)) /\ exists ff_q_pfp_associates_HG_targetfirstentry. pfgu_pb_associates_HG = ff_q_pfp_associates_HG_targetfirstentry * S ((S (pfrep_position_associates_HG_targetfirst)) * pfgu_pc_associates_HG) + (pfrep_left_associates_HG_target)))))) \/ (((exists pfrep_gap_associates_HG_targetfirstoutside. pfrep_gap_associates_HG_targetfirstoutside+(pfgu_P_associates_HG)=(pfrep_power_associates_HG_target)) /\ (((pfrep_left_associates_HG_target)=0))))) -> ((exists pfrep_position_associates_HG_targetsecond. ((pfrep_position_associates_HG_targetsecond+S (pfrep_power_associates_HG_target)=(G)) /\ ((((exists ff_h_pfp_associates_HG_targetsecondentry. ff_h_pfp_associates_HG_targetsecondentry + S (pfrep_right_associates_HG_target) = S ((S (pfrep_position_associates_HG_targetsecond)) * gc)) /\ exists ff_q_pfp_associates_HG_targetsecondentry. gb = ff_q_pfp_associates_HG_targetsecondentry * S ((S (pfrep_position_associates_HG_targetsecond)) * gc) + (pfrep_right_associates_HG_target)))))) \/ (((exists pfrep_gap_associates_HG_targetsecondoutside. pfrep_gap_associates_HG_targetsecondoutside+(G)=(pfrep_power_associates_HG_target)) /\ (((pfrep_right_associates_HG_target)=0))))) -> pfrep_left_associates_HG_target=pfrep_right_associates_HG_target))))))) -> (forall pfrep_power_associates_result pfrep_left_associates_result pfrep_right_associates_result. ((exists pfrep_position_associates_resultfirst. ((pfrep_position_associates_resultfirst+S (pfrep_power_associates_result)=(G)) /\ ((((exists ff_h_pfp_associates_resultfirstentry. ff_h_pfp_associates_resultfirstentry + S (pfrep_left_associates_result) = S ((S (pfrep_position_associates_resultfirst)) * gc)) /\ exists ff_q_pfp_associates_resultfirstentry. gb = ff_q_pfp_associates_resultfirstentry * S ((S (pfrep_position_associates_resultfirst)) * gc) + (pfrep_left_associates_result)))))) \/ (((exists pfrep_gap_associates_resultfirstoutside. pfrep_gap_associates_resultfirstoutside+(G)=(pfrep_power_associates_result)) /\ (((pfrep_left_associates_result)=0))))) -> ((exists pfrep_position_associates_resultsecond. ((pfrep_position_associates_resultsecond+S (pfrep_power_associates_result)=(H)) /\ ((((exists ff_h_pfp_associates_resultsecondentry. ff_h_pfp_associates_resultsecondentry + S (pfrep_right_associates_result) = S ((S (pfrep_position_associates_resultsecond)) * hc)) /\ exists ff_q_pfp_associates_resultsecondentry. hb = ff_q_pfp_associates_resultsecondentry * S ((S (pfrep_position_associates_resultsecond)) * hc) + (pfrep_right_associates_result)))))) \/ (((exists pfrep_gap_associates_resultsecondoutside. pfrep_gap_associates_resultsecondoutside+(H)=(pfrep_power_associates_result)) /\ (((pfrep_right_associates_result)=0))))) -> pfrep_left_associates_result=pfrep_right_associates_result)Constructive proof overview
Generated structural guide
Mutual right divisibility forces equal represented degrees. Both actual monic normalizations then force formal coefficient equivalence, without selecting unique beta codes.
The unchanged tactic script uses 5 declared prerequisites and contains 122 exact native proof lines.
Alpha v34 checked-use · first admitted v34 · independently kernel and Lean verified; not Stable
Proof neighborhood
Direct dependencies
nonzero_is_succ Alpha theorem; checked-use authorized prime_field_polynomial_monic_represented_degree Alpha theorem; checked-use authorized le_antisymm Alpha theorem; checked-use authorized PG0071 prime_field_polynomial_right_divides_represented_degree_bound PG0073 prime_field_polynomial_monic_equal_degree_right_divides_equivalentDirect dependents
Formal native tactic body
Dependencies are introduced as named hypotheses before line 1. Local theorem links identify exact declared prerequisites. This exact body belongs to a complete independently kernel-checked constructive proof bundle and has Alpha checked-use authority; it does not imply Stable membership.
Read the argument
Proof checkpoints
This is a reading aid, not a new proof or a proof-tree certificate. Checkpoint groups are consecutive commands, not inferred branch boundaries. Every step links to the preserved script.
Named ingredients (2)
01Fix variables and assumptionsL1–10
02Fix variables and assumptionsL11–12
03Establish hgnL13–13
Establish this local claim before using it. It is not an additional assumption.
- L13
have hgn : ~(G=0)
04Separate the logical casesL14–14
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L14
cases hg
05Use earlier factsL15–15
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L15
exact hg_left
06Establish hhnL16–16
Establish this local claim before using it. It is not an additional assumption.
- L16
have hhn : ~(H=0)
07Separate the logical casesL17–17
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L17
cases hh
08Use earlier factsL18–18
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L18
exact hh_left
09Establish hglL19–22
10Separate the logical casesL23–23
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L23
cases hgl
11Establish hhlL24–27
12Separate the logical casesL28–28
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L28
cases hhl
13Establish hgdL29–37
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply prime field polynomial monic represented degree.
- L29
have hgd : FpRepresentedDegree(p,gb,gc,G,x)Definitions: FpRepresentedDegree - L30
specialize prime_field_polynomial_monic_represented_degree (p) - L31
specialize prime_field_polynomial_monic_represented_degree (gb) - L32
specialize prime_field_polynomial_monic_represented_degree (gc) - L33
specialize prime_field_polynomial_monic_represented_degree (G) - L34
specialize prime_field_polynomial_monic_represented_degree (x) - L35
apply prime_field_polynomial_monic_represented_degree - L36
exact hg - L37
exact hgl_witness
14Establish hhdL38–46
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply prime field polynomial monic represented degree.
- L38
have hhd : FpRepresentedDegree(p,hb,hc,H,x1)Definitions: FpRepresentedDegree - L39
specialize prime_field_polynomial_monic_represented_degree (p) - L40
specialize prime_field_polynomial_monic_represented_degree (hb) - L41
specialize prime_field_polynomial_monic_represented_degree (hc) - L42
specialize prime_field_polynomial_monic_represented_degree (H) - L43
specialize prime_field_polynomial_monic_represented_degree (x1) - L44
apply prime_field_polynomial_monic_represented_degree - L45
exact hh - L46
exact hhl_witness
15Establish hdeL47–56
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply le antisymm.
- L47
have hde : x=x1 - L48
specialize le_antisymm (x) - L49
specialize le_antisymm (x1) - L50
apply le_antisymm - L51
specialize prime_field_polynomial_right_divides_represented_degree_bound (p) - L52
specialize prime_field_polynomial_right_divides_represented_degree_bound (gb) - L53
specialize prime_field_polynomial_right_divides_represented_degree_bound (gc) - L54
specialize prime_field_polynomial_right_divides_represented_degree_bound (G) - L55
specialize prime_field_polynomial_right_divides_represented_degree_bound (x) - L56
specialize prime_field_polynomial_right_divides_represented_degree_bound (hb)
16Use earlier factsL57–66
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L57
specialize prime_field_polynomial_right_divides_represented_degree_bound (hc) - L58
specialize prime_field_polynomial_right_divides_represented_degree_bound (H) - L59
specialize prime_field_polynomial_right_divides_represented_degree_bound (x1) - L60
apply prime_field_polynomial_right_divides_represented_degree_bound - L61
exact hp - L62
exact hgd - L63
exact hhd - L64
exact hgh - L65
specialize prime_field_polynomial_right_divides_represented_degree_bound (p) - L66
specialize prime_field_polynomial_right_divides_represented_degree_bound (hb)
17Use earlier factsL67–76
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L67
specialize prime_field_polynomial_right_divides_represented_degree_bound (hc) - L68
specialize prime_field_polynomial_right_divides_represented_degree_bound (H) - L69
specialize prime_field_polynomial_right_divides_represented_degree_bound (x1) - L70
specialize prime_field_polynomial_right_divides_represented_degree_bound (gb) - L71
specialize prime_field_polynomial_right_divides_represented_degree_bound (gc) - L72
specialize prime_field_polynomial_right_divides_represented_degree_bound (G) - L73
specialize prime_field_polynomial_right_divides_represented_degree_bound (x) - L74
apply prime_field_polynomial_right_divides_represented_degree_bound - L75
exact hp - L76
exact hhd
18Use earlier factsL77–78
19Establish hsameL79–82
20Establish hgeL83–83
21Establish hcopyL84–88
22Establish hheL89–89
23Establish hcopyL90–94
24Establish hrL95–95
Establish this local claim before using it. It is not an additional assumption.
- L95
have hr : FpPolynomialRightDivides(p,gb,gc,S x,hb,hc,S x)Definitions: FpPolynomialRightDivides
25Establish hcopyL96–105
Establish this local claim before using it. It is not an additional assumption.
- L96
have hcopy : FpPolynomialRightDivides(p,gb,gc,G,hb,hc,H)Definitions: FpPolynomialRightDivides - L97
exact hgh - L98
rewrite hgl_witness at hcopy - L99
rewrite hgl_witness at hcopy - L100
rewrite hgl_witness at hcopy - L101
rewrite hgl_witness at hcopy - L102
rewrite hgl_witness at hcopy - L103
rewrite hgl_witness at hcopy - L104
rewrite hsame at hcopy - L105
rewrite hsame at hcopy
26Calculate and transport equalitiesL106–106
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L106
rewrite hsame at hcopy
27Use earlier factsL107–107
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L107
exact hcopy
28Calculate and transport equalitiesL108–111
29Use earlier factsL112–121
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L112
specialize prime_field_polynomial_monic_equal_degree_right_divides_equivalent (p) - L113
specialize prime_field_polynomial_monic_equal_degree_right_divides_equivalent (gb) - L114
specialize prime_field_polynomial_monic_equal_degree_right_divides_equivalent (gc) - L115
specialize prime_field_polynomial_monic_equal_degree_right_divides_equivalent (hb) - L116
specialize prime_field_polynomial_monic_equal_degree_right_divides_equivalent (hc) - L117
specialize prime_field_polynomial_monic_equal_degree_right_divides_equivalent (x) - L118
apply prime_field_polynomial_monic_equal_degree_right_divides_equivalent - L119
exact hp - L120
exact hge - L121
exact hhe
30Use earlier factsL122–122
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L122
exact hr
Original exact command ledger · 122 lines
- 0001
intro p - 0002
intro gb - 0003
intro gc - 0004
intro G - 0005
intro hb - 0006
intro hc - 0007
intro H - 0008
intro hp - 0009
intro hg - 0010
intro hh - 0011
intro hgh - 0012
intro hhg - 0013
have hgn : ~(G=0) - 0014
cases hg - 0015
exact hg_left - 0016
have hhn : ~(H=0) - 0017
cases hh - 0018
exact hh_left - 0019
have hgl : exists d. G=S d - 0020
specialize nonzero_is_succ (G) - 0021
apply nonzero_is_succ - 0022
exact hgn - 0023
cases hgl - 0024
have hhl : exists e. H=S e - 0025
specialize nonzero_is_succ (H) - 0026
apply nonzero_is_succ - 0027
exact hhn - 0028
cases hhl - 0029
have hgd : (((G)=S (x)) /\ (((forall fom_index_pfp_associates_degree_Gcoefficients. (exists fom_gap_pfp_associates_degree_Gcoefficients_index_bound. fom_gap_pfp_associates_degree_Gcoefficients_index_bound + S (fom_index_pfp_associates_degree_Gcoefficients) = G) -> exists fom_value_pfp_associates_degree_Gcoefficients. ((((exists fom_beta_height_pfp_associates_degree_Gcoefficients_entry. fom_beta_height_pfp_associates_degree_Gcoefficients_entry + S (fom_value_pfp_associates_degree_Gcoefficients) = S ((S (fom_index_pfp_associates_degree_Gcoefficients)) * gc)) /\ exists fom_beta_quotient_pfp_associates_degree_Gcoefficients_entry. gb = fom_beta_quotient_pfp_associates_degree_Gcoefficients_entry * S ((S (fom_index_pfp_associates_degree_Gcoefficients)) * gc) + (fom_value_pfp_associates_degree_Gcoefficients))) /\ (exists fom_gap_pfp_associates_degree_Gcoefficients_value_bound. fom_gap_pfp_associates_degree_Gcoefficients_value_bound + S (fom_value_pfp_associates_degree_Gcoefficients) = p))) /\ ((exists pfd_leading_associates_degree_G. ((((exists ff_h_pfp_associates_degree_Gentry. ff_h_pfp_associates_degree_Gentry + S (pfd_leading_associates_degree_G) = S ((S (0)) * gc)) /\ exists ff_q_pfp_associates_degree_Gentry. gb = ff_q_pfp_associates_degree_Gentry * S ((S (0)) * gc) + (pfd_leading_associates_degree_G))) /\ ((~(pfd_leading_associates_degree_G=0))))))))) - 0030
specialize prime_field_polynomial_monic_represented_degree (p) - 0031
specialize prime_field_polynomial_monic_represented_degree (gb) - 0032
specialize prime_field_polynomial_monic_represented_degree (gc) - 0033
specialize prime_field_polynomial_monic_represented_degree (G) - 0034
specialize prime_field_polynomial_monic_represented_degree (x) - 0035
apply prime_field_polynomial_monic_represented_degree - 0036
exact hg - 0037
exact hgl_witness - 0038
have hhd : (((H)=S (x1)) /\ (((forall fom_index_pfp_associates_degree_Hcoefficients. (exists fom_gap_pfp_associates_degree_Hcoefficients_index_bound. fom_gap_pfp_associates_degree_Hcoefficients_index_bound + S (fom_index_pfp_associates_degree_Hcoefficients) = H) -> exists fom_value_pfp_associates_degree_Hcoefficients. ((((exists fom_beta_height_pfp_associates_degree_Hcoefficients_entry. fom_beta_height_pfp_associates_degree_Hcoefficients_entry + S (fom_value_pfp_associates_degree_Hcoefficients) = S ((S (fom_index_pfp_associates_degree_Hcoefficients)) * hc)) /\ exists fom_beta_quotient_pfp_associates_degree_Hcoefficients_entry. hb = fom_beta_quotient_pfp_associates_degree_Hcoefficients_entry * S ((S (fom_index_pfp_associates_degree_Hcoefficients)) * hc) + (fom_value_pfp_associates_degree_Hcoefficients))) /\ (exists fom_gap_pfp_associates_degree_Hcoefficients_value_bound. fom_gap_pfp_associates_degree_Hcoefficients_value_bound + S (fom_value_pfp_associates_degree_Hcoefficients) = p))) /\ ((exists pfd_leading_associates_degree_H. ((((exists ff_h_pfp_associates_degree_Hentry. ff_h_pfp_associates_degree_Hentry + S (pfd_leading_associates_degree_H) = S ((S (0)) * hc)) /\ exists ff_q_pfp_associates_degree_Hentry. hb = ff_q_pfp_associates_degree_Hentry * S ((S (0)) * hc) + (pfd_leading_associates_degree_H))) /\ ((~(pfd_leading_associates_degree_H=0))))))))) - 0039
specialize prime_field_polynomial_monic_represented_degree (p) - 0040
specialize prime_field_polynomial_monic_represented_degree (hb) - 0041
specialize prime_field_polynomial_monic_represented_degree (hc) - 0042
specialize prime_field_polynomial_monic_represented_degree (H) - 0043
specialize prime_field_polynomial_monic_represented_degree (x1) - 0044
apply prime_field_polynomial_monic_represented_degree - 0045
exact hh - 0046
exact hhl_witness - 0047
have hde : x=x1 - 0048
specialize le_antisymm (x) - 0049
specialize le_antisymm (x1) - 0050
apply le_antisymm - 0051
specialize prime_field_polynomial_right_divides_represented_degree_bound (p) - 0052
specialize prime_field_polynomial_right_divides_represented_degree_bound (gb) - 0053
specialize prime_field_polynomial_right_divides_represented_degree_bound (gc) - 0054
specialize prime_field_polynomial_right_divides_represented_degree_bound (G) - 0055
specialize prime_field_polynomial_right_divides_represented_degree_bound (x) - 0056
specialize prime_field_polynomial_right_divides_represented_degree_bound (hb) - 0057
specialize prime_field_polynomial_right_divides_represented_degree_bound (hc) - 0058
specialize prime_field_polynomial_right_divides_represented_degree_bound (H) - 0059
specialize prime_field_polynomial_right_divides_represented_degree_bound (x1) - 0060
apply prime_field_polynomial_right_divides_represented_degree_bound - 0061
exact hp - 0062
exact hgd - 0063
exact hhd - 0064
exact hgh - 0065
specialize prime_field_polynomial_right_divides_represented_degree_bound (p) - 0066
specialize prime_field_polynomial_right_divides_represented_degree_bound (hb) - 0067
specialize prime_field_polynomial_right_divides_represented_degree_bound (hc) - 0068
specialize prime_field_polynomial_right_divides_represented_degree_bound (H) - 0069
specialize prime_field_polynomial_right_divides_represented_degree_bound (x1) - 0070
specialize prime_field_polynomial_right_divides_represented_degree_bound (gb) - 0071
specialize prime_field_polynomial_right_divides_represented_degree_bound (gc) - 0072
specialize prime_field_polynomial_right_divides_represented_degree_bound (G) - 0073
specialize prime_field_polynomial_right_divides_represented_degree_bound (x) - 0074
apply prime_field_polynomial_right_divides_represented_degree_bound - 0075
exact hp - 0076
exact hhd - 0077
exact hgd - 0078
exact hhg - 0079
have hsame : H=S x - 0080
rewrite hhl_witness - 0081
rewrite hde - 0082
refl - 0083
have hge : ((~((S x) = 0)) /\ (((forall fom_index_pfp_associates_monic_Gcoefficients. (exists fom_gap_pfp_associates_monic_Gcoefficients_index_bound. fom_gap_pfp_associates_monic_Gcoefficients_index_bound + S (fom_index_pfp_associates_monic_Gcoefficients) = S x) -> exists fom_value_pfp_associates_monic_Gcoefficients. ((((exists fom_beta_height_pfp_associates_monic_Gcoefficients_entry. fom_beta_height_pfp_associates_monic_Gcoefficients_entry + S (fom_value_pfp_associates_monic_Gcoefficients) = S ((S (fom_index_pfp_associates_monic_Gcoefficients)) * gc)) /\ exists fom_beta_quotient_pfp_associates_monic_Gcoefficients_entry. gb = fom_beta_quotient_pfp_associates_monic_Gcoefficients_entry * S ((S (fom_index_pfp_associates_monic_Gcoefficients)) * gc) + (fom_value_pfp_associates_monic_Gcoefficients))) /\ (exists fom_gap_pfp_associates_monic_Gcoefficients_value_bound. fom_gap_pfp_associates_monic_Gcoefficients_value_bound + S (fom_value_pfp_associates_monic_Gcoefficients) = p))) /\ ((((exists ff_h_pfp_associates_monic_Gleading. ff_h_pfp_associates_monic_Gleading + S (1) = S ((S (0)) * gc)) /\ exists ff_q_pfp_associates_monic_Gleading. gb = ff_q_pfp_associates_monic_Gleading * S ((S (0)) * gc) + (1))))))) - 0084
have hcopy : ((~((G) = 0)) /\ (((forall fom_index_pfp_associates_monic_Gcopycoefficients. (exists fom_gap_pfp_associates_monic_Gcopycoefficients_index_bound. fom_gap_pfp_associates_monic_Gcopycoefficients_index_bound + S (fom_index_pfp_associates_monic_Gcopycoefficients) = G) -> exists fom_value_pfp_associates_monic_Gcopycoefficients. ((((exists fom_beta_height_pfp_associates_monic_Gcopycoefficients_entry. fom_beta_height_pfp_associates_monic_Gcopycoefficients_entry + S (fom_value_pfp_associates_monic_Gcopycoefficients) = S ((S (fom_index_pfp_associates_monic_Gcopycoefficients)) * gc)) /\ exists fom_beta_quotient_pfp_associates_monic_Gcopycoefficients_entry. gb = fom_beta_quotient_pfp_associates_monic_Gcopycoefficients_entry * S ((S (fom_index_pfp_associates_monic_Gcopycoefficients)) * gc) + (fom_value_pfp_associates_monic_Gcopycoefficients))) /\ (exists fom_gap_pfp_associates_monic_Gcopycoefficients_value_bound. fom_gap_pfp_associates_monic_Gcopycoefficients_value_bound + S (fom_value_pfp_associates_monic_Gcopycoefficients) = p))) /\ ((((exists ff_h_pfp_associates_monic_Gcopyleading. ff_h_pfp_associates_monic_Gcopyleading + S (1) = S ((S (0)) * gc)) /\ exists ff_q_pfp_associates_monic_Gcopyleading. gb = ff_q_pfp_associates_monic_Gcopyleading * S ((S (0)) * gc) + (1))))))) - 0085
exact hg - 0086
rewrite hgl_witness at hcopy - 0087
rewrite hgl_witness at hcopy - 0088
exact hcopy - 0089
have hhe : ((~((S x) = 0)) /\ (((forall fom_index_pfp_associates_monic_Hcoefficients. (exists fom_gap_pfp_associates_monic_Hcoefficients_index_bound. fom_gap_pfp_associates_monic_Hcoefficients_index_bound + S (fom_index_pfp_associates_monic_Hcoefficients) = S x) -> exists fom_value_pfp_associates_monic_Hcoefficients. ((((exists fom_beta_height_pfp_associates_monic_Hcoefficients_entry. fom_beta_height_pfp_associates_monic_Hcoefficients_entry + S (fom_value_pfp_associates_monic_Hcoefficients) = S ((S (fom_index_pfp_associates_monic_Hcoefficients)) * hc)) /\ exists fom_beta_quotient_pfp_associates_monic_Hcoefficients_entry. hb = fom_beta_quotient_pfp_associates_monic_Hcoefficients_entry * S ((S (fom_index_pfp_associates_monic_Hcoefficients)) * hc) + (fom_value_pfp_associates_monic_Hcoefficients))) /\ (exists fom_gap_pfp_associates_monic_Hcoefficients_value_bound. fom_gap_pfp_associates_monic_Hcoefficients_value_bound + S (fom_value_pfp_associates_monic_Hcoefficients) = p))) /\ ((((exists ff_h_pfp_associates_monic_Hleading. ff_h_pfp_associates_monic_Hleading + S (1) = S ((S (0)) * hc)) /\ exists ff_q_pfp_associates_monic_Hleading. hb = ff_q_pfp_associates_monic_Hleading * S ((S (0)) * hc) + (1))))))) - 0090
have hcopy : ((~((H) = 0)) /\ (((forall fom_index_pfp_associates_monic_Hcopycoefficients. (exists fom_gap_pfp_associates_monic_Hcopycoefficients_index_bound. fom_gap_pfp_associates_monic_Hcopycoefficients_index_bound + S (fom_index_pfp_associates_monic_Hcopycoefficients) = H) -> exists fom_value_pfp_associates_monic_Hcopycoefficients. ((((exists fom_beta_height_pfp_associates_monic_Hcopycoefficients_entry. fom_beta_height_pfp_associates_monic_Hcopycoefficients_entry + S (fom_value_pfp_associates_monic_Hcopycoefficients) = S ((S (fom_index_pfp_associates_monic_Hcopycoefficients)) * hc)) /\ exists fom_beta_quotient_pfp_associates_monic_Hcopycoefficients_entry. hb = fom_beta_quotient_pfp_associates_monic_Hcopycoefficients_entry * S ((S (fom_index_pfp_associates_monic_Hcopycoefficients)) * hc) + (fom_value_pfp_associates_monic_Hcopycoefficients))) /\ (exists fom_gap_pfp_associates_monic_Hcopycoefficients_value_bound. fom_gap_pfp_associates_monic_Hcopycoefficients_value_bound + S (fom_value_pfp_associates_monic_Hcopycoefficients) = p))) /\ ((((exists ff_h_pfp_associates_monic_Hcopyleading. ff_h_pfp_associates_monic_Hcopyleading + S (1) = S ((S (0)) * hc)) /\ exists ff_q_pfp_associates_monic_Hcopyleading. hb = ff_q_pfp_associates_monic_Hcopyleading * S ((S (0)) * hc) + (1))))))) - 0091
exact hh - 0092
rewrite hsame at hcopy - 0093
rewrite hsame at hcopy - 0094
exact hcopy - 0095
have hr : ((forall fom_index_pfp_associates_RD_canonical. (exists fom_gap_pfp_associates_RD_canonical_index_bound. fom_gap_pfp_associates_RD_canonical_index_bound + S (fom_index_pfp_associates_RD_canonical) = S x) -> exists fom_value_pfp_associates_RD_canonical. ((((exists fom_beta_height_pfp_associates_RD_canonical_entry. fom_beta_height_pfp_associates_RD_canonical_entry + S (fom_value_pfp_associates_RD_canonical) = S ((S (fom_index_pfp_associates_RD_canonical)) * hc)) /\ exists fom_beta_quotient_pfp_associates_RD_canonical_entry. hb = fom_beta_quotient_pfp_associates_RD_canonical_entry * S ((S (fom_index_pfp_associates_RD_canonical)) * hc) + (fom_value_pfp_associates_RD_canonical))) /\ (exists fom_gap_pfp_associates_RD_canonical_value_bound. fom_gap_pfp_associates_RD_canonical_value_bound + S (fom_value_pfp_associates_RD_canonical) = p))) /\ ((exists pfgu_qb_associates_RD pfgu_qc_associates_RD pfgu_Q_associates_RD pfgu_pb_associates_RD pfgu_pc_associates_RD pfgu_P_associates_RD. ((((forall fom_index_pfp_associates_RD_productleft. (exists fom_gap_pfp_associates_RD_productleft_index_bound. fom_gap_pfp_associates_RD_productleft_index_bound + S (fom_index_pfp_associates_RD_productleft) = pfgu_Q_associates_RD) -> exists fom_value_pfp_associates_RD_productleft. ((((exists fom_beta_height_pfp_associates_RD_productleft_entry. fom_beta_height_pfp_associates_RD_productleft_entry + S (fom_value_pfp_associates_RD_productleft) = S ((S (fom_index_pfp_associates_RD_productleft)) * pfgu_qc_associates_RD)) /\ exists fom_beta_quotient_pfp_associates_RD_productleft_entry. pfgu_qb_associates_RD = fom_beta_quotient_pfp_associates_RD_productleft_entry * S ((S (fom_index_pfp_associates_RD_productleft)) * pfgu_qc_associates_RD) + (fom_value_pfp_associates_RD_productleft))) /\ (exists fom_gap_pfp_associates_RD_productleft_value_bound. fom_gap_pfp_associates_RD_productleft_value_bound + S (fom_value_pfp_associates_RD_productleft) = p))) /\ (((forall fom_index_pfp_associates_RD_productright. (exists fom_gap_pfp_associates_RD_productright_index_bound. fom_gap_pfp_associates_RD_productright_index_bound + S (fom_index_pfp_associates_RD_productright) = S x) -> exists fom_value_pfp_associates_RD_productright. ((((exists fom_beta_height_pfp_associates_RD_productright_entry. fom_beta_height_pfp_associates_RD_productright_entry + S (fom_value_pfp_associates_RD_productright) = S ((S (fom_index_pfp_associates_RD_productright)) * gc)) /\ exists fom_beta_quotient_pfp_associates_RD_productright_entry. gb = fom_beta_quotient_pfp_associates_RD_productright_entry * S ((S (fom_index_pfp_associates_RD_productright)) * gc) + (fom_value_pfp_associates_RD_productright))) /\ (exists fom_gap_pfp_associates_RD_productright_value_bound. fom_gap_pfp_associates_RD_productright_value_bound + S (fom_value_pfp_associates_RD_productright) = p))) /\ (((((((pfgu_Q_associates_RD)=0 \/ (S x)=0) /\ (((pfgu_P_associates_RD)=0)))) \/ (((~((pfgu_Q_associates_RD)=0)) /\ (((~((S x)=0)) /\ (((pfgu_Q_associates_RD)+(S x)=S (pfgu_P_associates_RD)))))))) /\ ((forall pfc_index_associates_RD_productcoefficients. (exists pfa_gap_associates_RD_productcoefficientsbound. pfa_gap_associates_RD_productcoefficientsbound + S (pfc_index_associates_RD_productcoefficients) = (pfgu_P_associates_RD)) -> exists pfc_value_associates_RD_productcoefficients. ((((exists ff_h_pfp_associates_RD_productcoefficientsentry. ff_h_pfp_associates_RD_productcoefficientsentry + S (pfc_value_associates_RD_productcoefficients) = S ((S (pfc_index_associates_RD_productcoefficients)) * pfgu_pc_associates_RD)) /\ exists ff_q_pfp_associates_RD_productcoefficientsentry. pfgu_pb_associates_RD = ff_q_pfp_associates_RD_productcoefficientsentry * S ((S (pfc_index_associates_RD_productcoefficients)) * pfgu_pc_associates_RD) + (pfc_value_associates_RD_productcoefficients))) /\ ((exists pfc_terms_code_associates_RD_productcoefficientscoefficient pfc_terms_scale_associates_RD_productcoefficientscoefficient pfc_natural_sum_associates_RD_productcoefficientscoefficient. ((forall pfc_index_associates_RD_productcoefficientscoefficientdiagonal. (exists pfa_gap_associates_RD_productcoefficientscoefficientdiagonalbound. pfa_gap_associates_RD_productcoefficientscoefficientdiagonalbound + S (pfc_index_associates_RD_productcoefficientscoefficientdiagonal) = (S (pfc_index_associates_RD_productcoefficients))) -> exists pfc_value_associates_RD_productcoefficientscoefficientdiagonal. ((((exists ff_h_pfp_associates_RD_productcoefficientscoefficientdiagonalentry. ff_h_pfp_associates_RD_productcoefficientscoefficientdiagonalentry + S (pfc_value_associates_RD_productcoefficientscoefficientdiagonal) = S ((S (pfc_index_associates_RD_productcoefficientscoefficientdiagonal)) * pfc_terms_scale_associates_RD_productcoefficientscoefficient)) /\ exists ff_q_pfp_associates_RD_productcoefficientscoefficientdiagonalentry. pfc_terms_code_associates_RD_productcoefficientscoefficient = ff_q_pfp_associates_RD_productcoefficientscoefficientdiagonalentry * S ((S (pfc_index_associates_RD_productcoefficientscoefficientdiagonal)) * pfc_terms_scale_associates_RD_productcoefficientscoefficient) + (pfc_value_associates_RD_productcoefficientscoefficientdiagonal))) /\ ((exists pfc_complement_associates_RD_productcoefficientscoefficientdiagonalterm pfc_left_associates_RD_productcoefficientscoefficientdiagonalterm pfc_right_associates_RD_productcoefficientscoefficientdiagonalterm. (((pfc_index_associates_RD_productcoefficientscoefficientdiagonal)+pfc_complement_associates_RD_productcoefficientscoefficientdiagonalterm=(pfc_index_associates_RD_productcoefficients)) /\ ((((((exists pfa_gap_associates_RD_productcoefficientscoefficientdiagonaltermleftinside. pfa_gap_associates_RD_productcoefficientscoefficientdiagonaltermleftinside + S (pfc_index_associates_RD_productcoefficientscoefficientdiagonal) = (pfgu_Q_associates_RD)) /\ ((((exists ff_h_pfp_associates_RD_productcoefficientscoefficientdiagonaltermleftentry. ff_h_pfp_associates_RD_productcoefficientscoefficientdiagonaltermleftentry + S (pfc_left_associates_RD_productcoefficientscoefficientdiagonalterm) = S ((S (pfc_index_associates_RD_productcoefficientscoefficientdiagonal)) * pfgu_qc_associates_RD)) /\ exists ff_q_pfp_associates_RD_productcoefficientscoefficientdiagonaltermleftentry. pfgu_qb_associates_RD = ff_q_pfp_associates_RD_productcoefficientscoefficientdiagonaltermleftentry * S ((S (pfc_index_associates_RD_productcoefficientscoefficientdiagonal)) * pfgu_qc_associates_RD) + (pfc_left_associates_RD_productcoefficientscoefficientdiagonalterm)))))) \/ (((exists pfc_gap_associates_RD_productcoefficientscoefficientdiagonaltermleftoutside. pfc_gap_associates_RD_productcoefficientscoefficientdiagonaltermleftoutside+(pfgu_Q_associates_RD)=(pfc_index_associates_RD_productcoefficientscoefficientdiagonal)) /\ (((pfc_left_associates_RD_productcoefficientscoefficientdiagonalterm)=0))))) /\ ((((((exists pfa_gap_associates_RD_productcoefficientscoefficientdiagonaltermrightinside. pfa_gap_associates_RD_productcoefficientscoefficientdiagonaltermrightinside + S (pfc_complement_associates_RD_productcoefficientscoefficientdiagonalterm) = (S x)) /\ ((((exists ff_h_pfp_associates_RD_productcoefficientscoefficientdiagonaltermrightentry. ff_h_pfp_associates_RD_productcoefficientscoefficientdiagonaltermrightentry + S (pfc_right_associates_RD_productcoefficientscoefficientdiagonalterm) = S ((S (pfc_complement_associates_RD_productcoefficientscoefficientdiagonalterm)) * gc)) /\ exists ff_q_pfp_associates_RD_productcoefficientscoefficientdiagonaltermrightentry. gb = ff_q_pfp_associates_RD_productcoefficientscoefficientdiagonaltermrightentry * S ((S (pfc_complement_associates_RD_productcoefficientscoefficientdiagonalterm)) * gc) + (pfc_right_associates_RD_productcoefficientscoefficientdiagonalterm)))))) \/ (((exists pfc_gap_associates_RD_productcoefficientscoefficientdiagonaltermrightoutside. pfc_gap_associates_RD_productcoefficientscoefficientdiagonaltermrightoutside+(S x)=(pfc_complement_associates_RD_productcoefficientscoefficientdiagonalterm)) /\ (((pfc_right_associates_RD_productcoefficientscoefficientdiagonalterm)=0))))) /\ (((pfc_value_associates_RD_productcoefficientscoefficientdiagonal)=pfc_left_associates_RD_productcoefficientscoefficientdiagonalterm*pfc_right_associates_RD_productcoefficientscoefficientdiagonalterm))))))))))) /\ (((exists fs_u_pfc_associates_RD_productcoefficientscoefficientsum fs_v_pfc_associates_RD_productcoefficientscoefficientsum. ((((exists fs_h_pfc_associates_RD_productcoefficientscoefficientsum_body_start. fs_h_pfc_associates_RD_productcoefficientscoefficientsum_body_start + S (0) = S ((S (0)) * fs_v_pfc_associates_RD_productcoefficientscoefficientsum)) /\ exists fs_q_pfc_associates_RD_productcoefficientscoefficientsum_body_start. fs_u_pfc_associates_RD_productcoefficientscoefficientsum = fs_q_pfc_associates_RD_productcoefficientscoefficientsum_body_start * S ((S (0)) * fs_v_pfc_associates_RD_productcoefficientscoefficientsum) + (0))) /\ ((((exists fs_h_pfc_associates_RD_productcoefficientscoefficientsum_body_terminal. fs_h_pfc_associates_RD_productcoefficientscoefficientsum_body_terminal + S (pfc_natural_sum_associates_RD_productcoefficientscoefficient) = S ((S (S (pfc_index_associates_RD_productcoefficients))) * fs_v_pfc_associates_RD_productcoefficientscoefficientsum)) /\ exists fs_q_pfc_associates_RD_productcoefficientscoefficientsum_body_terminal. fs_u_pfc_associates_RD_productcoefficientscoefficientsum = fs_q_pfc_associates_RD_productcoefficientscoefficientsum_body_terminal * S ((S (S (pfc_index_associates_RD_productcoefficients))) * fs_v_pfc_associates_RD_productcoefficientscoefficientsum) + (pfc_natural_sum_associates_RD_productcoefficientscoefficient))) /\ forall fs_i_pfc_associates_RD_productcoefficientscoefficientsum_body_steps. (exists fs_lt_pfc_associates_RD_productcoefficientscoefficientsum_body_steps_bound. fs_lt_pfc_associates_RD_productcoefficientscoefficientsum_body_steps_bound + S fs_i_pfc_associates_RD_productcoefficientscoefficientsum_body_steps = S (pfc_index_associates_RD_productcoefficients)) -> exists fs_a_pfc_associates_RD_productcoefficientscoefficientsum_body_steps fs_r_pfc_associates_RD_productcoefficientscoefficientsum_body_steps fs_s_pfc_associates_RD_productcoefficientscoefficientsum_body_steps. ((((exists fs_h_pfc_associates_RD_productcoefficientscoefficientsum_body_steps_summand. fs_h_pfc_associates_RD_productcoefficientscoefficientsum_body_steps_summand + S (fs_a_pfc_associates_RD_productcoefficientscoefficientsum_body_steps) = S ((S (fs_i_pfc_associates_RD_productcoefficientscoefficientsum_body_steps)) * pfc_terms_scale_associates_RD_productcoefficientscoefficient)) /\ exists fs_q_pfc_associates_RD_productcoefficientscoefficientsum_body_steps_summand. pfc_terms_code_associates_RD_productcoefficientscoefficient = fs_q_pfc_associates_RD_productcoefficientscoefficientsum_body_steps_summand * S ((S (fs_i_pfc_associates_RD_productcoefficientscoefficientsum_body_steps)) * pfc_terms_scale_associates_RD_productcoefficientscoefficient) + (fs_a_pfc_associates_RD_productcoefficientscoefficientsum_body_steps))) /\ ((((exists fs_h_pfc_associates_RD_productcoefficientscoefficientsum_body_steps_partial. fs_h_pfc_associates_RD_productcoefficientscoefficientsum_body_steps_partial + S (fs_r_pfc_associates_RD_productcoefficientscoefficientsum_body_steps) = S ((S (fs_i_pfc_associates_RD_productcoefficientscoefficientsum_body_steps)) * fs_v_pfc_associates_RD_productcoefficientscoefficientsum)) /\ exists fs_q_pfc_associates_RD_productcoefficientscoefficientsum_body_steps_partial. fs_u_pfc_associates_RD_productcoefficientscoefficientsum = fs_q_pfc_associates_RD_productcoefficientscoefficientsum_body_steps_partial * S ((S (fs_i_pfc_associates_RD_productcoefficientscoefficientsum_body_steps)) * fs_v_pfc_associates_RD_productcoefficientscoefficientsum) + (fs_r_pfc_associates_RD_productcoefficientscoefficientsum_body_steps))) /\ ((((exists fs_h_pfc_associates_RD_productcoefficientscoefficientsum_body_steps_successor. fs_h_pfc_associates_RD_productcoefficientscoefficientsum_body_steps_successor + S (fs_s_pfc_associates_RD_productcoefficientscoefficientsum_body_steps) = S ((S (S fs_i_pfc_associates_RD_productcoefficientscoefficientsum_body_steps)) * fs_v_pfc_associates_RD_productcoefficientscoefficientsum)) /\ exists fs_q_pfc_associates_RD_productcoefficientscoefficientsum_body_steps_successor. fs_u_pfc_associates_RD_productcoefficientscoefficientsum = fs_q_pfc_associates_RD_productcoefficientscoefficientsum_body_steps_successor * S ((S (S fs_i_pfc_associates_RD_productcoefficientscoefficientsum_body_steps)) * fs_v_pfc_associates_RD_productcoefficientscoefficientsum) + (fs_s_pfc_associates_RD_productcoefficientscoefficientsum_body_steps))) /\ fs_s_pfc_associates_RD_productcoefficientscoefficientsum_body_steps = fs_r_pfc_associates_RD_productcoefficientscoefficientsum_body_steps + fs_a_pfc_associates_RD_productcoefficientscoefficientsum_body_steps)))))) /\ ((((exists pfa_gap_associates_RD_productcoefficientscoefficientresiduebound. pfa_gap_associates_RD_productcoefficientscoefficientresiduebound + S (pfc_value_associates_RD_productcoefficients) = (p)) /\ ((exists pfa_offset_left_associates_RD_productcoefficientscoefficientresiduecongruence pfa_offset_right_associates_RD_productcoefficientscoefficientresiduecongruence. (pfc_natural_sum_associates_RD_productcoefficientscoefficient) + (p) * pfa_offset_left_associates_RD_productcoefficientscoefficientresiduecongruence = (pfc_value_associates_RD_productcoefficients) + (p) * pfa_offset_right_associates_RD_productcoefficientscoefficientresiduecongruence))))))))))))))))))) /\ ((forall pfrep_power_associates_RD_target pfrep_left_associates_RD_target pfrep_right_associates_RD_target. ((exists pfrep_position_associates_RD_targetfirst. ((pfrep_position_associates_RD_targetfirst+S (pfrep_power_associates_RD_target)=(pfgu_P_associates_RD)) /\ ((((exists ff_h_pfp_associates_RD_targetfirstentry. ff_h_pfp_associates_RD_targetfirstentry + S (pfrep_left_associates_RD_target) = S ((S (pfrep_position_associates_RD_targetfirst)) * pfgu_pc_associates_RD)) /\ exists ff_q_pfp_associates_RD_targetfirstentry. pfgu_pb_associates_RD = ff_q_pfp_associates_RD_targetfirstentry * S ((S (pfrep_position_associates_RD_targetfirst)) * pfgu_pc_associates_RD) + (pfrep_left_associates_RD_target)))))) \/ (((exists pfrep_gap_associates_RD_targetfirstoutside. pfrep_gap_associates_RD_targetfirstoutside+(pfgu_P_associates_RD)=(pfrep_power_associates_RD_target)) /\ (((pfrep_left_associates_RD_target)=0))))) -> ((exists pfrep_position_associates_RD_targetsecond. ((pfrep_position_associates_RD_targetsecond+S (pfrep_power_associates_RD_target)=(S x)) /\ ((((exists ff_h_pfp_associates_RD_targetsecondentry. ff_h_pfp_associates_RD_targetsecondentry + S (pfrep_right_associates_RD_target) = S ((S (pfrep_position_associates_RD_targetsecond)) * hc)) /\ exists ff_q_pfp_associates_RD_targetsecondentry. hb = ff_q_pfp_associates_RD_targetsecondentry * S ((S (pfrep_position_associates_RD_targetsecond)) * hc) + (pfrep_right_associates_RD_target)))))) \/ (((exists pfrep_gap_associates_RD_targetsecondoutside. pfrep_gap_associates_RD_targetsecondoutside+(S x)=(pfrep_power_associates_RD_target)) /\ (((pfrep_right_associates_RD_target)=0))))) -> pfrep_left_associates_RD_target=pfrep_right_associates_RD_target)))))) - 0096
have hcopy : ((forall fom_index_pfp_associates_RDcopy_canonical. (exists fom_gap_pfp_associates_RDcopy_canonical_index_bound. fom_gap_pfp_associates_RDcopy_canonical_index_bound + S (fom_index_pfp_associates_RDcopy_canonical) = H) -> exists fom_value_pfp_associates_RDcopy_canonical. ((((exists fom_beta_height_pfp_associates_RDcopy_canonical_entry. fom_beta_height_pfp_associates_RDcopy_canonical_entry + S (fom_value_pfp_associates_RDcopy_canonical) = S ((S (fom_index_pfp_associates_RDcopy_canonical)) * hc)) /\ exists fom_beta_quotient_pfp_associates_RDcopy_canonical_entry. hb = fom_beta_quotient_pfp_associates_RDcopy_canonical_entry * S ((S (fom_index_pfp_associates_RDcopy_canonical)) * hc) + (fom_value_pfp_associates_RDcopy_canonical))) /\ (exists fom_gap_pfp_associates_RDcopy_canonical_value_bound. fom_gap_pfp_associates_RDcopy_canonical_value_bound + S (fom_value_pfp_associates_RDcopy_canonical) = p))) /\ ((exists pfgu_qb_associates_RDcopy pfgu_qc_associates_RDcopy pfgu_Q_associates_RDcopy pfgu_pb_associates_RDcopy pfgu_pc_associates_RDcopy pfgu_P_associates_RDcopy. ((((forall fom_index_pfp_associates_RDcopy_productleft. (exists fom_gap_pfp_associates_RDcopy_productleft_index_bound. fom_gap_pfp_associates_RDcopy_productleft_index_bound + S (fom_index_pfp_associates_RDcopy_productleft) = pfgu_Q_associates_RDcopy) -> exists fom_value_pfp_associates_RDcopy_productleft. ((((exists fom_beta_height_pfp_associates_RDcopy_productleft_entry. fom_beta_height_pfp_associates_RDcopy_productleft_entry + S (fom_value_pfp_associates_RDcopy_productleft) = S ((S (fom_index_pfp_associates_RDcopy_productleft)) * pfgu_qc_associates_RDcopy)) /\ exists fom_beta_quotient_pfp_associates_RDcopy_productleft_entry. pfgu_qb_associates_RDcopy = fom_beta_quotient_pfp_associates_RDcopy_productleft_entry * S ((S (fom_index_pfp_associates_RDcopy_productleft)) * pfgu_qc_associates_RDcopy) + (fom_value_pfp_associates_RDcopy_productleft))) /\ (exists fom_gap_pfp_associates_RDcopy_productleft_value_bound. fom_gap_pfp_associates_RDcopy_productleft_value_bound + S (fom_value_pfp_associates_RDcopy_productleft) = p))) /\ (((forall fom_index_pfp_associates_RDcopy_productright. (exists fom_gap_pfp_associates_RDcopy_productright_index_bound. fom_gap_pfp_associates_RDcopy_productright_index_bound + S (fom_index_pfp_associates_RDcopy_productright) = G) -> exists fom_value_pfp_associates_RDcopy_productright. ((((exists fom_beta_height_pfp_associates_RDcopy_productright_entry. fom_beta_height_pfp_associates_RDcopy_productright_entry + S (fom_value_pfp_associates_RDcopy_productright) = S ((S (fom_index_pfp_associates_RDcopy_productright)) * gc)) /\ exists fom_beta_quotient_pfp_associates_RDcopy_productright_entry. gb = fom_beta_quotient_pfp_associates_RDcopy_productright_entry * S ((S (fom_index_pfp_associates_RDcopy_productright)) * gc) + (fom_value_pfp_associates_RDcopy_productright))) /\ (exists fom_gap_pfp_associates_RDcopy_productright_value_bound. fom_gap_pfp_associates_RDcopy_productright_value_bound + S (fom_value_pfp_associates_RDcopy_productright) = p))) /\ (((((((pfgu_Q_associates_RDcopy)=0 \/ (G)=0) /\ (((pfgu_P_associates_RDcopy)=0)))) \/ (((~((pfgu_Q_associates_RDcopy)=0)) /\ (((~((G)=0)) /\ (((pfgu_Q_associates_RDcopy)+(G)=S (pfgu_P_associates_RDcopy)))))))) /\ ((forall pfc_index_associates_RDcopy_productcoefficients. (exists pfa_gap_associates_RDcopy_productcoefficientsbound. pfa_gap_associates_RDcopy_productcoefficientsbound + S (pfc_index_associates_RDcopy_productcoefficients) = (pfgu_P_associates_RDcopy)) -> exists pfc_value_associates_RDcopy_productcoefficients. ((((exists ff_h_pfp_associates_RDcopy_productcoefficientsentry. ff_h_pfp_associates_RDcopy_productcoefficientsentry + S (pfc_value_associates_RDcopy_productcoefficients) = S ((S (pfc_index_associates_RDcopy_productcoefficients)) * pfgu_pc_associates_RDcopy)) /\ exists ff_q_pfp_associates_RDcopy_productcoefficientsentry. pfgu_pb_associates_RDcopy = ff_q_pfp_associates_RDcopy_productcoefficientsentry * S ((S (pfc_index_associates_RDcopy_productcoefficients)) * pfgu_pc_associates_RDcopy) + (pfc_value_associates_RDcopy_productcoefficients))) /\ ((exists pfc_terms_code_associates_RDcopy_productcoefficientscoefficient pfc_terms_scale_associates_RDcopy_productcoefficientscoefficient pfc_natural_sum_associates_RDcopy_productcoefficientscoefficient. ((forall pfc_index_associates_RDcopy_productcoefficientscoefficientdiagonal. (exists pfa_gap_associates_RDcopy_productcoefficientscoefficientdiagonalbound. pfa_gap_associates_RDcopy_productcoefficientscoefficientdiagonalbound + S (pfc_index_associates_RDcopy_productcoefficientscoefficientdiagonal) = (S (pfc_index_associates_RDcopy_productcoefficients))) -> exists pfc_value_associates_RDcopy_productcoefficientscoefficientdiagonal. ((((exists ff_h_pfp_associates_RDcopy_productcoefficientscoefficientdiagonalentry. ff_h_pfp_associates_RDcopy_productcoefficientscoefficientdiagonalentry + S (pfc_value_associates_RDcopy_productcoefficientscoefficientdiagonal) = S ((S (pfc_index_associates_RDcopy_productcoefficientscoefficientdiagonal)) * pfc_terms_scale_associates_RDcopy_productcoefficientscoefficient)) /\ exists ff_q_pfp_associates_RDcopy_productcoefficientscoefficientdiagonalentry. pfc_terms_code_associates_RDcopy_productcoefficientscoefficient = ff_q_pfp_associates_RDcopy_productcoefficientscoefficientdiagonalentry * S ((S (pfc_index_associates_RDcopy_productcoefficientscoefficientdiagonal)) * pfc_terms_scale_associates_RDcopy_productcoefficientscoefficient) + (pfc_value_associates_RDcopy_productcoefficientscoefficientdiagonal))) /\ ((exists pfc_complement_associates_RDcopy_productcoefficientscoefficientdiagonalterm pfc_left_associates_RDcopy_productcoefficientscoefficientdiagonalterm pfc_right_associates_RDcopy_productcoefficientscoefficientdiagonalterm. (((pfc_index_associates_RDcopy_productcoefficientscoefficientdiagonal)+pfc_complement_associates_RDcopy_productcoefficientscoefficientdiagonalterm=(pfc_index_associates_RDcopy_productcoefficients)) /\ ((((((exists pfa_gap_associates_RDcopy_productcoefficientscoefficientdiagonaltermleftinside. pfa_gap_associates_RDcopy_productcoefficientscoefficientdiagonaltermleftinside + S (pfc_index_associates_RDcopy_productcoefficientscoefficientdiagonal) = (pfgu_Q_associates_RDcopy)) /\ ((((exists ff_h_pfp_associates_RDcopy_productcoefficientscoefficientdiagonaltermleftentry. ff_h_pfp_associates_RDcopy_productcoefficientscoefficientdiagonaltermleftentry + S (pfc_left_associates_RDcopy_productcoefficientscoefficientdiagonalterm) = S ((S (pfc_index_associates_RDcopy_productcoefficientscoefficientdiagonal)) * pfgu_qc_associates_RDcopy)) /\ exists ff_q_pfp_associates_RDcopy_productcoefficientscoefficientdiagonaltermleftentry. pfgu_qb_associates_RDcopy = ff_q_pfp_associates_RDcopy_productcoefficientscoefficientdiagonaltermleftentry * S ((S (pfc_index_associates_RDcopy_productcoefficientscoefficientdiagonal)) * pfgu_qc_associates_RDcopy) + (pfc_left_associates_RDcopy_productcoefficientscoefficientdiagonalterm)))))) \/ (((exists pfc_gap_associates_RDcopy_productcoefficientscoefficientdiagonaltermleftoutside. pfc_gap_associates_RDcopy_productcoefficientscoefficientdiagonaltermleftoutside+(pfgu_Q_associates_RDcopy)=(pfc_index_associates_RDcopy_productcoefficientscoefficientdiagonal)) /\ (((pfc_left_associates_RDcopy_productcoefficientscoefficientdiagonalterm)=0))))) /\ ((((((exists pfa_gap_associates_RDcopy_productcoefficientscoefficientdiagonaltermrightinside. pfa_gap_associates_RDcopy_productcoefficientscoefficientdiagonaltermrightinside + S (pfc_complement_associates_RDcopy_productcoefficientscoefficientdiagonalterm) = (G)) /\ ((((exists ff_h_pfp_associates_RDcopy_productcoefficientscoefficientdiagonaltermrightentry. ff_h_pfp_associates_RDcopy_productcoefficientscoefficientdiagonaltermrightentry + S (pfc_right_associates_RDcopy_productcoefficientscoefficientdiagonalterm) = S ((S (pfc_complement_associates_RDcopy_productcoefficientscoefficientdiagonalterm)) * gc)) /\ exists ff_q_pfp_associates_RDcopy_productcoefficientscoefficientdiagonaltermrightentry. gb = ff_q_pfp_associates_RDcopy_productcoefficientscoefficientdiagonaltermrightentry * S ((S (pfc_complement_associates_RDcopy_productcoefficientscoefficientdiagonalterm)) * gc) + (pfc_right_associates_RDcopy_productcoefficientscoefficientdiagonalterm)))))) \/ (((exists pfc_gap_associates_RDcopy_productcoefficientscoefficientdiagonaltermrightoutside. pfc_gap_associates_RDcopy_productcoefficientscoefficientdiagonaltermrightoutside+(G)=(pfc_complement_associates_RDcopy_productcoefficientscoefficientdiagonalterm)) /\ (((pfc_right_associates_RDcopy_productcoefficientscoefficientdiagonalterm)=0))))) /\ (((pfc_value_associates_RDcopy_productcoefficientscoefficientdiagonal)=pfc_left_associates_RDcopy_productcoefficientscoefficientdiagonalterm*pfc_right_associates_RDcopy_productcoefficientscoefficientdiagonalterm))))))))))) /\ (((exists fs_u_pfc_associates_RDcopy_productcoefficientscoefficientsum fs_v_pfc_associates_RDcopy_productcoefficientscoefficientsum. ((((exists fs_h_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_start. fs_h_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_start + S (0) = S ((S (0)) * fs_v_pfc_associates_RDcopy_productcoefficientscoefficientsum)) /\ exists fs_q_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_start. fs_u_pfc_associates_RDcopy_productcoefficientscoefficientsum = fs_q_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_start * S ((S (0)) * fs_v_pfc_associates_RDcopy_productcoefficientscoefficientsum) + (0))) /\ ((((exists fs_h_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_terminal. fs_h_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_terminal + S (pfc_natural_sum_associates_RDcopy_productcoefficientscoefficient) = S ((S (S (pfc_index_associates_RDcopy_productcoefficients))) * fs_v_pfc_associates_RDcopy_productcoefficientscoefficientsum)) /\ exists fs_q_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_terminal. fs_u_pfc_associates_RDcopy_productcoefficientscoefficientsum = fs_q_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_terminal * S ((S (S (pfc_index_associates_RDcopy_productcoefficients))) * fs_v_pfc_associates_RDcopy_productcoefficientscoefficientsum) + (pfc_natural_sum_associates_RDcopy_productcoefficientscoefficient))) /\ forall fs_i_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps. (exists fs_lt_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps_bound. fs_lt_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps_bound + S fs_i_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps = S (pfc_index_associates_RDcopy_productcoefficients)) -> exists fs_a_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps fs_r_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps fs_s_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps. ((((exists fs_h_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps_summand. fs_h_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps_summand + S (fs_a_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps) = S ((S (fs_i_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps)) * pfc_terms_scale_associates_RDcopy_productcoefficientscoefficient)) /\ exists fs_q_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps_summand. pfc_terms_code_associates_RDcopy_productcoefficientscoefficient = fs_q_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps_summand * S ((S (fs_i_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps)) * pfc_terms_scale_associates_RDcopy_productcoefficientscoefficient) + (fs_a_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps))) /\ ((((exists fs_h_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps_partial. fs_h_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps_partial + S (fs_r_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps) = S ((S (fs_i_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps)) * fs_v_pfc_associates_RDcopy_productcoefficientscoefficientsum)) /\ exists fs_q_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps_partial. fs_u_pfc_associates_RDcopy_productcoefficientscoefficientsum = fs_q_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps_partial * S ((S (fs_i_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps)) * fs_v_pfc_associates_RDcopy_productcoefficientscoefficientsum) + (fs_r_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps))) /\ ((((exists fs_h_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps_successor. fs_h_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps_successor + S (fs_s_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps) = S ((S (S fs_i_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps)) * fs_v_pfc_associates_RDcopy_productcoefficientscoefficientsum)) /\ exists fs_q_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps_successor. fs_u_pfc_associates_RDcopy_productcoefficientscoefficientsum = fs_q_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps_successor * S ((S (S fs_i_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps)) * fs_v_pfc_associates_RDcopy_productcoefficientscoefficientsum) + (fs_s_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps))) /\ fs_s_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps = fs_r_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps + fs_a_pfc_associates_RDcopy_productcoefficientscoefficientsum_body_steps)))))) /\ ((((exists pfa_gap_associates_RDcopy_productcoefficientscoefficientresiduebound. pfa_gap_associates_RDcopy_productcoefficientscoefficientresiduebound + S (pfc_value_associates_RDcopy_productcoefficients) = (p)) /\ ((exists pfa_offset_left_associates_RDcopy_productcoefficientscoefficientresiduecongruence pfa_offset_right_associates_RDcopy_productcoefficientscoefficientresiduecongruence. (pfc_natural_sum_associates_RDcopy_productcoefficientscoefficient) + (p) * pfa_offset_left_associates_RDcopy_productcoefficientscoefficientresiduecongruence = (pfc_value_associates_RDcopy_productcoefficients) + (p) * pfa_offset_right_associates_RDcopy_productcoefficientscoefficientresiduecongruence))))))))))))))))))) /\ ((forall pfrep_power_associates_RDcopy_target pfrep_left_associates_RDcopy_target pfrep_right_associates_RDcopy_target. ((exists pfrep_position_associates_RDcopy_targetfirst. ((pfrep_position_associates_RDcopy_targetfirst+S (pfrep_power_associates_RDcopy_target)=(pfgu_P_associates_RDcopy)) /\ ((((exists ff_h_pfp_associates_RDcopy_targetfirstentry. ff_h_pfp_associates_RDcopy_targetfirstentry + S (pfrep_left_associates_RDcopy_target) = S ((S (pfrep_position_associates_RDcopy_targetfirst)) * pfgu_pc_associates_RDcopy)) /\ exists ff_q_pfp_associates_RDcopy_targetfirstentry. pfgu_pb_associates_RDcopy = ff_q_pfp_associates_RDcopy_targetfirstentry * S ((S (pfrep_position_associates_RDcopy_targetfirst)) * pfgu_pc_associates_RDcopy) + (pfrep_left_associates_RDcopy_target)))))) \/ (((exists pfrep_gap_associates_RDcopy_targetfirstoutside. pfrep_gap_associates_RDcopy_targetfirstoutside+(pfgu_P_associates_RDcopy)=(pfrep_power_associates_RDcopy_target)) /\ (((pfrep_left_associates_RDcopy_target)=0))))) -> ((exists pfrep_position_associates_RDcopy_targetsecond. ((pfrep_position_associates_RDcopy_targetsecond+S (pfrep_power_associates_RDcopy_target)=(H)) /\ ((((exists ff_h_pfp_associates_RDcopy_targetsecondentry. ff_h_pfp_associates_RDcopy_targetsecondentry + S (pfrep_right_associates_RDcopy_target) = S ((S (pfrep_position_associates_RDcopy_targetsecond)) * hc)) /\ exists ff_q_pfp_associates_RDcopy_targetsecondentry. hb = ff_q_pfp_associates_RDcopy_targetsecondentry * S ((S (pfrep_position_associates_RDcopy_targetsecond)) * hc) + (pfrep_right_associates_RDcopy_target)))))) \/ (((exists pfrep_gap_associates_RDcopy_targetsecondoutside. pfrep_gap_associates_RDcopy_targetsecondoutside+(H)=(pfrep_power_associates_RDcopy_target)) /\ (((pfrep_right_associates_RDcopy_target)=0))))) -> pfrep_left_associates_RDcopy_target=pfrep_right_associates_RDcopy_target)))))) - 0097
exact hgh - 0098
rewrite hgl_witness at hcopy - 0099
rewrite hgl_witness at hcopy - 0100
rewrite hgl_witness at hcopy - 0101
rewrite hgl_witness at hcopy - 0102
rewrite hgl_witness at hcopy - 0103
rewrite hgl_witness at hcopy - 0104
rewrite hsame at hcopy - 0105
rewrite hsame at hcopy - 0106
rewrite hsame at hcopy - 0107
exact hcopy - 0108
rewrite hgl_witness - 0109
rewrite hgl_witness - 0110
rewrite hsame - 0111
rewrite hsame - 0112
specialize prime_field_polynomial_monic_equal_degree_right_divides_equivalent (p) - 0113
specialize prime_field_polynomial_monic_equal_degree_right_divides_equivalent (gb) - 0114
specialize prime_field_polynomial_monic_equal_degree_right_divides_equivalent (gc) - 0115
specialize prime_field_polynomial_monic_equal_degree_right_divides_equivalent (hb) - 0116
specialize prime_field_polynomial_monic_equal_degree_right_divides_equivalent (hc) - 0117
specialize prime_field_polynomial_monic_equal_degree_right_divides_equivalent (x) - 0118
apply prime_field_polynomial_monic_equal_degree_right_divides_equivalent - 0119
exact hp - 0120
exact hge - 0121
exact hhe - 0122
exact hr