FP0057

prime_field_of_prime_order_exists

Alpha v34 independently verified · alpha_closed; checked-use authorized; not Stable

For every prime construct all finite arithmetic tables, an exact p-element bijection, every field law, and characteristic p. This is the k=1 case only, not arbitrary prime-power extension fields.

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. (~((p) = 1) /\ forall pfa_factor_left_finite_structure_domain pfa_factor_right_finite_structure_domain. (p) = pfa_factor_left_finite_structure_domain * pfa_factor_right_finite_structure_domain -> pfa_factor_left_finite_structure_domain = 1 \/ pfa_factor_right_finite_structure_domain = 1) -> exists ab ac mb mc nb nc ib ic eb ec. (((((forall pft_index_finite_structuretablesadd. (exists pfa_gap_finite_structuretablesaddprefix. pfa_gap_finite_structuretablesaddprefix + S (pft_index_finite_structuretablesadd) = ((p) * (p))) -> exists pft_value_finite_structuretablesadd. (((((exists ff_h_pft_finite_structuretablesaddpointentry. ff_h_pft_finite_structuretablesaddpointentry + S (pft_value_finite_structuretablesadd) = S ((S (pft_index_finite_structuretablesadd)) * ac)) /\ exists ff_q_pft_finite_structuretablesaddpointentry. ab = ff_q_pft_finite_structuretablesaddpointentry * S ((S (pft_index_finite_structuretablesadd)) * ac) + (pft_value_finite_structuretablesadd))) /\ ((exists pft_row_finite_structuretablesaddpointvalue pft_column_finite_structuretablesaddpointvalue. (((pft_index_finite_structuretablesadd) = pft_row_finite_structuretablesaddpointvalue * (p) + pft_column_finite_structuretablesaddpointvalue) /\ ((((exists pfa_gap_finite_structuretablesaddpointvalueoperationleft. pfa_gap_finite_structuretablesaddpointvalueoperationleft + S (pft_row_finite_structuretablesaddpointvalue) = (p)) /\ (((exists pfa_gap_finite_structuretablesaddpointvalueoperationright. pfa_gap_finite_structuretablesaddpointvalueoperationright + S (pft_column_finite_structuretablesaddpointvalue) = (p)) /\ ((((exists pfa_gap_finite_structuretablesaddpointvalueoperationresultbound. pfa_gap_finite_structuretablesaddpointvalueoperationresultbound + S (pft_value_finite_structuretablesadd) = (p)) /\ ((exists pfa_offset_left_finite_structuretablesaddpointvalueoperationresultcongruence pfa_offset_right_finite_structuretablesaddpointvalueoperationresultcongruence. ((pft_row_finite_structuretablesaddpointvalue) + (pft_column_finite_structuretablesaddpointvalue)) + (p) * pfa_offset_left_finite_structuretablesaddpointvalueoperationresultcongruence = (pft_value_finite_structuretablesadd) + (p) * pfa_offset_right_finite_structuretablesaddpointvalueoperationresultcongruence)))))))))))))))) /\ (((forall pft_index_finite_structuretablesmultiply. (exists pfa_gap_finite_structuretablesmultiplyprefix. pfa_gap_finite_structuretablesmultiplyprefix + S (pft_index_finite_structuretablesmultiply) = ((p) * (p))) -> exists pft_value_finite_structuretablesmultiply. (((((exists ff_h_pft_finite_structuretablesmultiplypointentry. ff_h_pft_finite_structuretablesmultiplypointentry + S (pft_value_finite_structuretablesmultiply) = S ((S (pft_index_finite_structuretablesmultiply)) * mc)) /\ exists ff_q_pft_finite_structuretablesmultiplypointentry. mb = ff_q_pft_finite_structuretablesmultiplypointentry * S ((S (pft_index_finite_structuretablesmultiply)) * mc) + (pft_value_finite_structuretablesmultiply))) /\ ((exists pft_row_finite_structuretablesmultiplypointvalue pft_column_finite_structuretablesmultiplypointvalue. (((pft_index_finite_structuretablesmultiply) = pft_row_finite_structuretablesmultiplypointvalue * (p) + pft_column_finite_structuretablesmultiplypointvalue) /\ ((((exists pfa_gap_finite_structuretablesmultiplypointvalueoperationleft. pfa_gap_finite_structuretablesmultiplypointvalueoperationleft + S (pft_row_finite_structuretablesmultiplypointvalue) = (p)) /\ (((exists pfa_gap_finite_structuretablesmultiplypointvalueoperationright. pfa_gap_finite_structuretablesmultiplypointvalueoperationright + S (pft_column_finite_structuretablesmultiplypointvalue) = (p)) /\ ((((exists pfa_gap_finite_structuretablesmultiplypointvalueoperationresultbound. pfa_gap_finite_structuretablesmultiplypointvalueoperationresultbound + S (pft_value_finite_structuretablesmultiply) = (p)) /\ ((exists pfa_offset_left_finite_structuretablesmultiplypointvalueoperationresultcongruence pfa_offset_right_finite_structuretablesmultiplypointvalueoperationresultcongruence. ((pft_row_finite_structuretablesmultiplypointvalue) * (pft_column_finite_structuretablesmultiplypointvalue)) + (p) * pfa_offset_left_finite_structuretablesmultiplypointvalueoperationresultcongruence = (pft_value_finite_structuretablesmultiply) + (p) * pfa_offset_right_finite_structuretablesmultiplypointvalueoperationresultcongruence)))))))))))))))) /\ (((forall pft_index_finite_structuretablesnegate. (exists pfa_gap_finite_structuretablesnegateprefix. pfa_gap_finite_structuretablesnegateprefix + S (pft_index_finite_structuretablesnegate) = (p)) -> exists pft_value_finite_structuretablesnegate. (((((exists ff_h_pft_finite_structuretablesnegatepointentry. ff_h_pft_finite_structuretablesnegatepointentry + S (pft_value_finite_structuretablesnegate) = S ((S (pft_index_finite_structuretablesnegate)) * nc)) /\ exists ff_q_pft_finite_structuretablesnegatepointentry. nb = ff_q_pft_finite_structuretablesnegatepointentry * S ((S (pft_index_finite_structuretablesnegate)) * nc) + (pft_value_finite_structuretablesnegate))) /\ ((((exists pfa_gap_finite_structuretablesnegatepointvalueadditionleft. pfa_gap_finite_structuretablesnegatepointvalueadditionleft + S (pft_index_finite_structuretablesnegate) = (p)) /\ (((exists pfa_gap_finite_structuretablesnegatepointvalueadditionright. pfa_gap_finite_structuretablesnegatepointvalueadditionright + S (pft_value_finite_structuretablesnegate) = (p)) /\ ((((exists pfa_gap_finite_structuretablesnegatepointvalueadditionresultbound. pfa_gap_finite_structuretablesnegatepointvalueadditionresultbound + S (0) = (p)) /\ ((exists pfa_offset_left_finite_structuretablesnegatepointvalueadditionresultcongruence pfa_offset_right_finite_structuretablesnegatepointvalueadditionresultcongruence. ((pft_index_finite_structuretablesnegate) + (pft_value_finite_structuretablesnegate)) + (p) * pfa_offset_left_finite_structuretablesnegatepointvalueadditionresultcongruence = (0) + (p) * pfa_offset_right_finite_structuretablesnegatepointvalueadditionresultcongruence))))))))))))) /\ ((forall pft_index_finite_structuretablesinverse. (exists pfa_gap_finite_structuretablesinverseprefix. pfa_gap_finite_structuretablesinverseprefix + S (pft_index_finite_structuretablesinverse) = (p)) -> exists pft_value_finite_structuretablesinverse. (((((exists ff_h_pft_finite_structuretablesinversepointentry. ff_h_pft_finite_structuretablesinversepointentry + S (pft_value_finite_structuretablesinverse) = S ((S (pft_index_finite_structuretablesinverse)) * ic)) /\ exists ff_q_pft_finite_structuretablesinversepointentry. ib = ff_q_pft_finite_structuretablesinversepointentry * S ((S (pft_index_finite_structuretablesinverse)) * ic) + (pft_value_finite_structuretablesinverse))) /\ ((((exists pfa_gap_finite_structuretablesinversepointvalueinput. pfa_gap_finite_structuretablesinversepointvalueinput + S (pft_index_finite_structuretablesinverse) = (p)) /\ (((exists pfa_gap_finite_structuretablesinversepointvalueoutput. pfa_gap_finite_structuretablesinversepointvalueoutput + S (pft_value_finite_structuretablesinverse) = (p)) /\ ((((pft_index_finite_structuretablesinverse) = 0 /\ (pft_value_finite_structuretablesinverse) = 0) \/ (((~((pft_index_finite_structuretablesinverse) = 0)) /\ ((((exists pfa_gap_finite_structuretablesinversepointvaluenonzeromultiplicationleft. pfa_gap_finite_structuretablesinversepointvaluenonzeromultiplicationleft + S (pft_index_finite_structuretablesinverse) = (p)) /\ (((exists pfa_gap_finite_structuretablesinversepointvaluenonzeromultiplicationright. pfa_gap_finite_structuretablesinversepointvaluenonzeromultiplicationright + S (pft_value_finite_structuretablesinverse) = (p)) /\ ((((exists pfa_gap_finite_structuretablesinversepointvaluenonzeromultiplicationresultbound. pfa_gap_finite_structuretablesinversepointvaluenonzeromultiplicationresultbound + S (1) = (p)) /\ ((exists pfa_offset_left_finite_structuretablesinversepointvaluenonzeromultiplicationresultcongruence pfa_offset_right_finite_structuretablesinversepointvaluenonzeromultiplicationresultcongruence. ((pft_index_finite_structuretablesinverse) * (pft_value_finite_structuretablesinverse)) + (p) * pfa_offset_left_finite_structuretablesinversepointvaluenonzeromultiplicationresultcongruence = (1) + (p) * pfa_offset_right_finite_structuretablesinversepointvaluenonzeromultiplicationresultcongruence))))))))))))))))))))))))))))) /\ (((((forall pff_enumeration_index_finite_structurecardinalityenumeration. (exists pfa_gap_finite_structurecardinalityenumerationbound. pfa_gap_finite_structurecardinalityenumerationbound + S (pff_enumeration_index_finite_structurecardinalityenumeration) = (p)) -> (((exists ff_h_pft_finite_structurecardinalityenumerationentry. ff_h_pft_finite_structurecardinalityenumerationentry + S (pff_enumeration_index_finite_structurecardinalityenumeration) = S ((S (pff_enumeration_index_finite_structurecardinalityenumeration)) * ec)) /\ exists ff_q_pft_finite_structurecardinalityenumerationentry. eb = ff_q_pft_finite_structurecardinalityenumerationentry * S ((S (pff_enumeration_index_finite_structurecardinalityenumeration)) * ec) + (pff_enumeration_index_finite_structurecardinalityenumeration)))) /\ (((forall pff_cardinality_i_finite_structurecardinality pff_cardinality_a_finite_structurecardinality. (exists pfa_gap_finite_structurecardinalitybounded_index. pfa_gap_finite_structurecardinalitybounded_index + S (pff_cardinality_i_finite_structurecardinality) = (p)) -> (((exists ff_h_pft_finite_structurecardinalitybounded_entry. ff_h_pft_finite_structurecardinalitybounded_entry + S (pff_cardinality_a_finite_structurecardinality) = S ((S (pff_cardinality_i_finite_structurecardinality)) * ec)) /\ exists ff_q_pft_finite_structurecardinalitybounded_entry. eb = ff_q_pft_finite_structurecardinalitybounded_entry * S ((S (pff_cardinality_i_finite_structurecardinality)) * ec) + (pff_cardinality_a_finite_structurecardinality))) -> (exists pfa_gap_finite_structurecardinalitybounded_value. pfa_gap_finite_structurecardinalitybounded_value + S (pff_cardinality_a_finite_structurecardinality) = (p))) /\ (((forall pff_cardinality_i_finite_structurecardinality pff_cardinality_j_finite_structurecardinality pff_cardinality_a_finite_structurecardinality. (exists pfa_gap_finite_structurecardinalityinjective_i. pfa_gap_finite_structurecardinalityinjective_i + S (pff_cardinality_i_finite_structurecardinality) = (p)) -> (exists pfa_gap_finite_structurecardinalityinjective_j. pfa_gap_finite_structurecardinalityinjective_j + S (pff_cardinality_j_finite_structurecardinality) = (p)) -> (((exists ff_h_pft_finite_structurecardinalityinjective_first. ff_h_pft_finite_structurecardinalityinjective_first + S (pff_cardinality_a_finite_structurecardinality) = S ((S (pff_cardinality_i_finite_structurecardinality)) * ec)) /\ exists ff_q_pft_finite_structurecardinalityinjective_first. eb = ff_q_pft_finite_structurecardinalityinjective_first * S ((S (pff_cardinality_i_finite_structurecardinality)) * ec) + (pff_cardinality_a_finite_structurecardinality))) -> (((exists ff_h_pft_finite_structurecardinalityinjective_second. ff_h_pft_finite_structurecardinalityinjective_second + S (pff_cardinality_a_finite_structurecardinality) = S ((S (pff_cardinality_j_finite_structurecardinality)) * ec)) /\ exists ff_q_pft_finite_structurecardinalityinjective_second. eb = ff_q_pft_finite_structurecardinalityinjective_second * S ((S (pff_cardinality_j_finite_structurecardinality)) * ec) + (pff_cardinality_a_finite_structurecardinality))) -> pff_cardinality_i_finite_structurecardinality = pff_cardinality_j_finite_structurecardinality) /\ ((forall pff_cardinality_a_finite_structurecardinality. (exists pfa_gap_finite_structurecardinalitysurjective_value. pfa_gap_finite_structurecardinalitysurjective_value + S (pff_cardinality_a_finite_structurecardinality) = (p)) -> exists pff_cardinality_i_finite_structurecardinality. (exists pfa_gap_finite_structurecardinalitysurjective_index. pfa_gap_finite_structurecardinalitysurjective_index + S (pff_cardinality_i_finite_structurecardinality) = (p)) /\ (((exists ff_h_pft_finite_structurecardinalitysurjective_entry. ff_h_pft_finite_structurecardinalitysurjective_entry + S (pff_cardinality_a_finite_structurecardinality) = S ((S (pff_cardinality_i_finite_structurecardinality)) * ec)) /\ exists ff_q_pft_finite_structurecardinalitysurjective_entry. eb = ff_q_pft_finite_structurecardinalitysurjective_entry * S ((S (pff_cardinality_i_finite_structurecardinality)) * ec) + (pff_cardinality_a_finite_structurecardinality))))))))))) /\ (((((exists pfa_gap_finite_structurelawszero. pfa_gap_finite_structurelawszero + S (0) = (p)) /\ (((exists pfa_gap_finite_structurelawsone. pfa_gap_finite_structurelawsone + S (1) = (p)) /\ (((~(0 = 1)) /\ (((forall pfa_law_a_finite_structurelaws pfa_law_b_finite_structurelaws. (exists pfa_gap_finite_structurelawsaddleft. pfa_gap_finite_structurelawsaddleft + S (pfa_law_a_finite_structurelaws) = (p)) -> (exists pfa_gap_finite_structurelawsaddright. pfa_gap_finite_structurelawsaddright + S (pfa_law_b_finite_structurelaws) = (p)) -> exists pfa_law_c_finite_structurelaws. (((exists pfa_gap_finite_structurelawsaddchosenleft. pfa_gap_finite_structurelawsaddchosenleft + S (pfa_law_a_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsaddchosenright. pfa_gap_finite_structurelawsaddchosenright + S (pfa_law_b_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsaddchosenresultbound. pfa_gap_finite_structurelawsaddchosenresultbound + S (pfa_law_c_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsaddchosenresultcongruence pfa_offset_right_finite_structurelawsaddchosenresultcongruence. ((pfa_law_a_finite_structurelaws) + (pfa_law_b_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsaddchosenresultcongruence = (pfa_law_c_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsaddchosenresultcongruence))))))))) /\ forall pfa_law_d_finite_structurelaws. (((exists pfa_gap_finite_structurelawsaddotherleft. pfa_gap_finite_structurelawsaddotherleft + S (pfa_law_a_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsaddotherright. pfa_gap_finite_structurelawsaddotherright + S (pfa_law_b_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsaddotherresultbound. pfa_gap_finite_structurelawsaddotherresultbound + S (pfa_law_d_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsaddotherresultcongruence pfa_offset_right_finite_structurelawsaddotherresultcongruence. ((pfa_law_a_finite_structurelaws) + (pfa_law_b_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsaddotherresultcongruence = (pfa_law_d_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsaddotherresultcongruence))))))))) -> pfa_law_d_finite_structurelaws = pfa_law_c_finite_structurelaws) /\ (((forall pfa_law_a_finite_structurelaws pfa_law_b_finite_structurelaws pfa_law_c_finite_structurelaws. (((exists pfa_gap_finite_structurelawsaddcomm_firstleft. pfa_gap_finite_structurelawsaddcomm_firstleft + S (pfa_law_a_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsaddcomm_firstright. pfa_gap_finite_structurelawsaddcomm_firstright + S (pfa_law_b_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsaddcomm_firstresultbound. pfa_gap_finite_structurelawsaddcomm_firstresultbound + S (pfa_law_c_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsaddcomm_firstresultcongruence pfa_offset_right_finite_structurelawsaddcomm_firstresultcongruence. ((pfa_law_a_finite_structurelaws) + (pfa_law_b_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsaddcomm_firstresultcongruence = (pfa_law_c_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsaddcomm_firstresultcongruence))))))))) -> (((exists pfa_gap_finite_structurelawsaddcomm_secondleft. pfa_gap_finite_structurelawsaddcomm_secondleft + S (pfa_law_b_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsaddcomm_secondright. pfa_gap_finite_structurelawsaddcomm_secondright + S (pfa_law_a_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsaddcomm_secondresultbound. pfa_gap_finite_structurelawsaddcomm_secondresultbound + S (pfa_law_c_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsaddcomm_secondresultcongruence pfa_offset_right_finite_structurelawsaddcomm_secondresultcongruence. ((pfa_law_b_finite_structurelaws) + (pfa_law_a_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsaddcomm_secondresultcongruence = (pfa_law_c_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsaddcomm_secondresultcongruence)))))))))) /\ (((forall pfa_law_a_finite_structurelaws pfa_law_b_finite_structurelaws pfa_law_c_finite_structurelaws pfa_law_x_finite_structurelaws pfa_law_y_finite_structurelaws pfa_law_u_finite_structurelaws pfa_law_v_finite_structurelaws. (((exists pfa_gap_finite_structurelawsaddassoc_firstleft. pfa_gap_finite_structurelawsaddassoc_firstleft + S (pfa_law_a_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsaddassoc_firstright. pfa_gap_finite_structurelawsaddassoc_firstright + S (pfa_law_b_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsaddassoc_firstresultbound. pfa_gap_finite_structurelawsaddassoc_firstresultbound + S (pfa_law_x_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsaddassoc_firstresultcongruence pfa_offset_right_finite_structurelawsaddassoc_firstresultcongruence. ((pfa_law_a_finite_structurelaws) + (pfa_law_b_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsaddassoc_firstresultcongruence = (pfa_law_x_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsaddassoc_firstresultcongruence))))))))) -> (((exists pfa_gap_finite_structurelawsaddassoc_leftleft. pfa_gap_finite_structurelawsaddassoc_leftleft + S (pfa_law_x_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsaddassoc_leftright. pfa_gap_finite_structurelawsaddassoc_leftright + S (pfa_law_c_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsaddassoc_leftresultbound. pfa_gap_finite_structurelawsaddassoc_leftresultbound + S (pfa_law_u_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsaddassoc_leftresultcongruence pfa_offset_right_finite_structurelawsaddassoc_leftresultcongruence. ((pfa_law_x_finite_structurelaws) + (pfa_law_c_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsaddassoc_leftresultcongruence = (pfa_law_u_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsaddassoc_leftresultcongruence))))))))) -> (((exists pfa_gap_finite_structurelawsaddassoc_secondleft. pfa_gap_finite_structurelawsaddassoc_secondleft + S (pfa_law_b_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsaddassoc_secondright. pfa_gap_finite_structurelawsaddassoc_secondright + S (pfa_law_c_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsaddassoc_secondresultbound. pfa_gap_finite_structurelawsaddassoc_secondresultbound + S (pfa_law_y_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsaddassoc_secondresultcongruence pfa_offset_right_finite_structurelawsaddassoc_secondresultcongruence. ((pfa_law_b_finite_structurelaws) + (pfa_law_c_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsaddassoc_secondresultcongruence = (pfa_law_y_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsaddassoc_secondresultcongruence))))))))) -> (((exists pfa_gap_finite_structurelawsaddassoc_rightleft. pfa_gap_finite_structurelawsaddassoc_rightleft + S (pfa_law_a_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsaddassoc_rightright. pfa_gap_finite_structurelawsaddassoc_rightright + S (pfa_law_y_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsaddassoc_rightresultbound. pfa_gap_finite_structurelawsaddassoc_rightresultbound + S (pfa_law_v_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsaddassoc_rightresultcongruence pfa_offset_right_finite_structurelawsaddassoc_rightresultcongruence. ((pfa_law_a_finite_structurelaws) + (pfa_law_y_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsaddassoc_rightresultcongruence = (pfa_law_v_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsaddassoc_rightresultcongruence))))))))) -> pfa_law_u_finite_structurelaws = pfa_law_v_finite_structurelaws) /\ (((forall pfa_law_a_finite_structurelaws pfa_law_b_finite_structurelaws. (exists pfa_gap_finite_structurelawsmultiplyleft. pfa_gap_finite_structurelawsmultiplyleft + S (pfa_law_a_finite_structurelaws) = (p)) -> (exists pfa_gap_finite_structurelawsmultiplyright. pfa_gap_finite_structurelawsmultiplyright + S (pfa_law_b_finite_structurelaws) = (p)) -> exists pfa_law_c_finite_structurelaws. (((exists pfa_gap_finite_structurelawsmultiplychosenleft. pfa_gap_finite_structurelawsmultiplychosenleft + S (pfa_law_a_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsmultiplychosenright. pfa_gap_finite_structurelawsmultiplychosenright + S (pfa_law_b_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsmultiplychosenresultbound. pfa_gap_finite_structurelawsmultiplychosenresultbound + S (pfa_law_c_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsmultiplychosenresultcongruence pfa_offset_right_finite_structurelawsmultiplychosenresultcongruence. ((pfa_law_a_finite_structurelaws) * (pfa_law_b_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsmultiplychosenresultcongruence = (pfa_law_c_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsmultiplychosenresultcongruence))))))))) /\ forall pfa_law_d_finite_structurelaws. (((exists pfa_gap_finite_structurelawsmultiplyotherleft. pfa_gap_finite_structurelawsmultiplyotherleft + S (pfa_law_a_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsmultiplyotherright. pfa_gap_finite_structurelawsmultiplyotherright + S (pfa_law_b_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsmultiplyotherresultbound. pfa_gap_finite_structurelawsmultiplyotherresultbound + S (pfa_law_d_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsmultiplyotherresultcongruence pfa_offset_right_finite_structurelawsmultiplyotherresultcongruence. ((pfa_law_a_finite_structurelaws) * (pfa_law_b_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsmultiplyotherresultcongruence = (pfa_law_d_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsmultiplyotherresultcongruence))))))))) -> pfa_law_d_finite_structurelaws = pfa_law_c_finite_structurelaws) /\ (((forall pfa_law_a_finite_structurelaws pfa_law_b_finite_structurelaws pfa_law_c_finite_structurelaws. (((exists pfa_gap_finite_structurelawsmultiplycomm_firstleft. pfa_gap_finite_structurelawsmultiplycomm_firstleft + S (pfa_law_a_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsmultiplycomm_firstright. pfa_gap_finite_structurelawsmultiplycomm_firstright + S (pfa_law_b_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsmultiplycomm_firstresultbound. pfa_gap_finite_structurelawsmultiplycomm_firstresultbound + S (pfa_law_c_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsmultiplycomm_firstresultcongruence pfa_offset_right_finite_structurelawsmultiplycomm_firstresultcongruence. ((pfa_law_a_finite_structurelaws) * (pfa_law_b_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsmultiplycomm_firstresultcongruence = (pfa_law_c_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsmultiplycomm_firstresultcongruence))))))))) -> (((exists pfa_gap_finite_structurelawsmultiplycomm_secondleft. pfa_gap_finite_structurelawsmultiplycomm_secondleft + S (pfa_law_b_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsmultiplycomm_secondright. pfa_gap_finite_structurelawsmultiplycomm_secondright + S (pfa_law_a_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsmultiplycomm_secondresultbound. pfa_gap_finite_structurelawsmultiplycomm_secondresultbound + S (pfa_law_c_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsmultiplycomm_secondresultcongruence pfa_offset_right_finite_structurelawsmultiplycomm_secondresultcongruence. ((pfa_law_b_finite_structurelaws) * (pfa_law_a_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsmultiplycomm_secondresultcongruence = (pfa_law_c_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsmultiplycomm_secondresultcongruence)))))))))) /\ (((forall pfa_law_a_finite_structurelaws pfa_law_b_finite_structurelaws pfa_law_c_finite_structurelaws pfa_law_x_finite_structurelaws pfa_law_y_finite_structurelaws pfa_law_u_finite_structurelaws pfa_law_v_finite_structurelaws. (((exists pfa_gap_finite_structurelawsmultiplyassoc_firstleft. pfa_gap_finite_structurelawsmultiplyassoc_firstleft + S (pfa_law_a_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsmultiplyassoc_firstright. pfa_gap_finite_structurelawsmultiplyassoc_firstright + S (pfa_law_b_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsmultiplyassoc_firstresultbound. pfa_gap_finite_structurelawsmultiplyassoc_firstresultbound + S (pfa_law_x_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsmultiplyassoc_firstresultcongruence pfa_offset_right_finite_structurelawsmultiplyassoc_firstresultcongruence. ((pfa_law_a_finite_structurelaws) * (pfa_law_b_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsmultiplyassoc_firstresultcongruence = (pfa_law_x_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsmultiplyassoc_firstresultcongruence))))))))) -> (((exists pfa_gap_finite_structurelawsmultiplyassoc_leftleft. pfa_gap_finite_structurelawsmultiplyassoc_leftleft + S (pfa_law_x_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsmultiplyassoc_leftright. pfa_gap_finite_structurelawsmultiplyassoc_leftright + S (pfa_law_c_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsmultiplyassoc_leftresultbound. pfa_gap_finite_structurelawsmultiplyassoc_leftresultbound + S (pfa_law_u_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsmultiplyassoc_leftresultcongruence pfa_offset_right_finite_structurelawsmultiplyassoc_leftresultcongruence. ((pfa_law_x_finite_structurelaws) * (pfa_law_c_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsmultiplyassoc_leftresultcongruence = (pfa_law_u_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsmultiplyassoc_leftresultcongruence))))))))) -> (((exists pfa_gap_finite_structurelawsmultiplyassoc_secondleft. pfa_gap_finite_structurelawsmultiplyassoc_secondleft + S (pfa_law_b_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsmultiplyassoc_secondright. pfa_gap_finite_structurelawsmultiplyassoc_secondright + S (pfa_law_c_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsmultiplyassoc_secondresultbound. pfa_gap_finite_structurelawsmultiplyassoc_secondresultbound + S (pfa_law_y_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsmultiplyassoc_secondresultcongruence pfa_offset_right_finite_structurelawsmultiplyassoc_secondresultcongruence. ((pfa_law_b_finite_structurelaws) * (pfa_law_c_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsmultiplyassoc_secondresultcongruence = (pfa_law_y_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsmultiplyassoc_secondresultcongruence))))))))) -> (((exists pfa_gap_finite_structurelawsmultiplyassoc_rightleft. pfa_gap_finite_structurelawsmultiplyassoc_rightleft + S (pfa_law_a_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsmultiplyassoc_rightright. pfa_gap_finite_structurelawsmultiplyassoc_rightright + S (pfa_law_y_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsmultiplyassoc_rightresultbound. pfa_gap_finite_structurelawsmultiplyassoc_rightresultbound + S (pfa_law_v_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsmultiplyassoc_rightresultcongruence pfa_offset_right_finite_structurelawsmultiplyassoc_rightresultcongruence. ((pfa_law_a_finite_structurelaws) * (pfa_law_y_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsmultiplyassoc_rightresultcongruence = (pfa_law_v_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsmultiplyassoc_rightresultcongruence))))))))) -> pfa_law_u_finite_structurelaws = pfa_law_v_finite_structurelaws) /\ (((forall pfa_law_a_finite_structurelaws pfa_law_b_finite_structurelaws pfa_law_c_finite_structurelaws pfa_law_s_finite_structurelaws pfa_law_x_finite_structurelaws pfa_law_y_finite_structurelaws pfa_law_u_finite_structurelaws pfa_law_v_finite_structurelaws. (((exists pfa_gap_finite_structurelawsleftdistribution_sumleft. pfa_gap_finite_structurelawsleftdistribution_sumleft + S (pfa_law_b_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsleftdistribution_sumright. pfa_gap_finite_structurelawsleftdistribution_sumright + S (pfa_law_c_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsleftdistribution_sumresultbound. pfa_gap_finite_structurelawsleftdistribution_sumresultbound + S (pfa_law_s_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsleftdistribution_sumresultcongruence pfa_offset_right_finite_structurelawsleftdistribution_sumresultcongruence. ((pfa_law_b_finite_structurelaws) + (pfa_law_c_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsleftdistribution_sumresultcongruence = (pfa_law_s_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsleftdistribution_sumresultcongruence))))))))) -> (((exists pfa_gap_finite_structurelawsleftdistribution_leftleft. pfa_gap_finite_structurelawsleftdistribution_leftleft + S (pfa_law_a_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsleftdistribution_leftright. pfa_gap_finite_structurelawsleftdistribution_leftright + S (pfa_law_s_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsleftdistribution_leftresultbound. pfa_gap_finite_structurelawsleftdistribution_leftresultbound + S (pfa_law_u_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsleftdistribution_leftresultcongruence pfa_offset_right_finite_structurelawsleftdistribution_leftresultcongruence. ((pfa_law_a_finite_structurelaws) * (pfa_law_s_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsleftdistribution_leftresultcongruence = (pfa_law_u_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsleftdistribution_leftresultcongruence))))))))) -> (((exists pfa_gap_finite_structurelawsleftdistribution_firstleft. pfa_gap_finite_structurelawsleftdistribution_firstleft + S (pfa_law_a_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsleftdistribution_firstright. pfa_gap_finite_structurelawsleftdistribution_firstright + S (pfa_law_b_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsleftdistribution_firstresultbound. pfa_gap_finite_structurelawsleftdistribution_firstresultbound + S (pfa_law_x_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsleftdistribution_firstresultcongruence pfa_offset_right_finite_structurelawsleftdistribution_firstresultcongruence. ((pfa_law_a_finite_structurelaws) * (pfa_law_b_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsleftdistribution_firstresultcongruence = (pfa_law_x_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsleftdistribution_firstresultcongruence))))))))) -> (((exists pfa_gap_finite_structurelawsleftdistribution_secondleft. pfa_gap_finite_structurelawsleftdistribution_secondleft + S (pfa_law_a_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsleftdistribution_secondright. pfa_gap_finite_structurelawsleftdistribution_secondright + S (pfa_law_c_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsleftdistribution_secondresultbound. pfa_gap_finite_structurelawsleftdistribution_secondresultbound + S (pfa_law_y_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsleftdistribution_secondresultcongruence pfa_offset_right_finite_structurelawsleftdistribution_secondresultcongruence. ((pfa_law_a_finite_structurelaws) * (pfa_law_c_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsleftdistribution_secondresultcongruence = (pfa_law_y_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsleftdistribution_secondresultcongruence))))))))) -> (((exists pfa_gap_finite_structurelawsleftdistribution_rightleft. pfa_gap_finite_structurelawsleftdistribution_rightleft + S (pfa_law_x_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsleftdistribution_rightright. pfa_gap_finite_structurelawsleftdistribution_rightright + S (pfa_law_y_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsleftdistribution_rightresultbound. pfa_gap_finite_structurelawsleftdistribution_rightresultbound + S (pfa_law_v_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsleftdistribution_rightresultcongruence pfa_offset_right_finite_structurelawsleftdistribution_rightresultcongruence. ((pfa_law_x_finite_structurelaws) + (pfa_law_y_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsleftdistribution_rightresultcongruence = (pfa_law_v_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsleftdistribution_rightresultcongruence))))))))) -> pfa_law_u_finite_structurelaws = pfa_law_v_finite_structurelaws) /\ (((forall pfa_law_a_finite_structurelaws pfa_law_b_finite_structurelaws pfa_law_c_finite_structurelaws pfa_law_s_finite_structurelaws pfa_law_x_finite_structurelaws pfa_law_y_finite_structurelaws pfa_law_u_finite_structurelaws pfa_law_v_finite_structurelaws. (((exists pfa_gap_finite_structurelawsrightdistribution_sumleft. pfa_gap_finite_structurelawsrightdistribution_sumleft + S (pfa_law_b_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsrightdistribution_sumright. pfa_gap_finite_structurelawsrightdistribution_sumright + S (pfa_law_c_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsrightdistribution_sumresultbound. pfa_gap_finite_structurelawsrightdistribution_sumresultbound + S (pfa_law_s_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsrightdistribution_sumresultcongruence pfa_offset_right_finite_structurelawsrightdistribution_sumresultcongruence. ((pfa_law_b_finite_structurelaws) + (pfa_law_c_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsrightdistribution_sumresultcongruence = (pfa_law_s_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsrightdistribution_sumresultcongruence))))))))) -> (((exists pfa_gap_finite_structurelawsrightdistribution_leftleft. pfa_gap_finite_structurelawsrightdistribution_leftleft + S (pfa_law_s_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsrightdistribution_leftright. pfa_gap_finite_structurelawsrightdistribution_leftright + S (pfa_law_a_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsrightdistribution_leftresultbound. pfa_gap_finite_structurelawsrightdistribution_leftresultbound + S (pfa_law_u_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsrightdistribution_leftresultcongruence pfa_offset_right_finite_structurelawsrightdistribution_leftresultcongruence. ((pfa_law_s_finite_structurelaws) * (pfa_law_a_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsrightdistribution_leftresultcongruence = (pfa_law_u_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsrightdistribution_leftresultcongruence))))))))) -> (((exists pfa_gap_finite_structurelawsrightdistribution_firstleft. pfa_gap_finite_structurelawsrightdistribution_firstleft + S (pfa_law_b_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsrightdistribution_firstright. pfa_gap_finite_structurelawsrightdistribution_firstright + S (pfa_law_a_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsrightdistribution_firstresultbound. pfa_gap_finite_structurelawsrightdistribution_firstresultbound + S (pfa_law_x_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsrightdistribution_firstresultcongruence pfa_offset_right_finite_structurelawsrightdistribution_firstresultcongruence. ((pfa_law_b_finite_structurelaws) * (pfa_law_a_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsrightdistribution_firstresultcongruence = (pfa_law_x_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsrightdistribution_firstresultcongruence))))))))) -> (((exists pfa_gap_finite_structurelawsrightdistribution_secondleft. pfa_gap_finite_structurelawsrightdistribution_secondleft + S (pfa_law_c_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsrightdistribution_secondright. pfa_gap_finite_structurelawsrightdistribution_secondright + S (pfa_law_a_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsrightdistribution_secondresultbound. pfa_gap_finite_structurelawsrightdistribution_secondresultbound + S (pfa_law_y_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsrightdistribution_secondresultcongruence pfa_offset_right_finite_structurelawsrightdistribution_secondresultcongruence. ((pfa_law_c_finite_structurelaws) * (pfa_law_a_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsrightdistribution_secondresultcongruence = (pfa_law_y_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsrightdistribution_secondresultcongruence))))))))) -> (((exists pfa_gap_finite_structurelawsrightdistribution_rightleft. pfa_gap_finite_structurelawsrightdistribution_rightleft + S (pfa_law_x_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsrightdistribution_rightright. pfa_gap_finite_structurelawsrightdistribution_rightright + S (pfa_law_y_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsrightdistribution_rightresultbound. pfa_gap_finite_structurelawsrightdistribution_rightresultbound + S (pfa_law_v_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsrightdistribution_rightresultcongruence pfa_offset_right_finite_structurelawsrightdistribution_rightresultcongruence. ((pfa_law_x_finite_structurelaws) + (pfa_law_y_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsrightdistribution_rightresultcongruence = (pfa_law_v_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsrightdistribution_rightresultcongruence))))))))) -> pfa_law_u_finite_structurelaws = pfa_law_v_finite_structurelaws) /\ (((forall pfa_law_a_finite_structurelaws. (exists pfa_gap_finite_structurelawsadd_zero_rightinput. pfa_gap_finite_structurelawsadd_zero_rightinput + S (pfa_law_a_finite_structurelaws) = (p)) -> (((exists pfa_gap_finite_structurelawsadd_zero_rightleft. pfa_gap_finite_structurelawsadd_zero_rightleft + S (pfa_law_a_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsadd_zero_rightright. pfa_gap_finite_structurelawsadd_zero_rightright + S (0) = (p)) /\ ((((exists pfa_gap_finite_structurelawsadd_zero_rightresultbound. pfa_gap_finite_structurelawsadd_zero_rightresultbound + S (pfa_law_a_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsadd_zero_rightresultcongruence pfa_offset_right_finite_structurelawsadd_zero_rightresultcongruence. ((pfa_law_a_finite_structurelaws) + (0)) + (p) * pfa_offset_left_finite_structurelawsadd_zero_rightresultcongruence = (pfa_law_a_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsadd_zero_rightresultcongruence)))))))))) /\ (((forall pfa_law_a_finite_structurelaws. (exists pfa_gap_finite_structurelawsadd_zero_leftinput. pfa_gap_finite_structurelawsadd_zero_leftinput + S (pfa_law_a_finite_structurelaws) = (p)) -> (((exists pfa_gap_finite_structurelawsadd_zero_leftleft. pfa_gap_finite_structurelawsadd_zero_leftleft + S (0) = (p)) /\ (((exists pfa_gap_finite_structurelawsadd_zero_leftright. pfa_gap_finite_structurelawsadd_zero_leftright + S (pfa_law_a_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsadd_zero_leftresultbound. pfa_gap_finite_structurelawsadd_zero_leftresultbound + S (pfa_law_a_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsadd_zero_leftresultcongruence pfa_offset_right_finite_structurelawsadd_zero_leftresultcongruence. ((0) + (pfa_law_a_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsadd_zero_leftresultcongruence = (pfa_law_a_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsadd_zero_leftresultcongruence)))))))))) /\ (((forall pfa_law_a_finite_structurelaws. (exists pfa_gap_finite_structurelawsmultiply_one_rightinput. pfa_gap_finite_structurelawsmultiply_one_rightinput + S (pfa_law_a_finite_structurelaws) = (p)) -> (((exists pfa_gap_finite_structurelawsmultiply_one_rightleft. pfa_gap_finite_structurelawsmultiply_one_rightleft + S (pfa_law_a_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsmultiply_one_rightright. pfa_gap_finite_structurelawsmultiply_one_rightright + S (1) = (p)) /\ ((((exists pfa_gap_finite_structurelawsmultiply_one_rightresultbound. pfa_gap_finite_structurelawsmultiply_one_rightresultbound + S (pfa_law_a_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsmultiply_one_rightresultcongruence pfa_offset_right_finite_structurelawsmultiply_one_rightresultcongruence. ((pfa_law_a_finite_structurelaws) * (1)) + (p) * pfa_offset_left_finite_structurelawsmultiply_one_rightresultcongruence = (pfa_law_a_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsmultiply_one_rightresultcongruence)))))))))) /\ (((forall pfa_law_a_finite_structurelaws. (exists pfa_gap_finite_structurelawsmultiply_one_leftinput. pfa_gap_finite_structurelawsmultiply_one_leftinput + S (pfa_law_a_finite_structurelaws) = (p)) -> (((exists pfa_gap_finite_structurelawsmultiply_one_leftleft. pfa_gap_finite_structurelawsmultiply_one_leftleft + S (1) = (p)) /\ (((exists pfa_gap_finite_structurelawsmultiply_one_leftright. pfa_gap_finite_structurelawsmultiply_one_leftright + S (pfa_law_a_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsmultiply_one_leftresultbound. pfa_gap_finite_structurelawsmultiply_one_leftresultbound + S (pfa_law_a_finite_structurelaws) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsmultiply_one_leftresultcongruence pfa_offset_right_finite_structurelawsmultiply_one_leftresultcongruence. ((1) * (pfa_law_a_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsmultiply_one_leftresultcongruence = (pfa_law_a_finite_structurelaws) + (p) * pfa_offset_right_finite_structurelawsmultiply_one_leftresultcongruence)))))))))) /\ (((forall pfa_law_a_finite_structurelaws. (exists pfa_gap_finite_structurelawsmultiply_zero_rightinput. pfa_gap_finite_structurelawsmultiply_zero_rightinput + S (pfa_law_a_finite_structurelaws) = (p)) -> (((exists pfa_gap_finite_structurelawsmultiply_zero_rightleft. pfa_gap_finite_structurelawsmultiply_zero_rightleft + S (pfa_law_a_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsmultiply_zero_rightright. pfa_gap_finite_structurelawsmultiply_zero_rightright + S (0) = (p)) /\ ((((exists pfa_gap_finite_structurelawsmultiply_zero_rightresultbound. pfa_gap_finite_structurelawsmultiply_zero_rightresultbound + S (0) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsmultiply_zero_rightresultcongruence pfa_offset_right_finite_structurelawsmultiply_zero_rightresultcongruence. ((pfa_law_a_finite_structurelaws) * (0)) + (p) * pfa_offset_left_finite_structurelawsmultiply_zero_rightresultcongruence = (0) + (p) * pfa_offset_right_finite_structurelawsmultiply_zero_rightresultcongruence)))))))))) /\ (((forall pfa_law_a_finite_structurelaws. (exists pfa_gap_finite_structurelawsmultiply_zero_leftinput. pfa_gap_finite_structurelawsmultiply_zero_leftinput + S (pfa_law_a_finite_structurelaws) = (p)) -> (((exists pfa_gap_finite_structurelawsmultiply_zero_leftleft. pfa_gap_finite_structurelawsmultiply_zero_leftleft + S (0) = (p)) /\ (((exists pfa_gap_finite_structurelawsmultiply_zero_leftright. pfa_gap_finite_structurelawsmultiply_zero_leftright + S (pfa_law_a_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsmultiply_zero_leftresultbound. pfa_gap_finite_structurelawsmultiply_zero_leftresultbound + S (0) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsmultiply_zero_leftresultcongruence pfa_offset_right_finite_structurelawsmultiply_zero_leftresultcongruence. ((0) * (pfa_law_a_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsmultiply_zero_leftresultcongruence = (0) + (p) * pfa_offset_right_finite_structurelawsmultiply_zero_leftresultcongruence)))))))))) /\ (((forall pfa_law_a_finite_structurelaws. (exists pfa_gap_finite_structurelawsnegateinput. pfa_gap_finite_structurelawsnegateinput + S (pfa_law_a_finite_structurelaws) = (p)) -> exists pfa_law_b_finite_structurelaws. (((exists pfa_gap_finite_structurelawsnegatechosenadditionleft. pfa_gap_finite_structurelawsnegatechosenadditionleft + S (pfa_law_a_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsnegatechosenadditionright. pfa_gap_finite_structurelawsnegatechosenadditionright + S (pfa_law_b_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsnegatechosenadditionresultbound. pfa_gap_finite_structurelawsnegatechosenadditionresultbound + S (0) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsnegatechosenadditionresultcongruence pfa_offset_right_finite_structurelawsnegatechosenadditionresultcongruence. ((pfa_law_a_finite_structurelaws) + (pfa_law_b_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsnegatechosenadditionresultcongruence = (0) + (p) * pfa_offset_right_finite_structurelawsnegatechosenadditionresultcongruence))))))))) /\ forall pfa_law_c_finite_structurelaws. (((exists pfa_gap_finite_structurelawsnegateotheradditionleft. pfa_gap_finite_structurelawsnegateotheradditionleft + S (pfa_law_a_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsnegateotheradditionright. pfa_gap_finite_structurelawsnegateotheradditionright + S (pfa_law_c_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsnegateotheradditionresultbound. pfa_gap_finite_structurelawsnegateotheradditionresultbound + S (0) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsnegateotheradditionresultcongruence pfa_offset_right_finite_structurelawsnegateotheradditionresultcongruence. ((pfa_law_a_finite_structurelaws) + (pfa_law_c_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsnegateotheradditionresultcongruence = (0) + (p) * pfa_offset_right_finite_structurelawsnegateotheradditionresultcongruence))))))))) -> pfa_law_c_finite_structurelaws = pfa_law_b_finite_structurelaws) /\ (((forall pfa_law_a_finite_structurelaws. (exists pfa_gap_finite_structurelawsinverseinput. pfa_gap_finite_structurelawsinverseinput + S (pfa_law_a_finite_structurelaws) = (p)) -> ~(pfa_law_a_finite_structurelaws = 0) -> exists pfa_law_b_finite_structurelaws. (((~((pfa_law_a_finite_structurelaws) = 0)) /\ ((((exists pfa_gap_finite_structurelawsinversechosenmultiplicationleft. pfa_gap_finite_structurelawsinversechosenmultiplicationleft + S (pfa_law_a_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsinversechosenmultiplicationright. pfa_gap_finite_structurelawsinversechosenmultiplicationright + S (pfa_law_b_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsinversechosenmultiplicationresultbound. pfa_gap_finite_structurelawsinversechosenmultiplicationresultbound + S (1) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsinversechosenmultiplicationresultcongruence pfa_offset_right_finite_structurelawsinversechosenmultiplicationresultcongruence. ((pfa_law_a_finite_structurelaws) * (pfa_law_b_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsinversechosenmultiplicationresultcongruence = (1) + (p) * pfa_offset_right_finite_structurelawsinversechosenmultiplicationresultcongruence)))))))))))) /\ forall pfa_law_c_finite_structurelaws. (((~((pfa_law_a_finite_structurelaws) = 0)) /\ ((((exists pfa_gap_finite_structurelawsinverseothermultiplicationleft. pfa_gap_finite_structurelawsinverseothermultiplicationleft + S (pfa_law_a_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsinverseothermultiplicationright. pfa_gap_finite_structurelawsinverseothermultiplicationright + S (pfa_law_c_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsinverseothermultiplicationresultbound. pfa_gap_finite_structurelawsinverseothermultiplicationresultbound + S (1) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsinverseothermultiplicationresultcongruence pfa_offset_right_finite_structurelawsinverseothermultiplicationresultcongruence. ((pfa_law_a_finite_structurelaws) * (pfa_law_c_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsinverseothermultiplicationresultcongruence = (1) + (p) * pfa_offset_right_finite_structurelawsinverseothermultiplicationresultcongruence)))))))))))) -> pfa_law_c_finite_structurelaws = pfa_law_b_finite_structurelaws) /\ ((forall pfa_law_a_finite_structurelaws pfa_law_b_finite_structurelaws. (((exists pfa_gap_finite_structurelawsnozeroleft. pfa_gap_finite_structurelawsnozeroleft + S (pfa_law_a_finite_structurelaws) = (p)) /\ (((exists pfa_gap_finite_structurelawsnozeroright. pfa_gap_finite_structurelawsnozeroright + S (pfa_law_b_finite_structurelaws) = (p)) /\ ((((exists pfa_gap_finite_structurelawsnozeroresultbound. pfa_gap_finite_structurelawsnozeroresultbound + S (0) = (p)) /\ ((exists pfa_offset_left_finite_structurelawsnozeroresultcongruence pfa_offset_right_finite_structurelawsnozeroresultcongruence. ((pfa_law_a_finite_structurelaws) * (pfa_law_b_finite_structurelaws)) + (p) * pfa_offset_left_finite_structurelawsnozeroresultcongruence = (0) + (p) * pfa_offset_right_finite_structurelawsnozeroresultcongruence))))))))) -> pfa_law_a_finite_structurelaws = 0 \/ pfa_law_b_finite_structurelaws = 0)))))))))))))))))))))))))))))))))))))))) /\ ((((exists pff_history_code_finite_structurecharacteristicmodulus pff_history_scale_finite_structurecharacteristicmodulus. (((((exists ff_h_pft_finite_structurecharacteristicmodulushistorystart. ff_h_pft_finite_structurecharacteristicmodulushistorystart + S (0) = S ((S (0)) * pff_history_scale_finite_structurecharacteristicmodulus)) /\ exists ff_q_pft_finite_structurecharacteristicmodulushistorystart. pff_history_code_finite_structurecharacteristicmodulus = ff_q_pft_finite_structurecharacteristicmodulushistorystart * S ((S (0)) * pff_history_scale_finite_structurecharacteristicmodulus) + (0))) /\ (((((exists ff_h_pft_finite_structurecharacteristicmodulushistoryterminal. ff_h_pft_finite_structurecharacteristicmodulushistoryterminal + S (0) = S ((S (p)) * pff_history_scale_finite_structurecharacteristicmodulus)) /\ exists ff_q_pft_finite_structurecharacteristicmodulushistoryterminal. pff_history_code_finite_structurecharacteristicmodulus = ff_q_pft_finite_structurecharacteristicmodulushistoryterminal * S ((S (p)) * pff_history_scale_finite_structurecharacteristicmodulus) + (0))) /\ ((forall pff_trace_index_finite_structurecharacteristicmodulushistorysteps. (exists pfa_gap_finite_structurecharacteristicmodulushistorystepsindex. pfa_gap_finite_structurecharacteristicmodulushistorystepsindex + S (pff_trace_index_finite_structurecharacteristicmodulushistorysteps) = (p)) -> exists pff_trace_before_finite_structurecharacteristicmodulushistorysteps pff_trace_after_finite_structurecharacteristicmodulushistorysteps. ((((exists ff_h_pft_finite_structurecharacteristicmodulushistorystepsbefore. ff_h_pft_finite_structurecharacteristicmodulushistorystepsbefore + S (pff_trace_before_finite_structurecharacteristicmodulushistorysteps) = S ((S (pff_trace_index_finite_structurecharacteristicmodulushistorysteps)) * pff_history_scale_finite_structurecharacteristicmodulus)) /\ exists ff_q_pft_finite_structurecharacteristicmodulushistorystepsbefore. pff_history_code_finite_structurecharacteristicmodulus = ff_q_pft_finite_structurecharacteristicmodulushistorystepsbefore * S ((S (pff_trace_index_finite_structurecharacteristicmodulushistorysteps)) * pff_history_scale_finite_structurecharacteristicmodulus) + (pff_trace_before_finite_structurecharacteristicmodulushistorysteps))) /\ (((((exists ff_h_pft_finite_structurecharacteristicmodulushistorystepsafter. ff_h_pft_finite_structurecharacteristicmodulushistorystepsafter + S (pff_trace_after_finite_structurecharacteristicmodulushistorysteps) = S ((S (S (pff_trace_index_finite_structurecharacteristicmodulushistorysteps))) * pff_history_scale_finite_structurecharacteristicmodulus)) /\ exists ff_q_pft_finite_structurecharacteristicmodulushistorystepsafter. pff_history_code_finite_structurecharacteristicmodulus = ff_q_pft_finite_structurecharacteristicmodulushistorystepsafter * S ((S (S (pff_trace_index_finite_structurecharacteristicmodulushistorysteps))) * pff_history_scale_finite_structurecharacteristicmodulus) + (pff_trace_after_finite_structurecharacteristicmodulushistorysteps))) /\ ((((exists pfa_gap_finite_structurecharacteristicmodulushistorystepsadditionleft. pfa_gap_finite_structurecharacteristicmodulushistorystepsadditionleft + S (pff_trace_before_finite_structurecharacteristicmodulushistorysteps) = (p)) /\ (((exists pfa_gap_finite_structurecharacteristicmodulushistorystepsadditionright. pfa_gap_finite_structurecharacteristicmodulushistorystepsadditionright + S (1) = (p)) /\ ((((exists pfa_gap_finite_structurecharacteristicmodulushistorystepsadditionresultbound. pfa_gap_finite_structurecharacteristicmodulushistorystepsadditionresultbound + S (pff_trace_after_finite_structurecharacteristicmodulushistorysteps) = (p)) /\ ((exists pfa_offset_left_finite_structurecharacteristicmodulushistorystepsadditionresultcongruence pfa_offset_right_finite_structurecharacteristicmodulushistorystepsadditionresultcongruence. ((pff_trace_before_finite_structurecharacteristicmodulushistorysteps) + (1)) + (p) * pfa_offset_left_finite_structurecharacteristicmodulushistorystepsadditionresultcongruence = (pff_trace_after_finite_structurecharacteristicmodulushistorysteps) + (p) * pfa_offset_right_finite_structurecharacteristicmodulushistorystepsadditionresultcongruence)))))))))))))))))))) /\ ((forall pff_smaller_positive_finite_structurecharacteristic. (exists pfa_gap_finite_structurecharacteristicstrict. pfa_gap_finite_structurecharacteristicstrict + S (pff_smaller_positive_finite_structurecharacteristic) = (p)) -> ~(pff_smaller_positive_finite_structurecharacteristic = 0) -> ~(exists pff_history_code_finite_structurecharacteristicsmaller pff_history_scale_finite_structurecharacteristicsmaller. (((((exists ff_h_pft_finite_structurecharacteristicsmallerhistorystart. ff_h_pft_finite_structurecharacteristicsmallerhistorystart + S (0) = S ((S (0)) * pff_history_scale_finite_structurecharacteristicsmaller)) /\ exists ff_q_pft_finite_structurecharacteristicsmallerhistorystart. pff_history_code_finite_structurecharacteristicsmaller = ff_q_pft_finite_structurecharacteristicsmallerhistorystart * S ((S (0)) * pff_history_scale_finite_structurecharacteristicsmaller) + (0))) /\ (((((exists ff_h_pft_finite_structurecharacteristicsmallerhistoryterminal. ff_h_pft_finite_structurecharacteristicsmallerhistoryterminal + S (0) = S ((S (pff_smaller_positive_finite_structurecharacteristic)) * pff_history_scale_finite_structurecharacteristicsmaller)) /\ exists ff_q_pft_finite_structurecharacteristicsmallerhistoryterminal. pff_history_code_finite_structurecharacteristicsmaller = ff_q_pft_finite_structurecharacteristicsmallerhistoryterminal * S ((S (pff_smaller_positive_finite_structurecharacteristic)) * pff_history_scale_finite_structurecharacteristicsmaller) + (0))) /\ ((forall pff_trace_index_finite_structurecharacteristicsmallerhistorysteps. (exists pfa_gap_finite_structurecharacteristicsmallerhistorystepsindex. pfa_gap_finite_structurecharacteristicsmallerhistorystepsindex + S (pff_trace_index_finite_structurecharacteristicsmallerhistorysteps) = (pff_smaller_positive_finite_structurecharacteristic)) -> exists pff_trace_before_finite_structurecharacteristicsmallerhistorysteps pff_trace_after_finite_structurecharacteristicsmallerhistorysteps. ((((exists ff_h_pft_finite_structurecharacteristicsmallerhistorystepsbefore. ff_h_pft_finite_structurecharacteristicsmallerhistorystepsbefore + S (pff_trace_before_finite_structurecharacteristicsmallerhistorysteps) = S ((S (pff_trace_index_finite_structurecharacteristicsmallerhistorysteps)) * pff_history_scale_finite_structurecharacteristicsmaller)) /\ exists ff_q_pft_finite_structurecharacteristicsmallerhistorystepsbefore. pff_history_code_finite_structurecharacteristicsmaller = ff_q_pft_finite_structurecharacteristicsmallerhistorystepsbefore * S ((S (pff_trace_index_finite_structurecharacteristicsmallerhistorysteps)) * pff_history_scale_finite_structurecharacteristicsmaller) + (pff_trace_before_finite_structurecharacteristicsmallerhistorysteps))) /\ (((((exists ff_h_pft_finite_structurecharacteristicsmallerhistorystepsafter. ff_h_pft_finite_structurecharacteristicsmallerhistorystepsafter + S (pff_trace_after_finite_structurecharacteristicsmallerhistorysteps) = S ((S (S (pff_trace_index_finite_structurecharacteristicsmallerhistorysteps))) * pff_history_scale_finite_structurecharacteristicsmaller)) /\ exists ff_q_pft_finite_structurecharacteristicsmallerhistorystepsafter. pff_history_code_finite_structurecharacteristicsmaller = ff_q_pft_finite_structurecharacteristicsmallerhistorystepsafter * S ((S (S (pff_trace_index_finite_structurecharacteristicsmallerhistorysteps))) * pff_history_scale_finite_structurecharacteristicsmaller) + (pff_trace_after_finite_structurecharacteristicsmallerhistorysteps))) /\ ((((exists pfa_gap_finite_structurecharacteristicsmallerhistorystepsadditionleft. pfa_gap_finite_structurecharacteristicsmallerhistorystepsadditionleft + S (pff_trace_before_finite_structurecharacteristicsmallerhistorysteps) = (p)) /\ (((exists pfa_gap_finite_structurecharacteristicsmallerhistorystepsadditionright. pfa_gap_finite_structurecharacteristicsmallerhistorystepsadditionright + S (1) = (p)) /\ ((((exists pfa_gap_finite_structurecharacteristicsmallerhistorystepsadditionresultbound. pfa_gap_finite_structurecharacteristicsmallerhistorystepsadditionresultbound + S (pff_trace_after_finite_structurecharacteristicsmallerhistorysteps) = (p)) /\ ((exists pfa_offset_left_finite_structurecharacteristicsmallerhistorystepsadditionresultcongruence pfa_offset_right_finite_structurecharacteristicsmallerhistorystepsadditionresultcongruence. ((pff_trace_before_finite_structurecharacteristicsmallerhistorysteps) + (1)) + (p) * pfa_offset_left_finite_structurecharacteristicsmallerhistorystepsadditionresultcongruence = (pff_trace_after_finite_structurecharacteristicsmallerhistorysteps) + (p) * pfa_offset_right_finite_structurecharacteristicsmallerhistorystepsadditionresultcongruence)))))))))))))))))))))))))))))))

