99
range1
m:
    show
    ( ",A=" "N=" )
    rrot
    @2
    @2
    11
    /
    10
    +
    smallest
    inc
    half
    show-line