# Assign big num for loop (113)
INCREASE L INCREASE L INCREASE L INCREASE L INCREASE L
REPEAT L TIMES (
    INCREASE L INCREASE L INCREASE L INCREASE L
)
REPEAT L TIMES (
    INCREASE L INCREASE L INCREASE L
)
INCREASE L INCREASE L INCREASE L INCREASE L INCREASE L INCREASE L INCREASE L INCREASE L INCREASE L INCREASE L INCREASE L INCREASE L INCREASE L

# PRINT L
 
INCREASE B
 
# I: bool - is iteration ongoing (hasn't reached 1 and should still iterate)
 
# check: do we start iterating (is x > 1) --> I
REPEAT X TIMES ( 
    # if K is true: set I to true
    REPEAT K TIMES (
        CLEAR I INCREASE I
        CLEAR K
    )
    # set K to true
    INCREASE K
)

REPEAT L TIMES (
    REPEAT I TIMES (
        # Print number of the series

        PRINT X
        
        # calculate halved X to H and find out if X is even in B
        CLEAR H # halved value
        CLEAR Q
        CLEAR D
        CLEAR E #INCREASE E
        REPEAT X TIMES (
            CLEAR B
            # increment accumulation H if iteration is even
            REPEAT A TIMES (
                INCREASE H
                #CLEAR A
                INCREASE B

                # quarter stuff
                CLEAR E
                REPEAT D TIMES (
                    INCREASE Q
                    INCREASE E
                )
                INCREASE D REPEAT E TIMES ( CLEAR D )
            )
            INCREASE A REPEAT B TIMES ( CLEAR A )
        )

        # if X is even: move H value to X
        REPEAT B TIMES ( 
            #CLEAR A
            CLEAR I
            CLEAR K
            # H is even
            REPEAT E TIMES (
                PRINT H
                CLEAR X REPEAT Q TIMES ( 
                    INCREASE X
                    # check if H > 1
                    # if K is true: set I to true
                    REPEAT K TIMES (
                        CLEAR I
                        INCREASE I
                        CLEAR K
                    )
                    # set K to true
                    INCREASE K
                )
            )
            # H is uneven
            REPEAT D TIMES (
                CLEAR X REPEAT H TIMES ( 
                    INCREASE X

                    # check if H > 1
                    # if K is true: set I to true
                    REPEAT K TIMES (
                        CLEAR I
                        INCREASE I
                        CLEAR K
                    )
                    # set K to true
                    INCREASE K
                )

                # H > 1
                REPEAT I TIMES (
                    PRINT X
                    REPEAT X TIMES (
                        INCREASE X
                        INCREASE X
                    )
                    INCREASE X
                    PRINT X

                    # H is uneven
                    REPEAT D TIMES (
                        # X is now guaranteed to be even and the next num is 3 * H + 2
                        CLEAR X REPEAT Q TIMES ( INCREASE X INCREASE X INCREASE X )
                        INCREASE X INCREASE X
                    )
                )
            )
        )
        
        # if x not even
        REPEAT A TIMES (
            # setup for next iter
            CLEAR A
            #INCREASE B

            # perform X += 2 * X + 1 and print X

            REPEAT X TIMES (
                INCREASE X
                INCREASE X
            )
            INCREASE X
            PRINT X

            # H is even
            REPEAT E TIMES (
                # Next val is 3 * H + 2
                REPEAT H TIMES ( INCREASE H INCREASE H )
                INCREASE H INCREASE H
                PRINT H
                
                #CLEAR A
                CLEAR I
                # Next val is 3 * Q + 1
                CLEAR X REPEAT Q TIMES ( 
                    INCREASE X INCREASE X INCREASE X

                    # check if Q > 0
                    CLEAR I INCREASE I
                )
                INCREASE X
            )

            # H is uneven
            REPEAT D TIMES (
                # X is now guaranteed to be even and the next num is 3 * H + 2
                CLEAR X REPEAT H TIMES ( INCREASE X INCREASE X INCREASE X )
                INCREASE X INCREASE X
            )
        )
    )
)
INCREASE S
PRINT S