# Q = 1/9x + 110

INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q # 5
REPEAT Q TIMES ( INCREASE Q ) # Q=10
REPEAT Q TIMES ( INCREASE Q INCREASE Q INCREASE Q INCREASE T INCREASE T INCREASE T ) # Q=40, T=30
REPEAT Q TIMES ( INCREASE Q ) # Q=80, T=30
REPEAT T TIMES ( INCREASE Q ) # Q=110

# Shift WER, one shift of WER => shift of DFG
INCREASE W
INCREASE D
REPEAT X TIMES (
  REPEAT R TIMES ( CLEAR R INCREASE W
    REPEAT G TIMES ( CLEAR G INCREASE D INCREASE Q )
    REPEAT F TIMES ( CLEAR F INCREASE G )
    REPEAT D TIMES ( CLEAR D INCREASE F )
  )
  REPEAT E TIMES ( CLEAR E INCREASE R )
  REPEAT W TIMES ( CLEAR W INCREASE E )
)

CLEAR S # s <= (x > 0)
CLEAR L
CLEAR M
INCREASE M
REPEAT X TIMES (
    REPEAT L TIMES ( CLEAR L INCREASE S )
    REPEAT M TIMES ( CLEAR M INCREASE L )
)

PRINT X
REPEAT Q TIMES (
    # if x > 1
    REPEAT S TIMES (
    
        # o: store x / 2 for quick access
        CLEAR O
 
        # a: even
        # b: odd
        CLEAR A
        INCREASE A
        CLEAR B
        REPEAT X TIMES (
          
            CLEAR T # copy t <= b
            REPEAT B TIMES ( INCREASE T )
            
            # flip-flop a/b
            # if a, if b
            REPEAT A TIMES ( CLEAR A INCREASE B )
            REPEAT T TIMES ( CLEAR B INCREASE A INCREASE O )
        )
 
        # if a
        REPEAT A TIMES (
 
            # out alrdy has x / 2
            # copy x <= out
            CLEAR X
            REPEAT O TIMES ( INCREASE X )
            
            CLEAR S # s <= (x > 0)
            CLEAR L
            CLEAR M
            INCREASE M
            REPEAT X TIMES (
                REPEAT L TIMES ( CLEAR L INCREASE S )
                REPEAT M TIMES ( CLEAR M INCREASE L )
            )

 
        )
        # else (if b)
        REPEAT B TIMES (
 
            # out alrdy has x / 2
            # add x <= o
            REPEAT O TIMES ( INCREASE X )
 
            # x *= 2
            REPEAT X TIMES ( INCREASE X )
 
            # x += 1
            INCREASE X
            INCREASE X
 
        )
 
        PRINT X
    )
)
#EOF