INCREASE Y
INCREASE Y
INCREASE Y
INCREASE Y
INCREASE Y
#INCREASE X
#INCREASE X
#INCREASE X
#INCREASE X
INCREASE X
INCREASE X
INCREASE X
INCREASE B
INCREASE P
INCREASE D
REPEAT Y TIMES ( REPEAT Y TIMES ( REPEAT Y TIMES ( INCREASE O ) ) )
PRINT X
REPEAT O TIMES (
  REPEAT P TIMES (
    CLEAR P CLEAR N CLEAR B CLEAR C CLEAR A 
    REPEAT X TIMES (
      INCREASE B
      REPEAT A TIMES ( 
        CLEAR A CLEAR B
        INCREASE N
        CLEAR P INCREASE P
      )
      REPEAT B TIMES (
        INCREASE A
      )
    )
    #CLEAR P 
    #REPEAT N TIMES (
    #  CLEAR P INCREASE P
    #)
  )
  REPEAT P TIMES (
    CLEAR B INCREASE B
    REPEAT A TIMES (
      CLEAR B
      CLEAR Y
      INCREASE N
      REPEAT N TIMES ( INCREASE X )
      REPEAT X TIMES ( INCREASE Y )
      REPEAT X TIMES ( INCREASE Y )
      PRINT Y
      PRINT X
      CLEAR N CLEAR D CLEAR F 
      REPEAT X TIMES (
        INCREASE D
        REPEAT E TIMES ( 
          CLEAR E CLEAR D
          INCREASE N
        )
        REPEAT D TIMES (
          INCREASE E
        )
      )
      CLEAR D INCREASE D
      REPEAT E TIMES (
        CLEAR D
        CLEAR Y
        INCREASE N
        REPEAT N TIMES ( INCREASE X )
        REPEAT X TIMES ( INCREASE Y )
        REPEAT X TIMES ( INCREASE Y )
        PRINT Y
	PRINT X
      )
      REPEAT D TIMES ( CLEAR X 
        REPEAT N TIMES ( INCREASE X )
	PRINT X
      )
    )
    REPEAT B TIMES ( CLEAR X 
      REPEAT N TIMES ( INCREASE X )
      PRINT X
    )
    #3x+1
  )
)