Constructive proof overview

Generated structural guide

For every prime construct all finite arithmetic tables, an exact p-element bijection, every field law, and characteristic p. This is the k=1 case only, not arbitrary prime-power extension fields.

The unchanged tactic script uses 4 declared prerequisites and contains 40 exact native proof lines.

Alpha v34 checked-use · first admitted v31 · independently kernel and Lean verified; not Stable

Proof neighborhood

Direct dependencies

Direct dependents

none

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

40 script commands · 12 reading checkpoints · 2 local claims

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 (4)

Long local formulas use this family’s existing definitions. Each new abbreviation was expanded back to the identical native formula, including its free-variable context. The original edition is preserved below.

01Fix variables and assumptionsL1–2

Work with arbitrary variables or the premises of the current implication.

  1. L1
    intro p
  2. L2
    intro hp
02Establish htL3–6

Establish this local claim before using it. It is not an additional assumption. The following proof commands apply prime field operation tables exists.

  1. L3
    have ht : ∃ ab. ∃ ac. ∃ mb. ∃ mc. ∃ nb. ∃ nc. ∃ ib. ∃ ic. FpOperationTables(p,ab,ac,mb,mc,nb,nc,ib,ic)Definitions: FpOperationTables
  2. L4
    specialize prime_field_operation_tables_exists (p)
  3. L5
    apply prime_field_operation_tables_exists
  4. L6
    exact hp
