INCREASE K INCREASE K INCREASE K INCREASE K INCREASE K INCREASE K INCREASE K INCREASE K INCREASE K INCREASE K
CLEAR M
REPEAT K TIMES ( INCREASE M INCREASE M )

CLEAR K
INCREASE K INCREASE K INCREASE K INCREASE K INCREASE K INCREASE K INCREASE K INCREASE K INCREASE K
CLEAR B
REPEAT K TIMES ( REPEAT M TIMES ( INCREASE B ) )

CLEAR R
INCREASE R

REPEAT B TIMES (
    REPEAT R TIMES (
        PRINT X

        CLEAR H
        CLEAR P
        REPEAT X TIMES (
            REPEAT P TIMES ( INCREASE H )
            CLEAR T
            INCREASE T
            REPEAT P TIMES ( CLEAR T )
            CLEAR P
            REPEAT T TIMES ( INCREASE P )
        )

        CLEAR D
        REPEAT P TIMES ( INCREASE D )
        REPEAT H TIMES ( CLEAR D )
        REPEAT D TIMES ( CLEAR R )

        CLEAR Y
        INCREASE Y
        REPEAT D TIMES ( CLEAR Y )

        REPEAT Y TIMES (
            CLEAR E
            INCREASE E
            REPEAT P TIMES ( CLEAR E )

            REPEAT E TIMES (
                CLEAR X
                REPEAT H TIMES ( INCREASE X )
            )

            REPEAT P TIMES (
                CLEAR X
                REPEAT H TIMES ( INCREASE X INCREASE X INCREASE X INCREASE X INCREASE X INCREASE X )
                INCREASE X INCREASE X INCREASE X INCREASE X
                PRINT X
                CLEAR X
                REPEAT H TIMES ( INCREASE X INCREASE X INCREASE X )
                INCREASE X INCREASE X
            )
        )
    )
)