Human Resource Machine Year 28 Three Sort solution 3

HRM.28.Three Sort.3.hrm

-- HUMAN RESOURCE MACHINE PROGRAM --

    COMMENT  0
a:
    INBOX   
    COPYTO   8
    COPYTO   9
    INBOX   
    SUB      8
    JUMPN    b
    ADD      8
    COPYTO   9
    JUMP     c
b:
    ADD      8
    COPYTO   8
c:
    COMMENT  1
    INBOX   
    COPYTO   0
    SUB      8
    JUMPN    e
    COPYFROM 8
    OUTBOX  
    COPYFROM 0
    SUB      9
    JUMPN    d
    COPYFROM 9
    OUTBOX  
    COPYFROM 0
    JUMP     g
d:
    COMMENT  3
    ADD      9
    OUTBOX  
    JUMP     f
e:
    COMMENT  2
    ADD      8
    OUTBOX  
    COPYFROM 8
    OUTBOX  
f:
    COPYFROM 9
g:
    OUTBOX  
    JUMP     a


DEFINE COMMENT 0
eJxzZGBg0Ffca9unaB1cqLAzQ0hBr79QoWsxl/Kl/S6qe4//0lA6za/LcKrZUPTQLZOmLd9Np68BamF4
ILUzQ0fvfeIjw/eJ7y1CUkFiva7vE73dtErfuEbUc7rPn73I88/67b5Ht330P7pteXDiZuXQW+t2h/+Y
ClL7KIcl6lXm8yKdTLM6ncy6WXkZRisnpy3ZWpb6fHtkytFtT+NLV3PFscyfFvm650aEYptUhPUMkL6f
7fPDvBu74r7UTk8/VPG6J7li/mzFynNL7apkN1bUaO0qqN+wj7HV/HBEh/lhh4lLtu6ZJLsxdGrmoovT
ePsuTpvdaDFlevrDCWrRHn0Hw9d3s0RN6loTzzAKRsEIBgDz3nUr;

DEFINE COMMENT 1
eJwLZmBg2Cb0XNdIZIufqPCGyhJhwRW8Yk1blKTsN/UpCq54qjJ/tovqlslAZQytvO4x+/i74r7KdcX5
KJ1N4FIWTAaJHzWw13A0+h7gaHQ2odmQo+SV3pbJr/Smr/HU/7PeU//cUpCa/0ZapRMsdmZoWoekNtiV
pkk62udOdfIuC3a+11zhqLbguuPOtSB1qSFnE+zDRGsfhDK02ofVzXoQarRSOfTPepAcW8hnMxAtnsoS
ZZJW1bAjJXEziM+fIVrLnv0na0bBmviOskcRyRXuMfcrjVLsqm5l3q/srwCpqZrcFfexKzP2Z3tC3s/2
50WLWiZPWtRycI5c2/tl67t3rn3ZO33NkX6jlSC1J2eqifnOuKXiO6PPWHhaV5zwtOdFeyZNXxM7iWOn
9GSIW/IWQ+w2XAdx99QdEHoUjIKhBgBXfoDQ;

DEFINE COMMENT 2
eJzLYmBgiGbN3QOkGJz5tHaB6E5xjp0gerHq0UIX1S2TmdQez3VRFVzhorpkK0gcKOYHopNtjxYutWnK
n2Eqm7PXuCl/gdGGyr3GDK2Wpiu6eKz0+pNt9frt7OtmRTucW/rH3mjlfbvpa3is/qyPM761rtmwdLWK
oftCkDmbo26tC4lSbPOJ3ZmhHh/gfSJuhzJIPLp6/mzFyjVL/Eqmr7mV/2f9o5yQVZ5ZdbPOZpzs7s7M
LT+a/Sdrb977xO8FZxNYKkrTGiplc+yqLlWFFe5t2pu3twlkxrcpIak3J5emLe8TTP7YZZRS23Yrc39r
Qh5j6+O5s9qnr7nS+We9R9/0NfMnzp8NUi887WxC1eTUjqrJ82dPnxKyCiR2asP09Bmr18Q/Wt4Vl7Zs
TXzeYtkc/sXeZWcXi9ayL2NoXbBCsc1wXVVD9oaqhuTNARMUt6gtcNsUsspwXdOWuJVHt51d/Gf95IUQ
v7buM5Lff6DNhfHAhkrn/feanfdfm5Jw4P2yWYdkN64/lrj55QnZjUdOTV/jcAaiftPOnRmxZ/9kMYyC
UUAjAAAoZLrV;

