Exact expanded first-order arithmetic statement
forall m n k A B C D u E F G H v P Q R T b c. ~(m=0) -> ~(n=0) -> (forall jt_divisor_rectenumcop. (exists jt_factor_rectenumcopa. (m)=(jt_divisor_rectenumcop)*jt_factor_rectenumcopa) -> (exists jt_factor_rectenumcopb. (n)=(jt_divisor_rectenumcop)*jt_factor_rectenumcopb) -> jt_divisor_rectenumcop=1) -> (((forall jt_i_enumleft. (exists jt_gap_enumleftsoundindex. jt_gap_enumleftsoundindex+S (jt_i_enumleft)=(u)) -> exists jt_b_enumleft jt_c_enumleft. ((((((exists fs_h_jt_enumleftsoundcode. fs_h_jt_enumleftsoundcode + S (jt_b_enumleft) = S ((S (jt_i_enumleft)) * B)) /\ exists fs_q_jt_enumleftsoundcode. A = fs_q_jt_enumleftsoundcode * S ((S (jt_i_enumleft)) * B) + (jt_b_enumleft))) /\ (((exists fs_h_jt_enumleftsoundscale. fs_h_jt_enumleftsoundscale + S (jt_c_enumleft) = S ((S (jt_i_enumleft)) * D)) /\ exists fs_q_jt_enumleftsoundscale. C = fs_q_jt_enumleftsoundscale * S ((S (jt_i_enumleft)) * D) + (jt_c_enumleft))))) /\ (((forall jt_index_enumleftbound. (exists jt_gap_enumleftboundindex. jt_gap_enumleftboundindex+S (jt_index_enumleftbound)=(k)) -> exists jt_value_enumleftbound. ((((exists fs_h_jt_enumleftboundat. fs_h_jt_enumleftboundat + S (jt_value_enumleftbound) = S ((S (jt_index_enumleftbound)) * jt_c_enumleft)) /\ exists fs_q_jt_enumleftboundat. jt_b_enumleft = fs_q_jt_enumleftboundat * S ((S (jt_index_enumleftbound)) * jt_c_enumleft) + (jt_value_enumleftbound))) /\ (exists jt_gap_enumleftboundvalue. jt_gap_enumleftboundvalue+S (jt_value_enumleftbound)=(m)))) /\ (forall jt_divisor_enumleftprimitive. (exists jt_factor_enumleftprimitivemodulus. (m)=(jt_divisor_enumleftprimitive)*jt_factor_enumleftprimitivemodulus) -> (forall jt_index_enumleftprimitivecoordinates jt_value_enumleftprimitivecoordinates. (exists jt_gap_enumleftprimitivecoordinatesindex. jt_gap_enumleftprimitivecoordinatesindex+S (jt_index_enumleftprimitivecoordinates)=(k)) -> (((exists fs_h_jt_enumleftprimitivecoordinatesat. fs_h_jt_enumleftprimitivecoordinatesat + S (jt_value_enumleftprimitivecoordinates) = S ((S (jt_index_enumleftprimitivecoordinates)) * jt_c_enumleft)) /\ exists fs_q_jt_enumleftprimitivecoordinatesat. jt_b_enumleft = fs_q_jt_enumleftprimitivecoordinatesat * S ((S (jt_index_enumleftprimitivecoordinates)) * jt_c_enumleft) + (jt_value_enumleftprimitivecoordinates))) -> (exists jt_factor_enumleftprimitivecoordinatesdivides. (jt_value_enumleftprimitivecoordinates)=(jt_divisor_enumleftprimitive)*jt_factor_enumleftprimitivecoordinatesdivides)) -> jt_divisor_enumleftprimitive=1))))) /\ (((forall jt_b_enumleft jt_c_enumleft. (forall jt_index_enumleftinputbound. (exists jt_gap_enumleftinputboundindex. jt_gap_enumleftinputboundindex+S (jt_index_enumleftinputbound)=(k)) -> exists jt_value_enumleftinputbound. ((((exists fs_h_jt_enumleftinputboundat. fs_h_jt_enumleftinputboundat + S (jt_value_enumleftinputbound) = S ((S (jt_index_enumleftinputbound)) * jt_c_enumleft)) /\ exists fs_q_jt_enumleftinputboundat. jt_b_enumleft = fs_q_jt_enumleftinputboundat * S ((S (jt_index_enumleftinputbound)) * jt_c_enumleft) + (jt_value_enumleftinputbound))) /\ (exists jt_gap_enumleftinputboundvalue. jt_gap_enumleftinputboundvalue+S (jt_value_enumleftinputbound)=(m)))) -> (forall jt_divisor_enumleftinputprimitive. (exists jt_factor_enumleftinputprimitivemodulus. (m)=(jt_divisor_enumleftinputprimitive)*jt_factor_enumleftinputprimitivemodulus) -> (forall jt_index_enumleftinputprimitivecoordinates jt_value_enumleftinputprimitivecoordinates. (exists jt_gap_enumleftinputprimitivecoordinatesindex. jt_gap_enumleftinputprimitivecoordinatesindex+S (jt_index_enumleftinputprimitivecoordinates)=(k)) -> (((exists fs_h_jt_enumleftinputprimitivecoordinatesat. fs_h_jt_enumleftinputprimitivecoordinatesat + S (jt_value_enumleftinputprimitivecoordinates) = S ((S (jt_index_enumleftinputprimitivecoordinates)) * jt_c_enumleft)) /\ exists fs_q_jt_enumleftinputprimitivecoordinatesat. jt_b_enumleft = fs_q_jt_enumleftinputprimitivecoordinatesat * S ((S (jt_index_enumleftinputprimitivecoordinates)) * jt_c_enumleft) + (jt_value_enumleftinputprimitivecoordinates))) -> (exists jt_factor_enumleftinputprimitivecoordinatesdivides. (jt_value_enumleftinputprimitivecoordinates)=(jt_divisor_enumleftinputprimitive)*jt_factor_enumleftinputprimitivecoordinatesdivides)) -> jt_divisor_enumleftinputprimitive=1) -> exists jt_i_enumleft jt_d_enumleft jt_e_enumleft. ((exists jt_gap_enumleftcompleteindex. jt_gap_enumleftcompleteindex+S (jt_i_enumleft)=(u)) /\ (((((((exists fs_h_jt_enumleftcompletecode. fs_h_jt_enumleftcompletecode + S (jt_d_enumleft) = S ((S (jt_i_enumleft)) * B)) /\ exists fs_q_jt_enumleftcompletecode. A = fs_q_jt_enumleftcompletecode * S ((S (jt_i_enumleft)) * B) + (jt_d_enumleft))) /\ (((exists fs_h_jt_enumleftcompletescale. fs_h_jt_enumleftcompletescale + S (jt_e_enumleft) = S ((S (jt_i_enumleft)) * D)) /\ exists fs_q_jt_enumleftcompletescale. C = fs_q_jt_enumleftcompletescale * S ((S (jt_i_enumleft)) * D) + (jt_e_enumleft))))) /\ (forall jt_index_enumleftrepresented jt_left_enumleftrepresented jt_right_enumleftrepresented. (exists jt_gap_enumleftrepresentedindex. jt_gap_enumleftrepresentedindex+S (jt_index_enumleftrepresented)=(k)) -> (((exists fs_h_jt_enumleftrepresentedleft. fs_h_jt_enumleftrepresentedleft + S (jt_left_enumleftrepresented) = S ((S (jt_index_enumleftrepresented)) * jt_c_enumleft)) /\ exists fs_q_jt_enumleftrepresentedleft. jt_b_enumleft = fs_q_jt_enumleftrepresentedleft * S ((S (jt_index_enumleftrepresented)) * jt_c_enumleft) + (jt_left_enumleftrepresented))) -> (((exists fs_h_jt_enumleftrepresentedright. fs_h_jt_enumleftrepresentedright + S (jt_right_enumleftrepresented) = S ((S (jt_index_enumleftrepresented)) * jt_e_enumleft)) /\ exists fs_q_jt_enumleftrepresentedright. jt_d_enumleft = fs_q_jt_enumleftrepresentedright * S ((S (jt_index_enumleftrepresented)) * jt_e_enumleft) + (jt_right_enumleftrepresented))) -> jt_left_enumleftrepresented=jt_right_enumleftrepresented))))) /\ (forall jt_i_enumleft jt_h_enumleft jt_b_enumleft jt_c_enumleft jt_d_enumleft jt_e_enumleft. (exists jt_gap_enumleftfirstindex. jt_gap_enumleftfirstindex+S (jt_i_enumleft)=(u)) -> (exists jt_gap_enumleftsecondindex. jt_gap_enumleftsecondindex+S (jt_h_enumleft)=(u)) -> (((((exists fs_h_jt_enumleftfirstcode. fs_h_jt_enumleftfirstcode + S (jt_b_enumleft) = S ((S (jt_i_enumleft)) * B)) /\ exists fs_q_jt_enumleftfirstcode. A = fs_q_jt_enumleftfirstcode * S ((S (jt_i_enumleft)) * B) + (jt_b_enumleft))) /\ (((exists fs_h_jt_enumleftfirstscale. fs_h_jt_enumleftfirstscale + S (jt_c_enumleft) = S ((S (jt_i_enumleft)) * D)) /\ exists fs_q_jt_enumleftfirstscale. C = fs_q_jt_enumleftfirstscale * S ((S (jt_i_enumleft)) * D) + (jt_c_enumleft))))) -> (((((exists fs_h_jt_enumleftsecondcode. fs_h_jt_enumleftsecondcode + S (jt_d_enumleft) = S ((S (jt_h_enumleft)) * B)) /\ exists fs_q_jt_enumleftsecondcode. A = fs_q_jt_enumleftsecondcode * S ((S (jt_h_enumleft)) * B) + (jt_d_enumleft))) /\ (((exists fs_h_jt_enumleftsecondscale. fs_h_jt_enumleftsecondscale + S (jt_e_enumleft) = S ((S (jt_h_enumleft)) * D)) /\ exists fs_q_jt_enumleftsecondscale. C = fs_q_jt_enumleftsecondscale * S ((S (jt_h_enumleft)) * D) + (jt_e_enumleft))))) -> (forall jt_index_enumleftsame jt_left_enumleftsame jt_right_enumleftsame. (exists jt_gap_enumleftsameindex. jt_gap_enumleftsameindex+S (jt_index_enumleftsame)=(k)) -> (((exists fs_h_jt_enumleftsameleft. fs_h_jt_enumleftsameleft + S (jt_left_enumleftsame) = S ((S (jt_index_enumleftsame)) * jt_c_enumleft)) /\ exists fs_q_jt_enumleftsameleft. jt_b_enumleft = fs_q_jt_enumleftsameleft * S ((S (jt_index_enumleftsame)) * jt_c_enumleft) + (jt_left_enumleftsame))) -> (((exists fs_h_jt_enumleftsameright. fs_h_jt_enumleftsameright + S (jt_right_enumleftsame) = S ((S (jt_index_enumleftsame)) * jt_e_enumleft)) /\ exists fs_q_jt_enumleftsameright. jt_d_enumleft = fs_q_jt_enumleftsameright * S ((S (jt_index_enumleftsame)) * jt_e_enumleft) + (jt_right_enumleftsame))) -> jt_left_enumleftsame=jt_right_enumleftsame) -> jt_i_enumleft=jt_h_enumleft))))) -> (((forall jt_i_enumright. (exists jt_gap_enumrightsoundindex. jt_gap_enumrightsoundindex+S (jt_i_enumright)=(v)) -> exists jt_b_enumright jt_c_enumright. ((((((exists fs_h_jt_enumrightsoundcode. fs_h_jt_enumrightsoundcode + S (jt_b_enumright) = S ((S (jt_i_enumright)) * F)) /\ exists fs_q_jt_enumrightsoundcode. E = fs_q_jt_enumrightsoundcode * S ((S (jt_i_enumright)) * F) + (jt_b_enumright))) /\ (((exists fs_h_jt_enumrightsoundscale. fs_h_jt_enumrightsoundscale + S (jt_c_enumright) = S ((S (jt_i_enumright)) * H)) /\ exists fs_q_jt_enumrightsoundscale. G = fs_q_jt_enumrightsoundscale * S ((S (jt_i_enumright)) * H) + (jt_c_enumright))))) /\ (((forall jt_index_enumrightbound. (exists jt_gap_enumrightboundindex. jt_gap_enumrightboundindex+S (jt_index_enumrightbound)=(k)) -> exists jt_value_enumrightbound. ((((exists fs_h_jt_enumrightboundat. fs_h_jt_enumrightboundat + S (jt_value_enumrightbound) = S ((S (jt_index_enumrightbound)) * jt_c_enumright)) /\ exists fs_q_jt_enumrightboundat. jt_b_enumright = fs_q_jt_enumrightboundat * S ((S (jt_index_enumrightbound)) * jt_c_enumright) + (jt_value_enumrightbound))) /\ (exists jt_gap_enumrightboundvalue. jt_gap_enumrightboundvalue+S (jt_value_enumrightbound)=(n)))) /\ (forall jt_divisor_enumrightprimitive. (exists jt_factor_enumrightprimitivemodulus. (n)=(jt_divisor_enumrightprimitive)*jt_factor_enumrightprimitivemodulus) -> (forall jt_index_enumrightprimitivecoordinates jt_value_enumrightprimitivecoordinates. (exists jt_gap_enumrightprimitivecoordinatesindex. jt_gap_enumrightprimitivecoordinatesindex+S (jt_index_enumrightprimitivecoordinates)=(k)) -> (((exists fs_h_jt_enumrightprimitivecoordinatesat. fs_h_jt_enumrightprimitivecoordinatesat + S (jt_value_enumrightprimitivecoordinates) = S ((S (jt_index_enumrightprimitivecoordinates)) * jt_c_enumright)) /\ exists fs_q_jt_enumrightprimitivecoordinatesat. jt_b_enumright = fs_q_jt_enumrightprimitivecoordinatesat * S ((S (jt_index_enumrightprimitivecoordinates)) * jt_c_enumright) + (jt_value_enumrightprimitivecoordinates))) -> (exists jt_factor_enumrightprimitivecoordinatesdivides. (jt_value_enumrightprimitivecoordinates)=(jt_divisor_enumrightprimitive)*jt_factor_enumrightprimitivecoordinatesdivides)) -> jt_divisor_enumrightprimitive=1))))) /\ (((forall jt_b_enumright jt_c_enumright. (forall jt_index_enumrightinputbound. (exists jt_gap_enumrightinputboundindex. jt_gap_enumrightinputboundindex+S (jt_index_enumrightinputbound)=(k)) -> exists jt_value_enumrightinputbound. ((((exists fs_h_jt_enumrightinputboundat. fs_h_jt_enumrightinputboundat + S (jt_value_enumrightinputbound) = S ((S (jt_index_enumrightinputbound)) * jt_c_enumright)) /\ exists fs_q_jt_enumrightinputboundat. jt_b_enumright = fs_q_jt_enumrightinputboundat * S ((S (jt_index_enumrightinputbound)) * jt_c_enumright) + (jt_value_enumrightinputbound))) /\ (exists jt_gap_enumrightinputboundvalue. jt_gap_enumrightinputboundvalue+S (jt_value_enumrightinputbound)=(n)))) -> (forall jt_divisor_enumrightinputprimitive. (exists jt_factor_enumrightinputprimitivemodulus. (n)=(jt_divisor_enumrightinputprimitive)*jt_factor_enumrightinputprimitivemodulus) -> (forall jt_index_enumrightinputprimitivecoordinates jt_value_enumrightinputprimitivecoordinates. (exists jt_gap_enumrightinputprimitivecoordinatesindex. jt_gap_enumrightinputprimitivecoordinatesindex+S (jt_index_enumrightinputprimitivecoordinates)=(k)) -> (((exists fs_h_jt_enumrightinputprimitivecoordinatesat. fs_h_jt_enumrightinputprimitivecoordinatesat + S (jt_value_enumrightinputprimitivecoordinates) = S ((S (jt_index_enumrightinputprimitivecoordinates)) * jt_c_enumright)) /\ exists fs_q_jt_enumrightinputprimitivecoordinatesat. jt_b_enumright = fs_q_jt_enumrightinputprimitivecoordinatesat * S ((S (jt_index_enumrightinputprimitivecoordinates)) * jt_c_enumright) + (jt_value_enumrightinputprimitivecoordinates))) -> (exists jt_factor_enumrightinputprimitivecoordinatesdivides. (jt_value_enumrightinputprimitivecoordinates)=(jt_divisor_enumrightinputprimitive)*jt_factor_enumrightinputprimitivecoordinatesdivides)) -> jt_divisor_enumrightinputprimitive=1) -> exists jt_i_enumright jt_d_enumright jt_e_enumright. ((exists jt_gap_enumrightcompleteindex. jt_gap_enumrightcompleteindex+S (jt_i_enumright)=(v)) /\ (((((((exists fs_h_jt_enumrightcompletecode. fs_h_jt_enumrightcompletecode + S (jt_d_enumright) = S ((S (jt_i_enumright)) * F)) /\ exists fs_q_jt_enumrightcompletecode. E = fs_q_jt_enumrightcompletecode * S ((S (jt_i_enumright)) * F) + (jt_d_enumright))) /\ (((exists fs_h_jt_enumrightcompletescale. fs_h_jt_enumrightcompletescale + S (jt_e_enumright) = S ((S (jt_i_enumright)) * H)) /\ exists fs_q_jt_enumrightcompletescale. G = fs_q_jt_enumrightcompletescale * S ((S (jt_i_enumright)) * H) + (jt_e_enumright))))) /\ (forall jt_index_enumrightrepresented jt_left_enumrightrepresented jt_right_enumrightrepresented. (exists jt_gap_enumrightrepresentedindex. jt_gap_enumrightrepresentedindex+S (jt_index_enumrightrepresented)=(k)) -> (((exists fs_h_jt_enumrightrepresentedleft. fs_h_jt_enumrightrepresentedleft + S (jt_left_enumrightrepresented) = S ((S (jt_index_enumrightrepresented)) * jt_c_enumright)) /\ exists fs_q_jt_enumrightrepresentedleft. jt_b_enumright = fs_q_jt_enumrightrepresentedleft * S ((S (jt_index_enumrightrepresented)) * jt_c_enumright) + (jt_left_enumrightrepresented))) -> (((exists fs_h_jt_enumrightrepresentedright. fs_h_jt_enumrightrepresentedright + S (jt_right_enumrightrepresented) = S ((S (jt_index_enumrightrepresented)) * jt_e_enumright)) /\ exists fs_q_jt_enumrightrepresentedright. jt_d_enumright = fs_q_jt_enumrightrepresentedright * S ((S (jt_index_enumrightrepresented)) * jt_e_enumright) + (jt_right_enumrightrepresented))) -> jt_left_enumrightrepresented=jt_right_enumrightrepresented))))) /\ (forall jt_i_enumright jt_h_enumright jt_b_enumright jt_c_enumright jt_d_enumright jt_e_enumright. (exists jt_gap_enumrightfirstindex. jt_gap_enumrightfirstindex+S (jt_i_enumright)=(v)) -> (exists jt_gap_enumrightsecondindex. jt_gap_enumrightsecondindex+S (jt_h_enumright)=(v)) -> (((((exists fs_h_jt_enumrightfirstcode. fs_h_jt_enumrightfirstcode + S (jt_b_enumright) = S ((S (jt_i_enumright)) * F)) /\ exists fs_q_jt_enumrightfirstcode. E = fs_q_jt_enumrightfirstcode * S ((S (jt_i_enumright)) * F) + (jt_b_enumright))) /\ (((exists fs_h_jt_enumrightfirstscale. fs_h_jt_enumrightfirstscale + S (jt_c_enumright) = S ((S (jt_i_enumright)) * H)) /\ exists fs_q_jt_enumrightfirstscale. G = fs_q_jt_enumrightfirstscale * S ((S (jt_i_enumright)) * H) + (jt_c_enumright))))) -> (((((exists fs_h_jt_enumrightsecondcode. fs_h_jt_enumrightsecondcode + S (jt_d_enumright) = S ((S (jt_h_enumright)) * F)) /\ exists fs_q_jt_enumrightsecondcode. E = fs_q_jt_enumrightsecondcode * S ((S (jt_h_enumright)) * F) + (jt_d_enumright))) /\ (((exists fs_h_jt_enumrightsecondscale. fs_h_jt_enumrightsecondscale + S (jt_e_enumright) = S ((S (jt_h_enumright)) * H)) /\ exists fs_q_jt_enumrightsecondscale. G = fs_q_jt_enumrightsecondscale * S ((S (jt_h_enumright)) * H) + (jt_e_enumright))))) -> (forall jt_index_enumrightsame jt_left_enumrightsame jt_right_enumrightsame. (exists jt_gap_enumrightsameindex. jt_gap_enumrightsameindex+S (jt_index_enumrightsame)=(k)) -> (((exists fs_h_jt_enumrightsameleft. fs_h_jt_enumrightsameleft + S (jt_left_enumrightsame) = S ((S (jt_index_enumrightsame)) * jt_c_enumright)) /\ exists fs_q_jt_enumrightsameleft. jt_b_enumright = fs_q_jt_enumrightsameleft * S ((S (jt_index_enumrightsame)) * jt_c_enumright) + (jt_left_enumrightsame))) -> (((exists fs_h_jt_enumrightsameright. fs_h_jt_enumrightsameright + S (jt_right_enumrightsame) = S ((S (jt_index_enumrightsame)) * jt_e_enumright)) /\ exists fs_q_jt_enumrightsameright. jt_d_enumright = fs_q_jt_enumrightsameright * S ((S (jt_index_enumrightsame)) * jt_e_enumright) + (jt_right_enumrightsame))) -> jt_left_enumrightsame=jt_right_enumrightsame) -> jt_i_enumright=jt_h_enumright))))) -> (forall jt_index_enumrect. (exists jt_gap_enumrectindex. jt_gap_enumrectindex+S (jt_index_enumrect)=(u*v)) -> exists jt_row_enumrect jt_column_enumrect jt_b_enumrect jt_c_enumrect jt_d_enumrect jt_e_enumrect jt_f_enumrect jt_g_enumrect. ((exists jt_gap_enumrectrow. jt_gap_enumrectrow+S (jt_row_enumrect)=(u)) /\ (((exists jt_gap_enumrectcolumn. jt_gap_enumrectcolumn+S (jt_column_enumrect)=(v)) /\ (((jt_index_enumrect=(v)*jt_row_enumrect+jt_column_enumrect) /\ (((((((exists fs_h_jt_enumrectleftcode. fs_h_jt_enumrectleftcode + S (jt_b_enumrect) = S ((S (jt_row_enumrect)) * B)) /\ exists fs_q_jt_enumrectleftcode. A = fs_q_jt_enumrectleftcode * S ((S (jt_row_enumrect)) * B) + (jt_b_enumrect))) /\ (((exists fs_h_jt_enumrectleftscale. fs_h_jt_enumrectleftscale + S (jt_c_enumrect) = S ((S (jt_row_enumrect)) * D)) /\ exists fs_q_jt_enumrectleftscale. C = fs_q_jt_enumrectleftscale * S ((S (jt_row_enumrect)) * D) + (jt_c_enumrect))))) /\ (((((((exists fs_h_jt_enumrectrightcode. fs_h_jt_enumrectrightcode + S (jt_d_enumrect) = S ((S (jt_column_enumrect)) * F)) /\ exists fs_q_jt_enumrectrightcode. E = fs_q_jt_enumrectrightcode * S ((S (jt_column_enumrect)) * F) + (jt_d_enumrect))) /\ (((exists fs_h_jt_enumrectrightscale. fs_h_jt_enumrectrightscale + S (jt_e_enumrect) = S ((S (jt_column_enumrect)) * H)) /\ exists fs_q_jt_enumrectrightscale. G = fs_q_jt_enumrectrightscale * S ((S (jt_column_enumrect)) * H) + (jt_e_enumrect))))) /\ (((((((exists fs_h_jt_enumrectoutputcode. fs_h_jt_enumrectoutputcode + S (jt_f_enumrect) = S ((S (jt_index_enumrect)) * Q)) /\ exists fs_q_jt_enumrectoutputcode. P = fs_q_jt_enumrectoutputcode * S ((S (jt_index_enumrect)) * Q) + (jt_f_enumrect))) /\ (((exists fs_h_jt_enumrectoutputscale. fs_h_jt_enumrectoutputscale + S (jt_g_enumrect) = S ((S (jt_index_enumrect)) * T)) /\ exists fs_q_jt_enumrectoutputscale. R = fs_q_jt_enumrectoutputscale * S ((S (jt_index_enumrect)) * T) + (jt_g_enumrect))))) /\ (((((forall jt_index_enumrectcrtbound. (exists jt_gap_enumrectcrtboundindex. jt_gap_enumrectcrtboundindex+S (jt_index_enumrectcrtbound)=(k)) -> exists jt_value_enumrectcrtbound. ((((exists fs_h_jt_enumrectcrtboundat. fs_h_jt_enumrectcrtboundat + S (jt_value_enumrectcrtbound) = S ((S (jt_index_enumrectcrtbound)) * jt_g_enumrect)) /\ exists fs_q_jt_enumrectcrtboundat. jt_f_enumrect = fs_q_jt_enumrectcrtboundat * S ((S (jt_index_enumrectcrtbound)) * jt_g_enumrect) + (jt_value_enumrectcrtbound))) /\ (exists jt_gap_enumrectcrtboundvalue. jt_gap_enumrectcrtboundvalue+S (jt_value_enumrectcrtbound)=(m*n)))) /\ (((forall jt_index_enumrectcrtleft jt_left_enumrectcrtleft jt_right_enumrectcrtleft. (exists jt_gap_enumrectcrtleftindex. jt_gap_enumrectcrtleftindex+S (jt_index_enumrectcrtleft)=(k)) -> (((exists fs_h_jt_enumrectcrtleftleft. fs_h_jt_enumrectcrtleftleft + S (jt_left_enumrectcrtleft) = S ((S (jt_index_enumrectcrtleft)) * jt_g_enumrect)) /\ exists fs_q_jt_enumrectcrtleftleft. jt_f_enumrect = fs_q_jt_enumrectcrtleftleft * S ((S (jt_index_enumrectcrtleft)) * jt_g_enumrect) + (jt_left_enumrectcrtleft))) -> (((exists fs_h_jt_enumrectcrtleftright. fs_h_jt_enumrectcrtleftright + S (jt_right_enumrectcrtleft) = S ((S (jt_index_enumrectcrtleft)) * jt_c_enumrect)) /\ exists fs_q_jt_enumrectcrtleftright. jt_b_enumrect = fs_q_jt_enumrectcrtleftright * S ((S (jt_index_enumrectcrtleft)) * jt_c_enumrect) + (jt_right_enumrectcrtleft))) -> (exists jt_left_enumrectcrtleftmod jt_right_enumrectcrtleftmod. (jt_left_enumrectcrtleft)+(m)*jt_left_enumrectcrtleftmod=(jt_right_enumrectcrtleft)+(m)*jt_right_enumrectcrtleftmod)) /\ (forall jt_index_enumrectcrtright jt_left_enumrectcrtright jt_right_enumrectcrtright. (exists jt_gap_enumrectcrtrightindex. jt_gap_enumrectcrtrightindex+S (jt_index_enumrectcrtright)=(k)) -> (((exists fs_h_jt_enumrectcrtrightleft. fs_h_jt_enumrectcrtrightleft + S (jt_left_enumrectcrtright) = S ((S (jt_index_enumrectcrtright)) * jt_g_enumrect)) /\ exists fs_q_jt_enumrectcrtrightleft. jt_f_enumrect = fs_q_jt_enumrectcrtrightleft * S ((S (jt_index_enumrectcrtright)) * jt_g_enumrect) + (jt_left_enumrectcrtright))) -> (((exists fs_h_jt_enumrectcrtrightright. fs_h_jt_enumrectcrtrightright + S (jt_right_enumrectcrtright) = S ((S (jt_index_enumrectcrtright)) * jt_e_enumrect)) /\ exists fs_q_jt_enumrectcrtrightright. jt_d_enumrect = fs_q_jt_enumrectcrtrightright * S ((S (jt_index_enumrectcrtright)) * jt_e_enumrect) + (jt_right_enumrectcrtright))) -> (exists jt_left_enumrectcrtrightmod jt_right_enumrectcrtrightmod. (jt_left_enumrectcrtright)+(n)*jt_left_enumrectcrtrightmod=(jt_right_enumrectcrtright)+(n)*jt_right_enumrectcrtrightmod)))))) /\ (forall jt_divisor_enumrectprimitive. (exists jt_factor_enumrectprimitivemodulus. (m*n)=(jt_divisor_enumrectprimitive)*jt_factor_enumrectprimitivemodulus) -> (forall jt_index_enumrectprimitivecoordinates jt_value_enumrectprimitivecoordinates. (exists jt_gap_enumrectprimitivecoordinatesindex. jt_gap_enumrectprimitivecoordinatesindex+S (jt_index_enumrectprimitivecoordinates)=(k)) -> (((exists fs_h_jt_enumrectprimitivecoordinatesat. fs_h_jt_enumrectprimitivecoordinatesat + S (jt_value_enumrectprimitivecoordinates) = S ((S (jt_index_enumrectprimitivecoordinates)) * jt_g_enumrect)) /\ exists fs_q_jt_enumrectprimitivecoordinatesat. jt_f_enumrect = fs_q_jt_enumrectprimitivecoordinatesat * S ((S (jt_index_enumrectprimitivecoordinates)) * jt_g_enumrect) + (jt_value_enumrectprimitivecoordinates))) -> (exists jt_factor_enumrectprimitivecoordinatesdivides. (jt_value_enumrectprimitivecoordinates)=(jt_divisor_enumrectprimitive)*jt_factor_enumrectprimitivecoordinatesdivides)) -> jt_divisor_enumrectprimitive=1))))))))))))))) -> (forall jt_index_coverbound. (exists jt_gap_coverboundindex. jt_gap_coverboundindex+S (jt_index_coverbound)=(k)) -> exists jt_value_coverbound. ((((exists fs_h_jt_coverboundat. fs_h_jt_coverboundat + S (jt_value_coverbound) = S ((S (jt_index_coverbound)) * c)) /\ exists fs_q_jt_coverboundat. b = fs_q_jt_coverboundat * S ((S (jt_index_coverbound)) * c) + (jt_value_coverbound))) /\ (exists jt_gap_coverboundvalue. jt_gap_coverboundvalue+S (jt_value_coverbound)=(m*n)))) -> (forall jt_divisor_coverprim. (exists jt_factor_coverprimmodulus. (m*n)=(jt_divisor_coverprim)*jt_factor_coverprimmodulus) -> (forall jt_index_coverprimcoordinates jt_value_coverprimcoordinates. (exists jt_gap_coverprimcoordinatesindex. jt_gap_coverprimcoordinatesindex+S (jt_index_coverprimcoordinates)=(k)) -> (((exists fs_h_jt_coverprimcoordinatesat. fs_h_jt_coverprimcoordinatesat + S (jt_value_coverprimcoordinates) = S ((S (jt_index_coverprimcoordinates)) * c)) /\ exists fs_q_jt_coverprimcoordinatesat. b = fs_q_jt_coverprimcoordinatesat * S ((S (jt_index_coverprimcoordinates)) * c) + (jt_value_coverprimcoordinates))) -> (exists jt_factor_coverprimcoordinatesdivides. (jt_value_coverprimcoordinates)=(jt_divisor_coverprim)*jt_factor_coverprimcoordinatesdivides)) -> jt_divisor_coverprim=1) -> (exists jt_index_coverlisted jt_code_coverlisted jt_scale_coverlisted. ((exists jt_gap_coverlistedindex. jt_gap_coverlistedindex+S (jt_index_coverlisted)=(u*v)) /\ (((((((exists fs_h_jt_coverlistedcode. fs_h_jt_coverlistedcode + S (jt_code_coverlisted) = S ((S (jt_index_coverlisted)) * Q)) /\ exists fs_q_jt_coverlistedcode. P = fs_q_jt_coverlistedcode * S ((S (jt_index_coverlisted)) * Q) + (jt_code_coverlisted))) /\ (((exists fs_h_jt_coverlistedscale. fs_h_jt_coverlistedscale + S (jt_scale_coverlisted) = S ((S (jt_index_coverlisted)) * T)) /\ exists fs_q_jt_coverlistedscale. R = fs_q_jt_coverlistedscale * S ((S (jt_index_coverlisted)) * T) + (jt_scale_coverlisted))))) /\ (forall jt_index_coverlistedequal jt_left_coverlistedequal jt_right_coverlistedequal. (exists jt_gap_coverlistedequalindex. jt_gap_coverlistedequalindex+S (jt_index_coverlistedequal)=(k)) -> (((exists fs_h_jt_coverlistedequalleft. fs_h_jt_coverlistedequalleft + S (jt_left_coverlistedequal) = S ((S (jt_index_coverlistedequal)) * c)) /\ exists fs_q_jt_coverlistedequalleft. b = fs_q_jt_coverlistedequalleft * S ((S (jt_index_coverlistedequal)) * c) + (jt_left_coverlistedequal))) -> (((exists fs_h_jt_coverlistedequalright. fs_h_jt_coverlistedequalright + S (jt_right_coverlistedequal) = S ((S (jt_index_coverlistedequal)) * jt_scale_coverlisted)) /\ exists fs_q_jt_coverlistedequalright. jt_code_coverlisted = fs_q_jt_coverlistedequalright * S ((S (jt_index_coverlistedequal)) * jt_scale_coverlisted) + (jt_right_coverlistedequal))) -> jt_left_coverlistedequal=jt_right_coverlistedequal)))))Constructive proof overview
Generated structural guide
Every primitive product-modulus tuple reduces to a genuine source pair and is formally equal to its table output.
The unchanged tactic script uses 5 declared prerequisites and contains 140 exact native proof lines.
Alpha v35 checked-use · first admitted v35 · independently kernel and Lean verified; not Stable
Proof neighborhood
Direct dependencies
JT000C jordan_primitive_tuple_product_components JT0045 jordan_enumeration_reduce_primitive JT0044 jordan_rectangle_crt_pair_value JT0036 jordan_rectangle_flat_bound JT003C jordan_canonical_crt_tuple_uniqueDirect 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 (5)
01Fix variables and assumptionsL1–10
02Fix variables and assumptionsL11–20
03Fix variables and assumptionsL21–27
04Establish hcomponentsL28–35
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply jordan primitive tuple product components.
- L28
have hcomponents : JordanPrimitiveTuple(m,b,c,k) ∧ JordanPrimitiveTuple(n,b,c,k)Definitions: JordanPrimitiveTuple - L29
specialize jordan_primitive_tuple_product_components (m) - L30
specialize jordan_primitive_tuple_product_components (n) - L31
specialize jordan_primitive_tuple_product_components (b) - L32
specialize jordan_primitive_tuple_product_components (c) - L33
specialize jordan_primitive_tuple_product_components (k) - L34
apply jordan_primitive_tuple_product_components - L35
exact hprim
05Separate the logical casesL36–36
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L36
cases hcomponents
06Establish haL37–46
Establish this local claim before using it. It is not an additional assumption.
- L37
have ha : ∃ i. ∃ d. ∃ e. Lt(i,u) ∧ (BetaAt(A,B,i,d) ∧ BetaAt(C,D,i,e) ∧ JordanTupleCongruence(m,b,c,d,e,k))Definitions: JordanTupleCongruenceLtBetaAt - L38
specialize jordan_enumeration_reduce_primitive (m) - L39
specialize jordan_enumeration_reduce_primitive (k) - L40
specialize jordan_enumeration_reduce_primitive (A) - L41
specialize jordan_enumeration_reduce_primitive (B) - L42
specialize jordan_enumeration_reduce_primitive (C) - L43
specialize jordan_enumeration_reduce_primitive (D) - L44
specialize jordan_enumeration_reduce_primitive (u) - L45
specialize jordan_enumeration_reduce_primitive (b) - L46
specialize jordan_enumeration_reduce_primitive (c)
07Use earlier factsL47–50
08Separate the logical casesL51–55
09Establish hbL56–65
Establish this local claim before using it. It is not an additional assumption.
- L56
have hb : ∃ i. ∃ d. ∃ e. Lt(i,v) ∧ (BetaAt(E,F,i,d) ∧ BetaAt(G,H,i,e) ∧ JordanTupleCongruence(n,b,c,d,e,k))Definitions: JordanTupleCongruenceLtBetaAt - L57
specialize jordan_enumeration_reduce_primitive (n) - L58
specialize jordan_enumeration_reduce_primitive (k) - L59
specialize jordan_enumeration_reduce_primitive (E) - L60
specialize jordan_enumeration_reduce_primitive (F) - L61
specialize jordan_enumeration_reduce_primitive (G) - L62
specialize jordan_enumeration_reduce_primitive (H) - L63
specialize jordan_enumeration_reduce_primitive (v) - L64
specialize jordan_enumeration_reduce_primitive (b) - L65
specialize jordan_enumeration_reduce_primitive (c)
10Use earlier factsL66–69
11Separate the logical casesL70–74
12Establish houtL75–84
Establish this local claim before using it. It is not an additional assumption.
- L75
have hout : ∃ f. ∃ g. MatrixAt(P,Q,x,v,x3,f) ∧ MatrixAt(R,T,x,v,x3,g) ∧ (JordanCanonicalTupleCRT(m,n,x1,x2,x4,x5,f,g,k) ∧ JordanPrimitiveTuple(m · n,f,g,k))Definitions: MatrixAtJordanPrimitiveTupleJordanCanonicalTupleCRT - L76
specialize jordan_rectangle_crt_pair_value (m) - L77
specialize jordan_rectangle_crt_pair_value (n) - L78
specialize jordan_rectangle_crt_pair_value (k) - L79
specialize jordan_rectangle_crt_pair_value (A) - L80
specialize jordan_rectangle_crt_pair_value (B) - L81
specialize jordan_rectangle_crt_pair_value (C) - L82
specialize jordan_rectangle_crt_pair_value (D) - L83
specialize jordan_rectangle_crt_pair_value (u) - L84
specialize jordan_rectangle_crt_pair_value (E)
13Use earlier factsL85–94
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L85
specialize jordan_rectangle_crt_pair_value (F) - L86
specialize jordan_rectangle_crt_pair_value (G) - L87
specialize jordan_rectangle_crt_pair_value (H) - L88
specialize jordan_rectangle_crt_pair_value (v) - L89
specialize jordan_rectangle_crt_pair_value (P) - L90
specialize jordan_rectangle_crt_pair_value (Q) - L91
specialize jordan_rectangle_crt_pair_value (R) - L92
specialize jordan_rectangle_crt_pair_value (T) - L93
specialize jordan_rectangle_crt_pair_value (x) - L94
specialize jordan_rectangle_crt_pair_value (x3)
14Use earlier factsL95–104
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L95
specialize jordan_rectangle_crt_pair_value (x1) - L96
specialize jordan_rectangle_crt_pair_value (x2) - L97
specialize jordan_rectangle_crt_pair_value (x4) - L98
specialize jordan_rectangle_crt_pair_value (x5) - L99
apply jordan_rectangle_crt_pair_value - L100
exact hr - L101
exact ha_witness_witness_witness_left - L102
exact hb_witness_witness_witness_left - L103
exact ha_witness_witness_witness_right_left - L104
exact hb_witness_witness_witness_right_left
15Separate the logical casesL105–108
16Construct an explicit witnessL109–111
17Separate the logical casesL112–112
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L112
split
18Use earlier factsL113–119
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L113
specialize jordan_rectangle_flat_bound (u) - L114
specialize jordan_rectangle_flat_bound (v) - L115
specialize jordan_rectangle_flat_bound (x) - L116
specialize jordan_rectangle_flat_bound (x3) - L117
apply jordan_rectangle_flat_bound - L118
exact ha_witness_witness_witness_left - L119
exact hb_witness_witness_witness_left
19Separate the logical casesL120–120
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L120
split
20Use earlier factsL121–130
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L121
exact hout_witness_witness_left - L122
specialize jordan_canonical_crt_tuple_unique (m) - L123
specialize jordan_canonical_crt_tuple_unique (n) - L124
specialize jordan_canonical_crt_tuple_unique (x1) - L125
specialize jordan_canonical_crt_tuple_unique (x2) - L126
specialize jordan_canonical_crt_tuple_unique (x4) - L127
specialize jordan_canonical_crt_tuple_unique (x5) - L128
specialize jordan_canonical_crt_tuple_unique (b) - L129
specialize jordan_canonical_crt_tuple_unique (c) - L130
specialize jordan_canonical_crt_tuple_unique (x6)
21Use earlier factsL131–134
22Separate the logical casesL135–135
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L135
split
23Use earlier factsL136–136
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L136
exact hbound
24Separate the logical casesL137–137
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L137
split
Original exact command ledger · 140 lines
- 0001
intro m - 0002
intro n - 0003
intro k - 0004
intro A - 0005
intro B - 0006
intro C - 0007
intro D - 0008
intro u - 0009
intro E - 0010
intro F - 0011
intro G - 0012
intro H - 0013
intro v - 0014
intro P - 0015
intro Q - 0016
intro R - 0017
intro T - 0018
intro b - 0019
intro c - 0020
intro hm - 0021
intro hn - 0022
intro hcop - 0023
intro hl - 0024
intro hh - 0025
intro hr - 0026
intro hbound - 0027
intro hprim - 0028
have hcomponents : ((forall jt_divisor_coverm. (exists jt_factor_covermmodulus. (m)=(jt_divisor_coverm)*jt_factor_covermmodulus) -> (forall jt_index_covermcoordinates jt_value_covermcoordinates. (exists jt_gap_covermcoordinatesindex. jt_gap_covermcoordinatesindex+S (jt_index_covermcoordinates)=(k)) -> (((exists fs_h_jt_covermcoordinatesat. fs_h_jt_covermcoordinatesat + S (jt_value_covermcoordinates) = S ((S (jt_index_covermcoordinates)) * c)) /\ exists fs_q_jt_covermcoordinatesat. b = fs_q_jt_covermcoordinatesat * S ((S (jt_index_covermcoordinates)) * c) + (jt_value_covermcoordinates))) -> (exists jt_factor_covermcoordinatesdivides. (jt_value_covermcoordinates)=(jt_divisor_coverm)*jt_factor_covermcoordinatesdivides)) -> jt_divisor_coverm=1) /\ (forall jt_divisor_covern. (exists jt_factor_covernmodulus. (n)=(jt_divisor_covern)*jt_factor_covernmodulus) -> (forall jt_index_coverncoordinates jt_value_coverncoordinates. (exists jt_gap_coverncoordinatesindex. jt_gap_coverncoordinatesindex+S (jt_index_coverncoordinates)=(k)) -> (((exists fs_h_jt_coverncoordinatesat. fs_h_jt_coverncoordinatesat + S (jt_value_coverncoordinates) = S ((S (jt_index_coverncoordinates)) * c)) /\ exists fs_q_jt_coverncoordinatesat. b = fs_q_jt_coverncoordinatesat * S ((S (jt_index_coverncoordinates)) * c) + (jt_value_coverncoordinates))) -> (exists jt_factor_coverncoordinatesdivides. (jt_value_coverncoordinates)=(jt_divisor_covern)*jt_factor_coverncoordinatesdivides)) -> jt_divisor_covern=1)) - 0029
specialize jordan_primitive_tuple_product_components (m) - 0030
specialize jordan_primitive_tuple_product_components (n) - 0031
specialize jordan_primitive_tuple_product_components (b) - 0032
specialize jordan_primitive_tuple_product_components (c) - 0033
specialize jordan_primitive_tuple_product_components (k) - 0034
apply jordan_primitive_tuple_product_components - 0035
exact hprim - 0036
cases hcomponents - 0037
have ha : exists i d e. ((exists jt_gap_haindex. jt_gap_haindex+S (i)=(u)) /\ (((((((exists fs_h_jt_haentrycode. fs_h_jt_haentrycode + S (d) = S ((S (i)) * B)) /\ exists fs_q_jt_haentrycode. A = fs_q_jt_haentrycode * S ((S (i)) * B) + (d))) /\ (((exists fs_h_jt_haentryscale. fs_h_jt_haentryscale + S (e) = S ((S (i)) * D)) /\ exists fs_q_jt_haentryscale. C = fs_q_jt_haentryscale * S ((S (i)) * D) + (e))))) /\ (forall jt_index_hamod jt_left_hamod jt_right_hamod. (exists jt_gap_hamodindex. jt_gap_hamodindex+S (jt_index_hamod)=(k)) -> (((exists fs_h_jt_hamodleft. fs_h_jt_hamodleft + S (jt_left_hamod) = S ((S (jt_index_hamod)) * c)) /\ exists fs_q_jt_hamodleft. b = fs_q_jt_hamodleft * S ((S (jt_index_hamod)) * c) + (jt_left_hamod))) -> (((exists fs_h_jt_hamodright. fs_h_jt_hamodright + S (jt_right_hamod) = S ((S (jt_index_hamod)) * e)) /\ exists fs_q_jt_hamodright. d = fs_q_jt_hamodright * S ((S (jt_index_hamod)) * e) + (jt_right_hamod))) -> (exists jt_left_hamodmod jt_right_hamodmod. (jt_left_hamod)+(m)*jt_left_hamodmod=(jt_right_hamod)+(m)*jt_right_hamodmod))))) - 0038
specialize jordan_enumeration_reduce_primitive (m) - 0039
specialize jordan_enumeration_reduce_primitive (k) - 0040
specialize jordan_enumeration_reduce_primitive (A) - 0041
specialize jordan_enumeration_reduce_primitive (B) - 0042
specialize jordan_enumeration_reduce_primitive (C) - 0043
specialize jordan_enumeration_reduce_primitive (D) - 0044
specialize jordan_enumeration_reduce_primitive (u) - 0045
specialize jordan_enumeration_reduce_primitive (b) - 0046
specialize jordan_enumeration_reduce_primitive (c) - 0047
apply jordan_enumeration_reduce_primitive - 0048
exact hm - 0049
exact hl - 0050
exact hcomponents_left - 0051
cases ha - 0052
cases ha_witness - 0053
cases ha_witness_witness - 0054
cases ha_witness_witness_witness - 0055
cases ha_witness_witness_witness_right - 0056
have hb : exists i d e. ((exists jt_gap_hbindex. jt_gap_hbindex+S (i)=(v)) /\ (((((((exists fs_h_jt_hbentrycode. fs_h_jt_hbentrycode + S (d) = S ((S (i)) * F)) /\ exists fs_q_jt_hbentrycode. E = fs_q_jt_hbentrycode * S ((S (i)) * F) + (d))) /\ (((exists fs_h_jt_hbentryscale. fs_h_jt_hbentryscale + S (e) = S ((S (i)) * H)) /\ exists fs_q_jt_hbentryscale. G = fs_q_jt_hbentryscale * S ((S (i)) * H) + (e))))) /\ (forall jt_index_hbmod jt_left_hbmod jt_right_hbmod. (exists jt_gap_hbmodindex. jt_gap_hbmodindex+S (jt_index_hbmod)=(k)) -> (((exists fs_h_jt_hbmodleft. fs_h_jt_hbmodleft + S (jt_left_hbmod) = S ((S (jt_index_hbmod)) * c)) /\ exists fs_q_jt_hbmodleft. b = fs_q_jt_hbmodleft * S ((S (jt_index_hbmod)) * c) + (jt_left_hbmod))) -> (((exists fs_h_jt_hbmodright. fs_h_jt_hbmodright + S (jt_right_hbmod) = S ((S (jt_index_hbmod)) * e)) /\ exists fs_q_jt_hbmodright. d = fs_q_jt_hbmodright * S ((S (jt_index_hbmod)) * e) + (jt_right_hbmod))) -> (exists jt_left_hbmodmod jt_right_hbmodmod. (jt_left_hbmod)+(n)*jt_left_hbmodmod=(jt_right_hbmod)+(n)*jt_right_hbmodmod))))) - 0057
specialize jordan_enumeration_reduce_primitive (n) - 0058
specialize jordan_enumeration_reduce_primitive (k) - 0059
specialize jordan_enumeration_reduce_primitive (E) - 0060
specialize jordan_enumeration_reduce_primitive (F) - 0061
specialize jordan_enumeration_reduce_primitive (G) - 0062
specialize jordan_enumeration_reduce_primitive (H) - 0063
specialize jordan_enumeration_reduce_primitive (v) - 0064
specialize jordan_enumeration_reduce_primitive (b) - 0065
specialize jordan_enumeration_reduce_primitive (c) - 0066
apply jordan_enumeration_reduce_primitive - 0067
exact hn - 0068
exact hh - 0069
exact hcomponents_right - 0070
cases hb - 0071
cases hb_witness - 0072
cases hb_witness_witness - 0073
cases hb_witness_witness_witness - 0074
cases hb_witness_witness_witness_right - 0075
have hout : exists f g. ((((((exists fs_h_jt_coverentrycode. fs_h_jt_coverentrycode + S (f) = S ((S (v*x+x3)) * Q)) /\ exists fs_q_jt_coverentrycode. P = fs_q_jt_coverentrycode * S ((S (v*x+x3)) * Q) + (f))) /\ (((exists fs_h_jt_coverentryscale. fs_h_jt_coverentryscale + S (g) = S ((S (v*x+x3)) * T)) /\ exists fs_q_jt_coverentryscale. R = fs_q_jt_coverentryscale * S ((S (v*x+x3)) * T) + (g))))) /\ (((((forall jt_index_covercrtbound. (exists jt_gap_covercrtboundindex. jt_gap_covercrtboundindex+S (jt_index_covercrtbound)=(k)) -> exists jt_value_covercrtbound. ((((exists fs_h_jt_covercrtboundat. fs_h_jt_covercrtboundat + S (jt_value_covercrtbound) = S ((S (jt_index_covercrtbound)) * g)) /\ exists fs_q_jt_covercrtboundat. f = fs_q_jt_covercrtboundat * S ((S (jt_index_covercrtbound)) * g) + (jt_value_covercrtbound))) /\ (exists jt_gap_covercrtboundvalue. jt_gap_covercrtboundvalue+S (jt_value_covercrtbound)=(m*n)))) /\ (((forall jt_index_covercrtleft jt_left_covercrtleft jt_right_covercrtleft. (exists jt_gap_covercrtleftindex. jt_gap_covercrtleftindex+S (jt_index_covercrtleft)=(k)) -> (((exists fs_h_jt_covercrtleftleft. fs_h_jt_covercrtleftleft + S (jt_left_covercrtleft) = S ((S (jt_index_covercrtleft)) * g)) /\ exists fs_q_jt_covercrtleftleft. f = fs_q_jt_covercrtleftleft * S ((S (jt_index_covercrtleft)) * g) + (jt_left_covercrtleft))) -> (((exists fs_h_jt_covercrtleftright. fs_h_jt_covercrtleftright + S (jt_right_covercrtleft) = S ((S (jt_index_covercrtleft)) * x2)) /\ exists fs_q_jt_covercrtleftright. x1 = fs_q_jt_covercrtleftright * S ((S (jt_index_covercrtleft)) * x2) + (jt_right_covercrtleft))) -> (exists jt_left_covercrtleftmod jt_right_covercrtleftmod. (jt_left_covercrtleft)+(m)*jt_left_covercrtleftmod=(jt_right_covercrtleft)+(m)*jt_right_covercrtleftmod)) /\ (forall jt_index_covercrtright jt_left_covercrtright jt_right_covercrtright. (exists jt_gap_covercrtrightindex. jt_gap_covercrtrightindex+S (jt_index_covercrtright)=(k)) -> (((exists fs_h_jt_covercrtrightleft. fs_h_jt_covercrtrightleft + S (jt_left_covercrtright) = S ((S (jt_index_covercrtright)) * g)) /\ exists fs_q_jt_covercrtrightleft. f = fs_q_jt_covercrtrightleft * S ((S (jt_index_covercrtright)) * g) + (jt_left_covercrtright))) -> (((exists fs_h_jt_covercrtrightright. fs_h_jt_covercrtrightright + S (jt_right_covercrtright) = S ((S (jt_index_covercrtright)) * x5)) /\ exists fs_q_jt_covercrtrightright. x4 = fs_q_jt_covercrtrightright * S ((S (jt_index_covercrtright)) * x5) + (jt_right_covercrtright))) -> (exists jt_left_covercrtrightmod jt_right_covercrtrightmod. (jt_left_covercrtright)+(n)*jt_left_covercrtrightmod=(jt_right_covercrtright)+(n)*jt_right_covercrtrightmod)))))) /\ (forall jt_divisor_coverprimitive. (exists jt_factor_coverprimitivemodulus. (m*n)=(jt_divisor_coverprimitive)*jt_factor_coverprimitivemodulus) -> (forall jt_index_coverprimitivecoordinates jt_value_coverprimitivecoordinates. (exists jt_gap_coverprimitivecoordinatesindex. jt_gap_coverprimitivecoordinatesindex+S (jt_index_coverprimitivecoordinates)=(k)) -> (((exists fs_h_jt_coverprimitivecoordinatesat. fs_h_jt_coverprimitivecoordinatesat + S (jt_value_coverprimitivecoordinates) = S ((S (jt_index_coverprimitivecoordinates)) * g)) /\ exists fs_q_jt_coverprimitivecoordinatesat. f = fs_q_jt_coverprimitivecoordinatesat * S ((S (jt_index_coverprimitivecoordinates)) * g) + (jt_value_coverprimitivecoordinates))) -> (exists jt_factor_coverprimitivecoordinatesdivides. (jt_value_coverprimitivecoordinates)=(jt_divisor_coverprimitive)*jt_factor_coverprimitivecoordinatesdivides)) -> jt_divisor_coverprimitive=1)))) - 0076
specialize jordan_rectangle_crt_pair_value (m) - 0077
specialize jordan_rectangle_crt_pair_value (n) - 0078
specialize jordan_rectangle_crt_pair_value (k) - 0079
specialize jordan_rectangle_crt_pair_value (A) - 0080
specialize jordan_rectangle_crt_pair_value (B) - 0081
specialize jordan_rectangle_crt_pair_value (C) - 0082
specialize jordan_rectangle_crt_pair_value (D) - 0083
specialize jordan_rectangle_crt_pair_value (u) - 0084
specialize jordan_rectangle_crt_pair_value (E) - 0085
specialize jordan_rectangle_crt_pair_value (F) - 0086
specialize jordan_rectangle_crt_pair_value (G) - 0087
specialize jordan_rectangle_crt_pair_value (H) - 0088
specialize jordan_rectangle_crt_pair_value (v) - 0089
specialize jordan_rectangle_crt_pair_value (P) - 0090
specialize jordan_rectangle_crt_pair_value (Q) - 0091
specialize jordan_rectangle_crt_pair_value (R) - 0092
specialize jordan_rectangle_crt_pair_value (T) - 0093
specialize jordan_rectangle_crt_pair_value (x) - 0094
specialize jordan_rectangle_crt_pair_value (x3) - 0095
specialize jordan_rectangle_crt_pair_value (x1) - 0096
specialize jordan_rectangle_crt_pair_value (x2) - 0097
specialize jordan_rectangle_crt_pair_value (x4) - 0098
specialize jordan_rectangle_crt_pair_value (x5) - 0099
apply jordan_rectangle_crt_pair_value - 0100
exact hr - 0101
exact ha_witness_witness_witness_left - 0102
exact hb_witness_witness_witness_left - 0103
exact ha_witness_witness_witness_right_left - 0104
exact hb_witness_witness_witness_right_left - 0105
cases hout - 0106
cases hout_witness - 0107
cases hout_witness_witness - 0108
cases hout_witness_witness_right - 0109
exists v*x+x3 - 0110
exists x6 - 0111
exists x7 - 0112
split - 0113
specialize jordan_rectangle_flat_bound (u) - 0114
specialize jordan_rectangle_flat_bound (v) - 0115
specialize jordan_rectangle_flat_bound (x) - 0116
specialize jordan_rectangle_flat_bound (x3) - 0117
apply jordan_rectangle_flat_bound - 0118
exact ha_witness_witness_witness_left - 0119
exact hb_witness_witness_witness_left - 0120
split - 0121
exact hout_witness_witness_left - 0122
specialize jordan_canonical_crt_tuple_unique (m) - 0123
specialize jordan_canonical_crt_tuple_unique (n) - 0124
specialize jordan_canonical_crt_tuple_unique (x1) - 0125
specialize jordan_canonical_crt_tuple_unique (x2) - 0126
specialize jordan_canonical_crt_tuple_unique (x4) - 0127
specialize jordan_canonical_crt_tuple_unique (x5) - 0128
specialize jordan_canonical_crt_tuple_unique (b) - 0129
specialize jordan_canonical_crt_tuple_unique (c) - 0130
specialize jordan_canonical_crt_tuple_unique (x6) - 0131
specialize jordan_canonical_crt_tuple_unique (x7) - 0132
specialize jordan_canonical_crt_tuple_unique (k) - 0133
apply jordan_canonical_crt_tuple_unique - 0134
exact hcop - 0135
split - 0136
exact hbound - 0137
split - 0138
exact ha_witness_witness_witness_right_right - 0139
exact hb_witness_witness_witness_right_right - 0140
exact hout_witness_witness_right_left