03Separate the logical casesL7–14

Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.

  1. L7
    cases ht
  2. L8
    cases ht_witness
  3. L9
    cases ht_witness_witness
  4. L10
    cases ht_witness_witness_witness
  5. L11
    cases ht_witness_witness_witness_witness
  6. L12
    cases ht_witness_witness_witness_witness_witness
  7. L13
    cases ht_witness_witness_witness_witness_witness_witness
  8. L14
    cases ht_witness_witness_witness_witness_witness_witness_witness
04Establish hcL15–17

Establish this local claim before using it. It is not an additional assumption. The following proof commands apply prime field cardinality exists.

  1. L15
    have hc : ∃ eb. ∃ ec. FpCardinality(p,eb,ec)Definitions: FpCardinality
  2. L16
    specialize prime_field_cardinality_exists (p)
  3. L17
    apply prime_field_cardinality_exists
05Separate the logical casesL18–19

Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.

  1. L18
    cases hc
  2. L19
    cases hc_witness
06Construct an explicit witnessL20–29

Supply the displayed value, then prove that it has the required property.

  1. L20
    exists x
  2. L21
    exists x1
  3. L22
    exists x2
  4. L23
    exists x3
  5. L24
    exists x4
  6. L25
    exists x5
  7. L26
    exists x6
  8. L27
    exists x7
  9. L28
    exists x8
  10. L29
    exists x9