DEFINE COMMENT 3
eJxrYGBguM7WtAVIMcgKJG4G0SmS9ptA9A5N2Zy76rIbQWxxrZNuIPq6I0fJfbtbmTxWpWmXzG9lWpp+
rg4zu9c8waKt084+YEKFo+T0YOeuxV+cdq7d5dC05b7d0W2GFhw7Z5jab6o2mb4GZIZ6/J+s1bFVDfox
t9aB+EyJGyrrkjZU6mTa5y7IvZW5N0+rNC6vqmFv3oquuDyW+Y65f9aD1M0oqGpYWv4ny67qVqZkTULe
l9q9TV9qAyZI1nQtlqyBuHlWe+Jm6/a6Wds7ZHNA/NLO1+5g9y94XlQ3VzaHe+b09KJpOzP2TFpS4DCx
qiF2kuCK0Kn2m9bMWLLVdfaSrbPn7Vy7Y77gih3z1ywB6Tu7eIeyzhJvQ/7F7jGeSxXbXi3ZuZZ9GSS8
CnYtKajYDgyLDaVp79fdyjRcd7RwwrrXPYbrMhe9X7dmCc+GxM3Jm59vv7/l6DazHe+XCe5yXwjS571H
UG7VHh5PtX1/so7vfTz3yb7Eza37nm933q+1CyTfdWKNFNupyb7Kp91jlE+b1aWesp6x/KTaguUnd649
cspnN0jN3idrljg+btrS/OjotnP3tHaZ3tHa9fvm8+3M13euzboyedKay1UNGleb8p9dlc2pv3Er0/TO
n6yjD58XOT7+XO34uKph5QPFtjk3T3YzjIIRDwBMVelr;

DEFINE LABEL 0
eJwLZ2BgmK0haiGudXRboM6Gfc2GooeqTS7tv2S+ZKufpdHKtZaP5wKVMHApPy9aoc9R0mHdXwHit3r8
mHom8MfUl0FbJqeGbJncFyM5fVpkRL1y6NFCvsCEvFk+z4ucPS9VebtlLvJ2C1m1yLN/r5jf7GNnApVO
N4Y6n5kWuff4hWjzw30xWrtA5nlmJeStyPox9WzGrXVnMyKOgMQcc0VrZfI3VF4q2pmRXVqaxlJRmnao
YmfG3KoNlX+q9jb9qZo86X5lyCq7qv699ys/H7hfmbsHpO96zd6mihrFtqm195o31V2qymiyz7VuL037
2b4zI6C7bpZx14Z9IHXKE8o+PJxg9G7+xB+3qibvPf5tyrmlW6a6Lyya1l/RP31nBkgN98x7zb/mNeUf
XWaUUr3KKGXrmj9Zfus/V2tufN3TsVFtwakN55YWr5XduGCF1q7JCzfsa5+1ZCtQ79qiaeeWMoyCUTAE
AAAzaqgq;

DEFINE LABEL 8
eJyLYmBgsJc+OGeedMiqStlb6y4oyG50Ub21Tl69dHWkZuYica1rU+6qn+xuU2FovSFrVtcolVueInm0
MEWyNC1G5lHEBYWYEHUV62B59UcRNhpr4oHGMViaWgdXm2TGVpvI5lia9lfcMlnRZWm6cy1I7pK5fe57
i5DUU1ZnE6Y6zQ/b5Dw/rMDlUUSv686MXtfnRZuc9fqDnQVXbHIuXS3osmYJSA+ne1N+q4dszhOP0rRa
b/cYMT+WKL5AlqiXQZmxbCEJeWwha5Yoh0LMl08ys9yRslibPVtW3TFXVj2ssEnLr4RDn6c01+hUaYTV
qdJr/n4lpWkTip3bs0vfL9MsC1kF0mdYXDhxa+GWyY65O9d+SluydUfKkq02ybIbFyeoLUhMjKivS1pS
sCOlNO1V5pr4o9lr4v/nlqaFFX6uBul90twl+bM9t/xnu9HK7R1Ht4HEQqd2SU6f0pQfOrVwYv/0xM0M
o2AUDFIAAC1fjuM;

DEFINE LABEL 9
eJyLZ2Bg+KR9z45fVzLok/aWyZ+0H8/doLNmCVCY4ZQVS9RUp+8Beq7X/Fe5XfNn9IoJqfV+FPHT531i
hO/OjO2+95pn+WyZHOEruAKkntHrXvMbV9FaFlvvsufW3mU8VmZ1HdY71y61+bO+wtF+0xenP+t7Xd8v
W+XGMp/Ra8tkkJ7d4bI5UhEs82PCb60D8adF7m3SjxGtzYzjKHFJWFLwK9k+d3Kafe6G9IS8sxn9FfwZ
VQ2T05zbQWp7G2Y3Xq/JLb9f+bzoednRQp5S7zLD4oj6rYWFEycUr1nCU2q00q28dLVZ7fQ1m+oEV5yv
fzwXpM+7UTD5TUNp2qrGz9WrGq9NedMwf3Zvw/Q1vQ0MpwTrC69NrY25F12t9rShsvuFW/mal2tLHj/a
Whhw9XsBwymQ/tLO1I6HE173hE7l7Vsz43XPu+mzG79N8S5zmHi00KPvaGFuj1apcdelqu0dim0RHXr9
H7vWLOnqnb7m38SmLdOnHN1mMP3oNt8ZiZsZRsEoGAQAAEUer5k;