# Assign big num for loop (115) (minimum 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 INCREASE L INCREASE L

#PRINT L

INCREASE B

# I: bool - is iteration ongoing (hasn't reached 1 and should still iterate)
# INCREASE I

REPEAT L TIMES (
    # check: do we keep iterating (is x > 1)
    REPEAT B TIMES (
        CLEAR I
        CLEAR K
        REPEAT X TIMES ( 
            # if K is true: set I to true
            REPEAT K TIMES (
                CLEAR I INCREASE I
            )
            # set K to true
            CLEAR K INCREASE K
        )
    )
    
    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
        REPEAT A TIMES (
            CLEAR A # current iter is uneven
            CLEAR B INCREASE B # current iter is even
        )
        REPEAT X TIMES (
            CLEAR B
            # increment accumulation H if iteration is even
            REPEAT A TIMES (
                INCREASE H
                CLEAR A
                INCREASE B
            )
            INCREASE A REPEAT B TIMES ( CLEAR A )
        )
        # if X is even: move H value to X
        REPEAT B TIMES ( 
            CLEAR X REPEAT H TIMES ( INCREASE X )
        )
        
        # if x not even
        REPEAT A TIMES (
            # perform X+=2X+1

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

            # next is guaranteed to be even and it is 3H+2
            CLEAR X REPEAT H TIMES ( INCREASE X INCREASE X INCREASE X )
            INCREASE X INCREASE X
        )

    )
)
INCREASE S
PRINT S