07Separate the logical casesL30–30

Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.

  1. L30
    split
08Use earlier factsL31–31

Instantiate or apply named facts and discharge the corresponding proof obligations.

  1. L31
    exact ht_witness_witness_witness_witness_witness_witness_witness_witness
09Separate the logical casesL32–32

Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.

  1. L32
    split
10Use earlier factsL33–33

Instantiate or apply named facts and discharge the corresponding proof obligations.

  1. L33
    exact hc_witness_witness
11Separate the logical casesL34–34

Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.

  1. L34
    split
12Use earlier factsL35–40

Instantiate or apply named facts and discharge the corresponding proof obligations.

  1. L35
    specialize prime_field_arithmetic_laws (p)
  2. L36
    apply prime_field_arithmetic_laws
  3. L37
    exact hp
  4. L38
    specialize prime_field_characteristic_exact (p)
  5. L39
    apply prime_field_characteristic_exact
  6. L40
    exact hp

Library-wide reading audit

Original exact command ledger · 40 lines
  1. 0001intro p
  2. 0002intro hp
  3. 0003have ht : exists ab ac mb mc nb nc ib ic. (((forall pft_index_finite_structure_tablesadd. (exists pfa_gap_finite_structure_tablesaddprefix. pfa_gap_finite_structure_tablesaddprefix + S (pft_index_finite_structure_tablesadd) = ((p) * (p))) -> exists pft_value_finite_structure_tablesadd. (((((exists ff_h_pft_finite_structure_tablesaddpointentry. ff_h_pft_finite_structure_tablesaddpointentry + S (pft_value_finite_structure_tablesadd) = S ((S (pft_index_finite_structure_tablesadd)) * ac)) /\ exists ff_q_pft_finite_structure_tablesaddpointentry. ab = ff_q_pft_finite_structure_tablesaddpointentry * S ((S (pft_index_finite_structure_tablesadd)) * ac) + (pft_value_finite_structure_tablesadd))) /\ ((exists pft_row_finite_structure_tablesaddpointvalue pft_column_finite_structure_tablesaddpointvalue. (((pft_index_finite_structure_tablesadd) = pft_row_finite_structure_tablesaddpointvalue * (p) + pft_column_finite_structure_tablesaddpointvalue) /\ ((((exists pfa_gap_finite_structure_tablesaddpointvalueoperationleft. pfa_gap_finite_structure_tablesaddpointvalueoperationleft + S (pft_row_finite_structure_tablesaddpointvalue) = (p)) /\ (((exists pfa_gap_finite_structure_tablesaddpointvalueoperationright. pfa_gap_finite_structure_tablesaddpointvalueoperationright + S (pft_column_finite_structure_tablesaddpointvalue) = (p)) /\ ((((exists pfa_gap_finite_structure_tablesaddpointvalueoperationresultbound. pfa_gap_finite_structure_tablesaddpointvalueoperationresultbound + S (pft_value_finite_structure_tablesadd) = (p)) /\ ((exists pfa_offset_left_finite_structure_tablesaddpointvalueoperationresultcongruence pfa_offset_right_finite_structure_tablesaddpointvalueoperationresultcongruence. ((pft_row_finite_structure_tablesaddpointvalue) + (pft_column_finite_structure_tablesaddpointvalue)) + (p) * pfa_offset_left_finite_structure_tablesaddpointvalueoperationresultcongruence = (pft_value_finite_structure_tablesadd) + (p) * pfa_offset_right_finite_structure_tablesaddpointvalueoperationresultcongruence)))))))))))))))) /\ (((forall pft_index_finite_structure_tablesmultiply. (exists pfa_gap_finite_structure_tablesmultiplyprefix. pfa_gap_finite_structure_tablesmultiplyprefix + S (pft_index_finite_structure_tablesmultiply) = ((p) * (p))) -> exists pft_value_finite_structure_tablesmultiply. (((((exists ff_h_pft_finite_structure_tablesmultiplypointentry. ff_h_pft_finite_structure_tablesmultiplypointentry + S (pft_value_finite_structure_tablesmultiply) = S ((S (pft_index_finite_structure_tablesmultiply)) * mc)) /\ exists ff_q_pft_finite_structure_tablesmultiplypointentry. mb = ff_q_pft_finite_structure_tablesmultiplypointentry * S ((S (pft_index_finite_structure_tablesmultiply)) * mc) + (pft_value_finite_structure_tablesmultiply))) /\ ((exists pft_row_finite_structure_tablesmultiplypointvalue pft_column_finite_structure_tablesmultiplypointvalue. (((pft_index_finite_structure_tablesmultiply) = pft_row_finite_structure_tablesmultiplypointvalue * (p) + pft_column_finite_structure_tablesmultiplypointvalue) /\ ((((exists pfa_gap_finite_structure_tablesmultiplypointvalueoperationleft. pfa_gap_finite_structure_tablesmultiplypointvalueoperationleft + S (pft_row_finite_structure_tablesmultiplypointvalue) = (p)) /\ (((exists pfa_gap_finite_structure_tablesmultiplypointvalueoperationright. pfa_gap_finite_structure_tablesmultiplypointvalueoperationright + S (pft_column_finite_structure_tablesmultiplypointvalue) = (p)) /\ ((((exists pfa_gap_finite_structure_tablesmultiplypointvalueoperationresultbound. pfa_gap_finite_structure_tablesmultiplypointvalueoperationresultbound + S (pft_value_finite_structure_tablesmultiply) = (p)) /\ ((exists pfa_offset_left_finite_structure_tablesmultiplypointvalueoperationresultcongruence pfa_offset_right_finite_structure_tablesmultiplypointvalueoperationresultcongruence. ((pft_row_finite_structure_tablesmultiplypointvalue) * (pft_column_finite_structure_tablesmultiplypointvalue)) + (p) * pfa_offset_left_finite_structure_tablesmultiplypointvalueoperationresultcongruence = (pft_value_finite_structure_tablesmultiply) + (p) * pfa_offset_right_finite_structure_tablesmultiplypointvalueoperationresultcongruence)))))))))))))))) /\ (((forall pft_index_finite_structure_tablesnegate. (exists pfa_gap_finite_structure_tablesnegateprefix. pfa_gap_finite_structure_tablesnegateprefix + S (pft_index_finite_structure_tablesnegate) = (p)) -> exists pft_value_finite_structure_tablesnegate. (((((exists ff_h_pft_finite_structure_tablesnegatepointentry. ff_h_pft_finite_structure_tablesnegatepointentry + S (pft_value_finite_structure_tablesnegate) = S ((S (pft_index_finite_structure_tablesnegate)) * nc)) /\ exists ff_q_pft_finite_structure_tablesnegatepointentry. nb = ff_q_pft_finite_structure_tablesnegatepointentry * S ((S (pft_index_finite_structure_tablesnegate)) * nc) + (pft_value_finite_structure_tablesnegate))) /\ ((((exists pfa_gap_finite_structure_tablesnegatepointvalueadditionleft. pfa_gap_finite_structure_tablesnegatepointvalueadditionleft + S (pft_index_finite_structure_tablesnegate) = (p)) /\ (((exists pfa_gap_finite_structure_tablesnegatepointvalueadditionright. pfa_gap_finite_structure_tablesnegatepointvalueadditionright + S (pft_value_finite_structure_tablesnegate) = (p)) /\ ((((exists pfa_gap_finite_structure_tablesnegatepointvalueadditionresultbound. pfa_gap_finite_structure_tablesnegatepointvalueadditionresultbound + S (0) = (p)) /\ ((exists pfa_offset_left_finite_structure_tablesnegatepointvalueadditionresultcongruence pfa_offset_right_finite_structure_tablesnegatepointvalueadditionresultcongruence. ((pft_index_finite_structure_tablesnegate) + (pft_value_finite_structure_tablesnegate)) + (p) * pfa_offset_left_finite_structure_tablesnegatepointvalueadditionresultcongruence = (0) + (p) * pfa_offset_right_finite_structure_tablesnegatepointvalueadditionresultcongruence))))))))))))) /\ ((forall pft_index_finite_structure_tablesinverse. (exists pfa_gap_finite_structure_tablesinverseprefix. pfa_gap_finite_structure_tablesinverseprefix + S (pft_index_finite_structure_tablesinverse) = (p)) -> exists pft_value_finite_structure_tablesinverse. (((((exists ff_h_pft_finite_structure_tablesinversepointentry. ff_h_pft_finite_structure_tablesinversepointentry + S (pft_value_finite_structure_tablesinverse) = S ((S (pft_index_finite_structure_tablesinverse)) * ic)) /\ exists ff_q_pft_finite_structure_tablesinversepointentry. ib = ff_q_pft_finite_structure_tablesinversepointentry * S ((S (pft_index_finite_structure_tablesinverse)) * ic) + (pft_value_finite_structure_tablesinverse))) /\ ((((exists pfa_gap_finite_structure_tablesinversepointvalueinput. pfa_gap_finite_structure_tablesinversepointvalueinput + S (pft_index_finite_structure_tablesinverse) = (p)) /\ (((exists pfa_gap_finite_structure_tablesinversepointvalueoutput. pfa_gap_finite_structure_tablesinversepointvalueoutput + S (pft_value_finite_structure_tablesinverse) = (p)) /\ ((((pft_index_finite_structure_tablesinverse) = 0 /\ (pft_value_finite_structure_tablesinverse) = 0) \/ (((~((pft_index_finite_structure_tablesinverse) = 0)) /\ ((((exists pfa_gap_finite_structure_tablesinversepointvaluenonzeromultiplicationleft. pfa_gap_finite_structure_tablesinversepointvaluenonzeromultiplicationleft + S (pft_index_finite_structure_tablesinverse) = (p)) /\ (((exists pfa_gap_finite_structure_tablesinversepointvaluenonzeromultiplicationright. pfa_gap_finite_structure_tablesinversepointvaluenonzeromultiplicationright + S (pft_value_finite_structure_tablesinverse) = (p)) /\ ((((exists pfa_gap_finite_structure_tablesinversepointvaluenonzeromultiplicationresultbound. pfa_gap_finite_structure_tablesinversepointvaluenonzeromultiplicationresultbound + S (1) = (p)) /\ ((exists pfa_offset_left_finite_structure_tablesinversepointvaluenonzeromultiplicationresultcongruence pfa_offset_right_finite_structure_tablesinversepointvaluenonzeromultiplicationresultcongruence. ((pft_index_finite_structure_tablesinverse) * (pft_value_finite_structure_tablesinverse)) + (p) * pfa_offset_left_finite_structure_tablesinversepointvaluenonzeromultiplicationresultcongruence = (1) + (p) * pfa_offset_right_finite_structure_tablesinversepointvaluenonzeromultiplicationresultcongruence)))))))))))))))))))))))))))))
  4. 0004specialize prime_field_operation_tables_exists (p)
  5. 0005apply prime_field_operation_tables_exists
  6. 0006exact hp
  7. 0007cases ht
  8. 0008cases ht_witness
  9. 0009cases ht_witness_witness
  10. 0010cases ht_witness_witness_witness
  11. 0011cases ht_witness_witness_witness_witness
  12. 0012cases ht_witness_witness_witness_witness_witness
  13. 0013cases ht_witness_witness_witness_witness_witness_witness
  14. 0014cases ht_witness_witness_witness_witness_witness_witness_witness
  15. 0015have hc : exists eb ec. (((forall pff_enumeration_index_finite_structure_cardinalityenumeration. (exists pfa_gap_finite_structure_cardinalityenumerationbound. pfa_gap_finite_structure_cardinalityenumerationbound + S (pff_enumeration_index_finite_structure_cardinalityenumeration) = (p)) -> (((exists ff_h_pft_finite_structure_cardinalityenumerationentry. ff_h_pft_finite_structure_cardinalityenumerationentry + S (pff_enumeration_index_finite_structure_cardinalityenumeration) = S ((S (pff_enumeration_index_finite_structure_cardinalityenumeration)) * ec)) /\ exists ff_q_pft_finite_structure_cardinalityenumerationentry. eb = ff_q_pft_finite_structure_cardinalityenumerationentry * S ((S (pff_enumeration_index_finite_structure_cardinalityenumeration)) * ec) + (pff_enumeration_index_finite_structure_cardinalityenumeration)))) /\ (((forall pff_cardinality_i_finite_structure_cardinality pff_cardinality_a_finite_structure_cardinality. (exists pfa_gap_finite_structure_cardinalitybounded_index. pfa_gap_finite_structure_cardinalitybounded_index + S (pff_cardinality_i_finite_structure_cardinality) = (p)) -> (((exists ff_h_pft_finite_structure_cardinalitybounded_entry. ff_h_pft_finite_structure_cardinalitybounded_entry + S (pff_cardinality_a_finite_structure_cardinality) = S ((S (pff_cardinality_i_finite_structure_cardinality)) * ec)) /\ exists ff_q_pft_finite_structure_cardinalitybounded_entry. eb = ff_q_pft_finite_structure_cardinalitybounded_entry * S ((S (pff_cardinality_i_finite_structure_cardinality)) * ec) + (pff_cardinality_a_finite_structure_cardinality))) -> (exists pfa_gap_finite_structure_cardinalitybounded_value. pfa_gap_finite_structure_cardinalitybounded_value + S (pff_cardinality_a_finite_structure_cardinality) = (p))) /\ (((forall pff_cardinality_i_finite_structure_cardinality pff_cardinality_j_finite_structure_cardinality pff_cardinality_a_finite_structure_cardinality. (exists pfa_gap_finite_structure_cardinalityinjective_i. pfa_gap_finite_structure_cardinalityinjective_i + S (pff_cardinality_i_finite_structure_cardinality) = (p)) -> (exists pfa_gap_finite_structure_cardinalityinjective_j. pfa_gap_finite_structure_cardinalityinjective_j + S (pff_cardinality_j_finite_structure_cardinality) = (p)) -> (((exists ff_h_pft_finite_structure_cardinalityinjective_first. ff_h_pft_finite_structure_cardinalityinjective_first + S (pff_cardinality_a_finite_structure_cardinality) = S ((S (pff_cardinality_i_finite_structure_cardinality)) * ec)) /\ exists ff_q_pft_finite_structure_cardinalityinjective_first. eb = ff_q_pft_finite_structure_cardinalityinjective_first * S ((S (pff_cardinality_i_finite_structure_cardinality)) * ec) + (pff_cardinality_a_finite_structure_cardinality))) -> (((exists ff_h_pft_finite_structure_cardinalityinjective_second. ff_h_pft_finite_structure_cardinalityinjective_second + S (pff_cardinality_a_finite_structure_cardinality) = S ((S (pff_cardinality_j_finite_structure_cardinality)) * ec)) /\ exists ff_q_pft_finite_structure_cardinalityinjective_second. eb = ff_q_pft_finite_structure_cardinalityinjective_second * S ((S (pff_cardinality_j_finite_structure_cardinality)) * ec) + (pff_cardinality_a_finite_structure_cardinality))) -> pff_cardinality_i_finite_structure_cardinality = pff_cardinality_j_finite_structure_cardinality) /\ ((forall pff_cardinality_a_finite_structure_cardinality. (exists pfa_gap_finite_structure_cardinalitysurjective_value. pfa_gap_finite_structure_cardinalitysurjective_value + S (pff_cardinality_a_finite_structure_cardinality) = (p)) -> exists pff_cardinality_i_finite_structure_cardinality. (exists pfa_gap_finite_structure_cardinalitysurjective_index. pfa_gap_finite_structure_cardinalitysurjective_index + S (pff_cardinality_i_finite_structure_cardinality) = (p)) /\ (((exists ff_h_pft_finite_structure_cardinalitysurjective_entry. ff_h_pft_finite_structure_cardinalitysurjective_entry + S (pff_cardinality_a_finite_structure_cardinality) = S ((S (pff_cardinality_i_finite_structure_cardinality)) * ec)) /\ exists ff_q_pft_finite_structure_cardinalitysurjective_entry. eb = ff_q_pft_finite_structure_cardinalitysurjective_entry * S ((S (pff_cardinality_i_finite_structure_cardinality)) * ec) + (pff_cardinality_a_finite_structure_cardinality)))))))))))
  16. 0016specialize prime_field_cardinality_exists (p)
  17. 0017apply prime_field_cardinality_exists
  18. 0018cases hc
  19. 0019cases hc_witness
  20. 0020exists x
  21. 0021exists x1
  22. 0022exists x2
  23. 0023exists x3
  24. 0024exists x4
  25. 0025exists x5
  26. 0026exists x6
  27. 0027exists x7
  28. 0028exists x8
  29. 0029exists x9
  30. 0030split
  31. 0031exact ht_witness_witness_witness_witness_witness_witness_witness_witness
  32. 0032split
  33. 0033exact hc_witness_witness
  34. 0034split
  35. 0035specialize prime_field_arithmetic_laws (p)
  36. 0036apply prime_field_arithmetic_laws
  37. 0037exact hp
  38. 0038specialize prime_field_characteristic_exact (p)
  39. 0039apply prime_field_characteristic_exact
  40. 0040exact hp