Exact expanded first-order arithmetic statement
forall k n A B C D u E F G H v. (((forall jt_i_cardinality_left. (exists jt_gap_cardinality_leftsoundindex. jt_gap_cardinality_leftsoundindex+S (jt_i_cardinality_left)=(u)) -> exists jt_b_cardinality_left jt_c_cardinality_left. ((((((exists fs_h_jt_cardinality_leftsoundcode. fs_h_jt_cardinality_leftsoundcode + S (jt_b_cardinality_left) = S ((S (jt_i_cardinality_left)) * B)) /\ exists fs_q_jt_cardinality_leftsoundcode. A = fs_q_jt_cardinality_leftsoundcode * S ((S (jt_i_cardinality_left)) * B) + (jt_b_cardinality_left))) /\ (((exists fs_h_jt_cardinality_leftsoundscale. fs_h_jt_cardinality_leftsoundscale + S (jt_c_cardinality_left) = S ((S (jt_i_cardinality_left)) * D)) /\ exists fs_q_jt_cardinality_leftsoundscale. C = fs_q_jt_cardinality_leftsoundscale * S ((S (jt_i_cardinality_left)) * D) + (jt_c_cardinality_left))))) /\ (((forall jt_index_cardinality_leftbound. (exists jt_gap_cardinality_leftboundindex. jt_gap_cardinality_leftboundindex+S (jt_index_cardinality_leftbound)=(k)) -> exists jt_value_cardinality_leftbound. ((((exists fs_h_jt_cardinality_leftboundat. fs_h_jt_cardinality_leftboundat + S (jt_value_cardinality_leftbound) = S ((S (jt_index_cardinality_leftbound)) * jt_c_cardinality_left)) /\ exists fs_q_jt_cardinality_leftboundat. jt_b_cardinality_left = fs_q_jt_cardinality_leftboundat * S ((S (jt_index_cardinality_leftbound)) * jt_c_cardinality_left) + (jt_value_cardinality_leftbound))) /\ (exists jt_gap_cardinality_leftboundvalue. jt_gap_cardinality_leftboundvalue+S (jt_value_cardinality_leftbound)=(n)))) /\ (forall jt_divisor_cardinality_leftprimitive. (exists jt_factor_cardinality_leftprimitivemodulus. (n)=(jt_divisor_cardinality_leftprimitive)*jt_factor_cardinality_leftprimitivemodulus) -> (forall jt_index_cardinality_leftprimitivecoordinates jt_value_cardinality_leftprimitivecoordinates. (exists jt_gap_cardinality_leftprimitivecoordinatesindex. jt_gap_cardinality_leftprimitivecoordinatesindex+S (jt_index_cardinality_leftprimitivecoordinates)=(k)) -> (((exists fs_h_jt_cardinality_leftprimitivecoordinatesat. fs_h_jt_cardinality_leftprimitivecoordinatesat + S (jt_value_cardinality_leftprimitivecoordinates) = S ((S (jt_index_cardinality_leftprimitivecoordinates)) * jt_c_cardinality_left)) /\ exists fs_q_jt_cardinality_leftprimitivecoordinatesat. jt_b_cardinality_left = fs_q_jt_cardinality_leftprimitivecoordinatesat * S ((S (jt_index_cardinality_leftprimitivecoordinates)) * jt_c_cardinality_left) + (jt_value_cardinality_leftprimitivecoordinates))) -> (exists jt_factor_cardinality_leftprimitivecoordinatesdivides. (jt_value_cardinality_leftprimitivecoordinates)=(jt_divisor_cardinality_leftprimitive)*jt_factor_cardinality_leftprimitivecoordinatesdivides)) -> jt_divisor_cardinality_leftprimitive=1))))) /\ (((forall jt_b_cardinality_left jt_c_cardinality_left. (forall jt_index_cardinality_leftinputbound. (exists jt_gap_cardinality_leftinputboundindex. jt_gap_cardinality_leftinputboundindex+S (jt_index_cardinality_leftinputbound)=(k)) -> exists jt_value_cardinality_leftinputbound. ((((exists fs_h_jt_cardinality_leftinputboundat. fs_h_jt_cardinality_leftinputboundat + S (jt_value_cardinality_leftinputbound) = S ((S (jt_index_cardinality_leftinputbound)) * jt_c_cardinality_left)) /\ exists fs_q_jt_cardinality_leftinputboundat. jt_b_cardinality_left = fs_q_jt_cardinality_leftinputboundat * S ((S (jt_index_cardinality_leftinputbound)) * jt_c_cardinality_left) + (jt_value_cardinality_leftinputbound))) /\ (exists jt_gap_cardinality_leftinputboundvalue. jt_gap_cardinality_leftinputboundvalue+S (jt_value_cardinality_leftinputbound)=(n)))) -> (forall jt_divisor_cardinality_leftinputprimitive. (exists jt_factor_cardinality_leftinputprimitivemodulus. (n)=(jt_divisor_cardinality_leftinputprimitive)*jt_factor_cardinality_leftinputprimitivemodulus) -> (forall jt_index_cardinality_leftinputprimitivecoordinates jt_value_cardinality_leftinputprimitivecoordinates. (exists jt_gap_cardinality_leftinputprimitivecoordinatesindex. jt_gap_cardinality_leftinputprimitivecoordinatesindex+S (jt_index_cardinality_leftinputprimitivecoordinates)=(k)) -> (((exists fs_h_jt_cardinality_leftinputprimitivecoordinatesat. fs_h_jt_cardinality_leftinputprimitivecoordinatesat + S (jt_value_cardinality_leftinputprimitivecoordinates) = S ((S (jt_index_cardinality_leftinputprimitivecoordinates)) * jt_c_cardinality_left)) /\ exists fs_q_jt_cardinality_leftinputprimitivecoordinatesat. jt_b_cardinality_left = fs_q_jt_cardinality_leftinputprimitivecoordinatesat * S ((S (jt_index_cardinality_leftinputprimitivecoordinates)) * jt_c_cardinality_left) + (jt_value_cardinality_leftinputprimitivecoordinates))) -> (exists jt_factor_cardinality_leftinputprimitivecoordinatesdivides. (jt_value_cardinality_leftinputprimitivecoordinates)=(jt_divisor_cardinality_leftinputprimitive)*jt_factor_cardinality_leftinputprimitivecoordinatesdivides)) -> jt_divisor_cardinality_leftinputprimitive=1) -> exists jt_i_cardinality_left jt_d_cardinality_left jt_e_cardinality_left. ((exists jt_gap_cardinality_leftcompleteindex. jt_gap_cardinality_leftcompleteindex+S (jt_i_cardinality_left)=(u)) /\ (((((((exists fs_h_jt_cardinality_leftcompletecode. fs_h_jt_cardinality_leftcompletecode + S (jt_d_cardinality_left) = S ((S (jt_i_cardinality_left)) * B)) /\ exists fs_q_jt_cardinality_leftcompletecode. A = fs_q_jt_cardinality_leftcompletecode * S ((S (jt_i_cardinality_left)) * B) + (jt_d_cardinality_left))) /\ (((exists fs_h_jt_cardinality_leftcompletescale. fs_h_jt_cardinality_leftcompletescale + S (jt_e_cardinality_left) = S ((S (jt_i_cardinality_left)) * D)) /\ exists fs_q_jt_cardinality_leftcompletescale. C = fs_q_jt_cardinality_leftcompletescale * S ((S (jt_i_cardinality_left)) * D) + (jt_e_cardinality_left))))) /\ (forall jt_index_cardinality_leftrepresented jt_left_cardinality_leftrepresented jt_right_cardinality_leftrepresented. (exists jt_gap_cardinality_leftrepresentedindex. jt_gap_cardinality_leftrepresentedindex+S (jt_index_cardinality_leftrepresented)=(k)) -> (((exists fs_h_jt_cardinality_leftrepresentedleft. fs_h_jt_cardinality_leftrepresentedleft + S (jt_left_cardinality_leftrepresented) = S ((S (jt_index_cardinality_leftrepresented)) * jt_c_cardinality_left)) /\ exists fs_q_jt_cardinality_leftrepresentedleft. jt_b_cardinality_left = fs_q_jt_cardinality_leftrepresentedleft * S ((S (jt_index_cardinality_leftrepresented)) * jt_c_cardinality_left) + (jt_left_cardinality_leftrepresented))) -> (((exists fs_h_jt_cardinality_leftrepresentedright. fs_h_jt_cardinality_leftrepresentedright + S (jt_right_cardinality_leftrepresented) = S ((S (jt_index_cardinality_leftrepresented)) * jt_e_cardinality_left)) /\ exists fs_q_jt_cardinality_leftrepresentedright. jt_d_cardinality_left = fs_q_jt_cardinality_leftrepresentedright * S ((S (jt_index_cardinality_leftrepresented)) * jt_e_cardinality_left) + (jt_right_cardinality_leftrepresented))) -> jt_left_cardinality_leftrepresented=jt_right_cardinality_leftrepresented))))) /\ (forall jt_i_cardinality_left jt_h_cardinality_left jt_b_cardinality_left jt_c_cardinality_left jt_d_cardinality_left jt_e_cardinality_left. (exists jt_gap_cardinality_leftfirstindex. jt_gap_cardinality_leftfirstindex+S (jt_i_cardinality_left)=(u)) -> (exists jt_gap_cardinality_leftsecondindex. jt_gap_cardinality_leftsecondindex+S (jt_h_cardinality_left)=(u)) -> (((((exists fs_h_jt_cardinality_leftfirstcode. fs_h_jt_cardinality_leftfirstcode + S (jt_b_cardinality_left) = S ((S (jt_i_cardinality_left)) * B)) /\ exists fs_q_jt_cardinality_leftfirstcode. A = fs_q_jt_cardinality_leftfirstcode * S ((S (jt_i_cardinality_left)) * B) + (jt_b_cardinality_left))) /\ (((exists fs_h_jt_cardinality_leftfirstscale. fs_h_jt_cardinality_leftfirstscale + S (jt_c_cardinality_left) = S ((S (jt_i_cardinality_left)) * D)) /\ exists fs_q_jt_cardinality_leftfirstscale. C = fs_q_jt_cardinality_leftfirstscale * S ((S (jt_i_cardinality_left)) * D) + (jt_c_cardinality_left))))) -> (((((exists fs_h_jt_cardinality_leftsecondcode. fs_h_jt_cardinality_leftsecondcode + S (jt_d_cardinality_left) = S ((S (jt_h_cardinality_left)) * B)) /\ exists fs_q_jt_cardinality_leftsecondcode. A = fs_q_jt_cardinality_leftsecondcode * S ((S (jt_h_cardinality_left)) * B) + (jt_d_cardinality_left))) /\ (((exists fs_h_jt_cardinality_leftsecondscale. fs_h_jt_cardinality_leftsecondscale + S (jt_e_cardinality_left) = S ((S (jt_h_cardinality_left)) * D)) /\ exists fs_q_jt_cardinality_leftsecondscale. C = fs_q_jt_cardinality_leftsecondscale * S ((S (jt_h_cardinality_left)) * D) + (jt_e_cardinality_left))))) -> (forall jt_index_cardinality_leftsame jt_left_cardinality_leftsame jt_right_cardinality_leftsame. (exists jt_gap_cardinality_leftsameindex. jt_gap_cardinality_leftsameindex+S (jt_index_cardinality_leftsame)=(k)) -> (((exists fs_h_jt_cardinality_leftsameleft. fs_h_jt_cardinality_leftsameleft + S (jt_left_cardinality_leftsame) = S ((S (jt_index_cardinality_leftsame)) * jt_c_cardinality_left)) /\ exists fs_q_jt_cardinality_leftsameleft. jt_b_cardinality_left = fs_q_jt_cardinality_leftsameleft * S ((S (jt_index_cardinality_leftsame)) * jt_c_cardinality_left) + (jt_left_cardinality_leftsame))) -> (((exists fs_h_jt_cardinality_leftsameright. fs_h_jt_cardinality_leftsameright + S (jt_right_cardinality_leftsame) = S ((S (jt_index_cardinality_leftsame)) * jt_e_cardinality_left)) /\ exists fs_q_jt_cardinality_leftsameright. jt_d_cardinality_left = fs_q_jt_cardinality_leftsameright * S ((S (jt_index_cardinality_leftsame)) * jt_e_cardinality_left) + (jt_right_cardinality_leftsame))) -> jt_left_cardinality_leftsame=jt_right_cardinality_leftsame) -> jt_i_cardinality_left=jt_h_cardinality_left))))) -> (((forall jt_i_cardinality_right. (exists jt_gap_cardinality_rightsoundindex. jt_gap_cardinality_rightsoundindex+S (jt_i_cardinality_right)=(v)) -> exists jt_b_cardinality_right jt_c_cardinality_right. ((((((exists fs_h_jt_cardinality_rightsoundcode. fs_h_jt_cardinality_rightsoundcode + S (jt_b_cardinality_right) = S ((S (jt_i_cardinality_right)) * F)) /\ exists fs_q_jt_cardinality_rightsoundcode. E = fs_q_jt_cardinality_rightsoundcode * S ((S (jt_i_cardinality_right)) * F) + (jt_b_cardinality_right))) /\ (((exists fs_h_jt_cardinality_rightsoundscale. fs_h_jt_cardinality_rightsoundscale + S (jt_c_cardinality_right) = S ((S (jt_i_cardinality_right)) * H)) /\ exists fs_q_jt_cardinality_rightsoundscale. G = fs_q_jt_cardinality_rightsoundscale * S ((S (jt_i_cardinality_right)) * H) + (jt_c_cardinality_right))))) /\ (((forall jt_index_cardinality_rightbound. (exists jt_gap_cardinality_rightboundindex. jt_gap_cardinality_rightboundindex+S (jt_index_cardinality_rightbound)=(k)) -> exists jt_value_cardinality_rightbound. ((((exists fs_h_jt_cardinality_rightboundat. fs_h_jt_cardinality_rightboundat + S (jt_value_cardinality_rightbound) = S ((S (jt_index_cardinality_rightbound)) * jt_c_cardinality_right)) /\ exists fs_q_jt_cardinality_rightboundat. jt_b_cardinality_right = fs_q_jt_cardinality_rightboundat * S ((S (jt_index_cardinality_rightbound)) * jt_c_cardinality_right) + (jt_value_cardinality_rightbound))) /\ (exists jt_gap_cardinality_rightboundvalue. jt_gap_cardinality_rightboundvalue+S (jt_value_cardinality_rightbound)=(n)))) /\ (forall jt_divisor_cardinality_rightprimitive. (exists jt_factor_cardinality_rightprimitivemodulus. (n)=(jt_divisor_cardinality_rightprimitive)*jt_factor_cardinality_rightprimitivemodulus) -> (forall jt_index_cardinality_rightprimitivecoordinates jt_value_cardinality_rightprimitivecoordinates. (exists jt_gap_cardinality_rightprimitivecoordinatesindex. jt_gap_cardinality_rightprimitivecoordinatesindex+S (jt_index_cardinality_rightprimitivecoordinates)=(k)) -> (((exists fs_h_jt_cardinality_rightprimitivecoordinatesat. fs_h_jt_cardinality_rightprimitivecoordinatesat + S (jt_value_cardinality_rightprimitivecoordinates) = S ((S (jt_index_cardinality_rightprimitivecoordinates)) * jt_c_cardinality_right)) /\ exists fs_q_jt_cardinality_rightprimitivecoordinatesat. jt_b_cardinality_right = fs_q_jt_cardinality_rightprimitivecoordinatesat * S ((S (jt_index_cardinality_rightprimitivecoordinates)) * jt_c_cardinality_right) + (jt_value_cardinality_rightprimitivecoordinates))) -> (exists jt_factor_cardinality_rightprimitivecoordinatesdivides. (jt_value_cardinality_rightprimitivecoordinates)=(jt_divisor_cardinality_rightprimitive)*jt_factor_cardinality_rightprimitivecoordinatesdivides)) -> jt_divisor_cardinality_rightprimitive=1))))) /\ (((forall jt_b_cardinality_right jt_c_cardinality_right. (forall jt_index_cardinality_rightinputbound. (exists jt_gap_cardinality_rightinputboundindex. jt_gap_cardinality_rightinputboundindex+S (jt_index_cardinality_rightinputbound)=(k)) -> exists jt_value_cardinality_rightinputbound. ((((exists fs_h_jt_cardinality_rightinputboundat. fs_h_jt_cardinality_rightinputboundat + S (jt_value_cardinality_rightinputbound) = S ((S (jt_index_cardinality_rightinputbound)) * jt_c_cardinality_right)) /\ exists fs_q_jt_cardinality_rightinputboundat. jt_b_cardinality_right = fs_q_jt_cardinality_rightinputboundat * S ((S (jt_index_cardinality_rightinputbound)) * jt_c_cardinality_right) + (jt_value_cardinality_rightinputbound))) /\ (exists jt_gap_cardinality_rightinputboundvalue. jt_gap_cardinality_rightinputboundvalue+S (jt_value_cardinality_rightinputbound)=(n)))) -> (forall jt_divisor_cardinality_rightinputprimitive. (exists jt_factor_cardinality_rightinputprimitivemodulus. (n)=(jt_divisor_cardinality_rightinputprimitive)*jt_factor_cardinality_rightinputprimitivemodulus) -> (forall jt_index_cardinality_rightinputprimitivecoordinates jt_value_cardinality_rightinputprimitivecoordinates. (exists jt_gap_cardinality_rightinputprimitivecoordinatesindex. jt_gap_cardinality_rightinputprimitivecoordinatesindex+S (jt_index_cardinality_rightinputprimitivecoordinates)=(k)) -> (((exists fs_h_jt_cardinality_rightinputprimitivecoordinatesat. fs_h_jt_cardinality_rightinputprimitivecoordinatesat + S (jt_value_cardinality_rightinputprimitivecoordinates) = S ((S (jt_index_cardinality_rightinputprimitivecoordinates)) * jt_c_cardinality_right)) /\ exists fs_q_jt_cardinality_rightinputprimitivecoordinatesat. jt_b_cardinality_right = fs_q_jt_cardinality_rightinputprimitivecoordinatesat * S ((S (jt_index_cardinality_rightinputprimitivecoordinates)) * jt_c_cardinality_right) + (jt_value_cardinality_rightinputprimitivecoordinates))) -> (exists jt_factor_cardinality_rightinputprimitivecoordinatesdivides. (jt_value_cardinality_rightinputprimitivecoordinates)=(jt_divisor_cardinality_rightinputprimitive)*jt_factor_cardinality_rightinputprimitivecoordinatesdivides)) -> jt_divisor_cardinality_rightinputprimitive=1) -> exists jt_i_cardinality_right jt_d_cardinality_right jt_e_cardinality_right. ((exists jt_gap_cardinality_rightcompleteindex. jt_gap_cardinality_rightcompleteindex+S (jt_i_cardinality_right)=(v)) /\ (((((((exists fs_h_jt_cardinality_rightcompletecode. fs_h_jt_cardinality_rightcompletecode + S (jt_d_cardinality_right) = S ((S (jt_i_cardinality_right)) * F)) /\ exists fs_q_jt_cardinality_rightcompletecode. E = fs_q_jt_cardinality_rightcompletecode * S ((S (jt_i_cardinality_right)) * F) + (jt_d_cardinality_right))) /\ (((exists fs_h_jt_cardinality_rightcompletescale. fs_h_jt_cardinality_rightcompletescale + S (jt_e_cardinality_right) = S ((S (jt_i_cardinality_right)) * H)) /\ exists fs_q_jt_cardinality_rightcompletescale. G = fs_q_jt_cardinality_rightcompletescale * S ((S (jt_i_cardinality_right)) * H) + (jt_e_cardinality_right))))) /\ (forall jt_index_cardinality_rightrepresented jt_left_cardinality_rightrepresented jt_right_cardinality_rightrepresented. (exists jt_gap_cardinality_rightrepresentedindex. jt_gap_cardinality_rightrepresentedindex+S (jt_index_cardinality_rightrepresented)=(k)) -> (((exists fs_h_jt_cardinality_rightrepresentedleft. fs_h_jt_cardinality_rightrepresentedleft + S (jt_left_cardinality_rightrepresented) = S ((S (jt_index_cardinality_rightrepresented)) * jt_c_cardinality_right)) /\ exists fs_q_jt_cardinality_rightrepresentedleft. jt_b_cardinality_right = fs_q_jt_cardinality_rightrepresentedleft * S ((S (jt_index_cardinality_rightrepresented)) * jt_c_cardinality_right) + (jt_left_cardinality_rightrepresented))) -> (((exists fs_h_jt_cardinality_rightrepresentedright. fs_h_jt_cardinality_rightrepresentedright + S (jt_right_cardinality_rightrepresented) = S ((S (jt_index_cardinality_rightrepresented)) * jt_e_cardinality_right)) /\ exists fs_q_jt_cardinality_rightrepresentedright. jt_d_cardinality_right = fs_q_jt_cardinality_rightrepresentedright * S ((S (jt_index_cardinality_rightrepresented)) * jt_e_cardinality_right) + (jt_right_cardinality_rightrepresented))) -> jt_left_cardinality_rightrepresented=jt_right_cardinality_rightrepresented))))) /\ (forall jt_i_cardinality_right jt_h_cardinality_right jt_b_cardinality_right jt_c_cardinality_right jt_d_cardinality_right jt_e_cardinality_right. (exists jt_gap_cardinality_rightfirstindex. jt_gap_cardinality_rightfirstindex+S (jt_i_cardinality_right)=(v)) -> (exists jt_gap_cardinality_rightsecondindex. jt_gap_cardinality_rightsecondindex+S (jt_h_cardinality_right)=(v)) -> (((((exists fs_h_jt_cardinality_rightfirstcode. fs_h_jt_cardinality_rightfirstcode + S (jt_b_cardinality_right) = S ((S (jt_i_cardinality_right)) * F)) /\ exists fs_q_jt_cardinality_rightfirstcode. E = fs_q_jt_cardinality_rightfirstcode * S ((S (jt_i_cardinality_right)) * F) + (jt_b_cardinality_right))) /\ (((exists fs_h_jt_cardinality_rightfirstscale. fs_h_jt_cardinality_rightfirstscale + S (jt_c_cardinality_right) = S ((S (jt_i_cardinality_right)) * H)) /\ exists fs_q_jt_cardinality_rightfirstscale. G = fs_q_jt_cardinality_rightfirstscale * S ((S (jt_i_cardinality_right)) * H) + (jt_c_cardinality_right))))) -> (((((exists fs_h_jt_cardinality_rightsecondcode. fs_h_jt_cardinality_rightsecondcode + S (jt_d_cardinality_right) = S ((S (jt_h_cardinality_right)) * F)) /\ exists fs_q_jt_cardinality_rightsecondcode. E = fs_q_jt_cardinality_rightsecondcode * S ((S (jt_h_cardinality_right)) * F) + (jt_d_cardinality_right))) /\ (((exists fs_h_jt_cardinality_rightsecondscale. fs_h_jt_cardinality_rightsecondscale + S (jt_e_cardinality_right) = S ((S (jt_h_cardinality_right)) * H)) /\ exists fs_q_jt_cardinality_rightsecondscale. G = fs_q_jt_cardinality_rightsecondscale * S ((S (jt_h_cardinality_right)) * H) + (jt_e_cardinality_right))))) -> (forall jt_index_cardinality_rightsame jt_left_cardinality_rightsame jt_right_cardinality_rightsame. (exists jt_gap_cardinality_rightsameindex. jt_gap_cardinality_rightsameindex+S (jt_index_cardinality_rightsame)=(k)) -> (((exists fs_h_jt_cardinality_rightsameleft. fs_h_jt_cardinality_rightsameleft + S (jt_left_cardinality_rightsame) = S ((S (jt_index_cardinality_rightsame)) * jt_c_cardinality_right)) /\ exists fs_q_jt_cardinality_rightsameleft. jt_b_cardinality_right = fs_q_jt_cardinality_rightsameleft * S ((S (jt_index_cardinality_rightsame)) * jt_c_cardinality_right) + (jt_left_cardinality_rightsame))) -> (((exists fs_h_jt_cardinality_rightsameright. fs_h_jt_cardinality_rightsameright + S (jt_right_cardinality_rightsame) = S ((S (jt_index_cardinality_rightsame)) * jt_e_cardinality_right)) /\ exists fs_q_jt_cardinality_rightsameright. jt_d_cardinality_right = fs_q_jt_cardinality_rightsameright * S ((S (jt_index_cardinality_rightsame)) * jt_e_cardinality_right) + (jt_right_cardinality_rightsame))) -> jt_left_cardinality_rightsame=jt_right_cardinality_rightsame) -> jt_i_cardinality_right=jt_h_cardinality_right))))) -> (exists jt_gap_cardinality_result. jt_gap_cardinality_result+(u)=(v))Constructive proof overview
Generated structural guide
A genuinely constructed bounded injection implies the source count is at most the target count, including empty lists.
The unchanged tactic script uses 5 declared prerequisites and contains 70 exact native proof lines.
Alpha v35 checked-use · first admitted v35 · independently kernel and Lean verified; not Stable
Proof neighborhood
Direct dependencies
JT0050 jordan_enumeration_index_map_exists le_refl Alpha theorem; checked-use authorized JT0052 jordan_enumeration_index_map_bounded_injective le_or_lt Alpha theorem; checked-use authorized finite_bounded_into_oversized_not_injective Alpha theorem; checked-use authorizedDirect dependents
Formal native tactic body
Dependencies are introduced as named hypotheses before line 1. Local theorem links identify exact declared prerequisites. This exact body belongs to a complete independently kernel-checked constructive proof bundle and has Alpha checked-use authority; it does not imply Stable membership.
Read the argument
Proof checkpoints
This is a reading aid, not a new proof or a proof-tree certificate. Checkpoint groups are consecutive commands, not inferred branch boundaries. Every step links to the preserved script.
Named ingredients (2)
01Fix variables and assumptionsL1–10
02Fix variables and assumptionsL11–14
03Establish hmL15–24
Establish this local claim before using it. It is not an additional assumption.
- L15
have hm : ∃ Z. ∃ W. ∀ jt_index_cardinality_map. Lt(jt_index_cardinality_map,u) → ∃ x. BetaAt(Z,W,jt_index_cardinality_map,x) ∧ (Lt(x,v) ∧ (∀ y. ∀ z. ∀ n. ∀ m. BetaAt(A,B,jt_index_cardinality_map,y) ∧ BetaAt(C,D,jt_index_cardinality_map,z) → BetaAt(E,F,x,n) ∧ BetaAt(G,H,x,m) → IntegerVectorZero(y,z,n,m,k)))Definitions: IntegerVectorZeroLtBetaAt - L16
specialize jordan_enumeration_index_map_exists (u) - L17
specialize jordan_enumeration_index_map_exists (k) - L18
specialize jordan_enumeration_index_map_exists (n) - L19
specialize jordan_enumeration_index_map_exists (A) - L20
specialize jordan_enumeration_index_map_exists (B) - L21
specialize jordan_enumeration_index_map_exists (C) - L22
specialize jordan_enumeration_index_map_exists (D) - L23
specialize jordan_enumeration_index_map_exists (u) - L24
specialize jordan_enumeration_index_map_exists (E)
04Use earlier factsL25–33
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L25
specialize jordan_enumeration_index_map_exists (F) - L26
specialize jordan_enumeration_index_map_exists (G) - L27
specialize jordan_enumeration_index_map_exists (H) - L28
specialize jordan_enumeration_index_map_exists (v) - L29
apply jordan_enumeration_index_map_exists - L30
exact hl - L31
exact hr - L32
specialize le_refl (u) - L33
apply le_refl
05Separate the logical casesL34–35
06Establish hinjL36–45
Establish this local claim before using it. It is not an additional assumption.
- L36
have hinj : FiniteMatrixSelector(x,x1,u,v)Definitions: FiniteMatrixSelector - L37
specialize jordan_enumeration_index_map_bounded_injective (k) - L38
specialize jordan_enumeration_index_map_bounded_injective (n) - L39
specialize jordan_enumeration_index_map_bounded_injective (A) - L40
specialize jordan_enumeration_index_map_bounded_injective (B) - L41
specialize jordan_enumeration_index_map_bounded_injective (C) - L42
specialize jordan_enumeration_index_map_bounded_injective (D) - L43
specialize jordan_enumeration_index_map_bounded_injective (u) - L44
specialize jordan_enumeration_index_map_bounded_injective (E) - L45
specialize jordan_enumeration_index_map_bounded_injective (F)
07Use earlier factsL46–54
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L46
specialize jordan_enumeration_index_map_bounded_injective (G) - L47
specialize jordan_enumeration_index_map_bounded_injective (H) - L48
specialize jordan_enumeration_index_map_bounded_injective (v) - L49
specialize jordan_enumeration_index_map_bounded_injective (x) - L50
specialize jordan_enumeration_index_map_bounded_injective (x1) - L51
apply jordan_enumeration_index_map_bounded_injective - L52
exact hl - L53
exact hr - L54
exact hm_witness_witness
08Separate the logical casesL55–55
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L55
cases hinj
09Establish hcL56–59
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply le or lt.
10Separate the logical casesL60–60
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L60
cases hc
11Use earlier factsL61–61
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L61
exact hc_left
12Separate the logical casesL62–62
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L62
exfalso
13Use earlier factsL63–70
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L63
specialize finite_bounded_into_oversized_not_injective (x) - L64
specialize finite_bounded_into_oversized_not_injective (x1) - L65
specialize finite_bounded_into_oversized_not_injective (u) - L66
specialize finite_bounded_into_oversized_not_injective (v) - L67
apply finite_bounded_into_oversized_not_injective - L68
exact hinj_left - L69
exact hc_right - L70
exact hinj_right
Original exact command ledger · 70 lines
- 0001
intro k - 0002
intro n - 0003
intro A - 0004
intro B - 0005
intro C - 0006
intro D - 0007
intro u - 0008
intro E - 0009
intro F - 0010
intro G - 0011
intro H - 0012
intro v - 0013
intro hl - 0014
intro hr - 0015
have hm : exists Z W. forall jt_index_cardinality_map. (exists jt_gap_cardinality_mapindex. jt_gap_cardinality_mapindex+S (jt_index_cardinality_map)=(u)) -> exists jt_image_cardinality_map. ((((exists fs_h_jt_cardinality_mapat. fs_h_jt_cardinality_mapat + S (jt_image_cardinality_map) = S ((S (jt_index_cardinality_map)) * W)) /\ exists fs_q_jt_cardinality_mapat. Z = fs_q_jt_cardinality_mapat * S ((S (jt_index_cardinality_map)) * W) + (jt_image_cardinality_map))) /\ (((exists jt_gap_cardinality_mapbound. jt_gap_cardinality_mapbound+S (jt_image_cardinality_map)=(v)) /\ (forall jt_b_cardinality_mapmatch jt_c_cardinality_mapmatch jt_d_cardinality_mapmatch jt_e_cardinality_mapmatch. (((((exists fs_h_jt_cardinality_mapmatchleftcode. fs_h_jt_cardinality_mapmatchleftcode + S (jt_b_cardinality_mapmatch) = S ((S (jt_index_cardinality_map)) * B)) /\ exists fs_q_jt_cardinality_mapmatchleftcode. A = fs_q_jt_cardinality_mapmatchleftcode * S ((S (jt_index_cardinality_map)) * B) + (jt_b_cardinality_mapmatch))) /\ (((exists fs_h_jt_cardinality_mapmatchleftscale. fs_h_jt_cardinality_mapmatchleftscale + S (jt_c_cardinality_mapmatch) = S ((S (jt_index_cardinality_map)) * D)) /\ exists fs_q_jt_cardinality_mapmatchleftscale. C = fs_q_jt_cardinality_mapmatchleftscale * S ((S (jt_index_cardinality_map)) * D) + (jt_c_cardinality_mapmatch))))) -> (((((exists fs_h_jt_cardinality_mapmatchrightcode. fs_h_jt_cardinality_mapmatchrightcode + S (jt_d_cardinality_mapmatch) = S ((S (jt_image_cardinality_map)) * F)) /\ exists fs_q_jt_cardinality_mapmatchrightcode. E = fs_q_jt_cardinality_mapmatchrightcode * S ((S (jt_image_cardinality_map)) * F) + (jt_d_cardinality_mapmatch))) /\ (((exists fs_h_jt_cardinality_mapmatchrightscale. fs_h_jt_cardinality_mapmatchrightscale + S (jt_e_cardinality_mapmatch) = S ((S (jt_image_cardinality_map)) * H)) /\ exists fs_q_jt_cardinality_mapmatchrightscale. G = fs_q_jt_cardinality_mapmatchrightscale * S ((S (jt_image_cardinality_map)) * H) + (jt_e_cardinality_mapmatch))))) -> (forall jt_index_cardinality_mapmatchequal jt_left_cardinality_mapmatchequal jt_right_cardinality_mapmatchequal. (exists jt_gap_cardinality_mapmatchequalindex. jt_gap_cardinality_mapmatchequalindex+S (jt_index_cardinality_mapmatchequal)=(k)) -> (((exists fs_h_jt_cardinality_mapmatchequalleft. fs_h_jt_cardinality_mapmatchequalleft + S (jt_left_cardinality_mapmatchequal) = S ((S (jt_index_cardinality_mapmatchequal)) * jt_c_cardinality_mapmatch)) /\ exists fs_q_jt_cardinality_mapmatchequalleft. jt_b_cardinality_mapmatch = fs_q_jt_cardinality_mapmatchequalleft * S ((S (jt_index_cardinality_mapmatchequal)) * jt_c_cardinality_mapmatch) + (jt_left_cardinality_mapmatchequal))) -> (((exists fs_h_jt_cardinality_mapmatchequalright. fs_h_jt_cardinality_mapmatchequalright + S (jt_right_cardinality_mapmatchequal) = S ((S (jt_index_cardinality_mapmatchequal)) * jt_e_cardinality_mapmatch)) /\ exists fs_q_jt_cardinality_mapmatchequalright. jt_d_cardinality_mapmatch = fs_q_jt_cardinality_mapmatchequalright * S ((S (jt_index_cardinality_mapmatchequal)) * jt_e_cardinality_mapmatch) + (jt_right_cardinality_mapmatchequal))) -> jt_left_cardinality_mapmatchequal=jt_right_cardinality_mapmatchequal))))) - 0016
specialize jordan_enumeration_index_map_exists (u) - 0017
specialize jordan_enumeration_index_map_exists (k) - 0018
specialize jordan_enumeration_index_map_exists (n) - 0019
specialize jordan_enumeration_index_map_exists (A) - 0020
specialize jordan_enumeration_index_map_exists (B) - 0021
specialize jordan_enumeration_index_map_exists (C) - 0022
specialize jordan_enumeration_index_map_exists (D) - 0023
specialize jordan_enumeration_index_map_exists (u) - 0024
specialize jordan_enumeration_index_map_exists (E) - 0025
specialize jordan_enumeration_index_map_exists (F) - 0026
specialize jordan_enumeration_index_map_exists (G) - 0027
specialize jordan_enumeration_index_map_exists (H) - 0028
specialize jordan_enumeration_index_map_exists (v) - 0029
apply jordan_enumeration_index_map_exists - 0030
exact hl - 0031
exact hr - 0032
specialize le_refl (u) - 0033
apply le_refl - 0034
cases hm - 0035
cases hm_witness - 0036
have hinj : ((forall jt_index_cardinality_bound. (exists jt_gap_cardinality_boundindex. jt_gap_cardinality_boundindex+S (jt_index_cardinality_bound)=(u)) -> exists jt_value_cardinality_bound. ((((exists fs_h_jt_cardinality_boundat. fs_h_jt_cardinality_boundat + S (jt_value_cardinality_bound) = S ((S (jt_index_cardinality_bound)) * x1)) /\ exists fs_q_jt_cardinality_boundat. x = fs_q_jt_cardinality_boundat * S ((S (jt_index_cardinality_bound)) * x1) + (jt_value_cardinality_bound))) /\ (exists jt_gap_cardinality_boundvalue. jt_gap_cardinality_boundvalue+S (jt_value_cardinality_bound)=(v)))) /\ (forall fp_i_cardinality_inj fp_j_cardinality_inj fp_value_cardinality_inj. (exists fp_gap_cardinality_inj_i. fp_gap_cardinality_inj_i + S fp_i_cardinality_inj = u) -> (exists fp_gap_cardinality_inj_j. fp_gap_cardinality_inj_j + S fp_j_cardinality_inj = u) -> (((exists ff_h_cardinality_inj_left. ff_h_cardinality_inj_left + S (fp_value_cardinality_inj) = S ((S (fp_i_cardinality_inj)) * x1)) /\ exists ff_q_cardinality_inj_left. x = ff_q_cardinality_inj_left * S ((S (fp_i_cardinality_inj)) * x1) + (fp_value_cardinality_inj))) -> (((exists ff_h_cardinality_inj_right. ff_h_cardinality_inj_right + S (fp_value_cardinality_inj) = S ((S (fp_j_cardinality_inj)) * x1)) /\ exists ff_q_cardinality_inj_right. x = ff_q_cardinality_inj_right * S ((S (fp_j_cardinality_inj)) * x1) + (fp_value_cardinality_inj))) -> fp_i_cardinality_inj = fp_j_cardinality_inj)) - 0037
specialize jordan_enumeration_index_map_bounded_injective (k) - 0038
specialize jordan_enumeration_index_map_bounded_injective (n) - 0039
specialize jordan_enumeration_index_map_bounded_injective (A) - 0040
specialize jordan_enumeration_index_map_bounded_injective (B) - 0041
specialize jordan_enumeration_index_map_bounded_injective (C) - 0042
specialize jordan_enumeration_index_map_bounded_injective (D) - 0043
specialize jordan_enumeration_index_map_bounded_injective (u) - 0044
specialize jordan_enumeration_index_map_bounded_injective (E) - 0045
specialize jordan_enumeration_index_map_bounded_injective (F) - 0046
specialize jordan_enumeration_index_map_bounded_injective (G) - 0047
specialize jordan_enumeration_index_map_bounded_injective (H) - 0048
specialize jordan_enumeration_index_map_bounded_injective (v) - 0049
specialize jordan_enumeration_index_map_bounded_injective (x) - 0050
specialize jordan_enumeration_index_map_bounded_injective (x1) - 0051
apply jordan_enumeration_index_map_bounded_injective - 0052
exact hl - 0053
exact hr - 0054
exact hm_witness_witness - 0055
cases hinj - 0056
have hc : (exists jt_gap_cardinality_le. jt_gap_cardinality_le+(u)=(v)) \/ (exists jt_gap_cardinality_overflow. jt_gap_cardinality_overflow+S (v)=(u)) - 0057
specialize le_or_lt (u) - 0058
specialize le_or_lt (v) - 0059
apply le_or_lt - 0060
cases hc - 0061
exact hc_left - 0062
exfalso - 0063
specialize finite_bounded_into_oversized_not_injective (x) - 0064
specialize finite_bounded_into_oversized_not_injective (x1) - 0065
specialize finite_bounded_into_oversized_not_injective (u) - 0066
specialize finite_bounded_into_oversized_not_injective (v) - 0067
apply finite_bounded_into_oversized_not_injective - 0068
exact hinj_left - 0069
exact hc_right - 0070
exact hinj_right