Human Resource Machine Year 28 Three Sort solution 2

HRM.28.Three Sort.2.hrm

-- HUMAN RESOURCE MACHINE PROGRAM --

a:
b:
c:
d:
e:
f:
    COMMENT  5
    INBOX   
    COPYTO   2
    INBOX   
    COPYTO   3
    COMMENT  6
    SUB      2
    JUMPN    i
    COMMENT  7
    INBOX   
    COPYTO   4
    SUB      2
    JUMPN    h
    COMMENT  9
    COPYFROM 2
    OUTBOX  
    COPYFROM 4
    SUB      3
    JUMPN    g
    COMMENT  0
    COPYFROM 3
    OUTBOX  
    COPYFROM 4
    OUTBOX  
    JUMP     a
g:
    COMMENT  2
    COPYFROM 4
    OUTBOX  
    COPYFROM 3
    OUTBOX  
    JUMP     b
h:
    COMMENT  1
    COPYFROM 4
    OUTBOX  
    COPYFROM 2
    OUTBOX  
    COPYFROM 3
    OUTBOX  
    JUMP     c
i:
    COMMENT  8
    INBOX   
    COPYTO   4
    SUB      3
    JUMPN    k
    COPYFROM 3
    OUTBOX  
    COMMENT  3
    COPYFROM 4
    SUB      2
    JUMPN    j
    COMMENT  4
    COPYFROM 2
    OUTBOX  
    COPYFROM 4
    OUTBOX  
    JUMP     d
j:
    COMMENT  10
    COPYFROM 4
    OUTBOX  
    COPYFROM 2
    OUTBOX  
    JUMP     e
k:
    COMMENT  11
    COPYFROM 4
    OUTBOX  
    COPYFROM 3
    OUTBOX  
    COPYFROM 2
    OUTBOX  
    JUMP     f


DEFINE COMMENT 0
eJyLYWBgKOAMUXDmu2T6Q7DQx1yOofWtYt2su+p/1rMbFF4DSjOYsf+49YX99cVeLtFD4UJqCx5I7W3S
V7yV+UrvjypIPi7PSD4uz9tQJl/R8VLRwXCWipDUL7WyOasa7XPFOv9kafeGpD6cwBIlPbnQJ3TqBpPQ
qU1aFlPey4D0ZjTllqs1uy9kbL13IqH13CuQ2MsT72VmPCtVLH6xQ/n5m1sqvd9CFEDi57+WKma/7or7
//he85YLK87vOav2FCR+81zm8893rO/uffLjltnngw9BYlXnnhddvKhV2vEmtxzEl4pIdeYL/B5g7XMw
vMM6JPWWiX0uSPxvmGwOW0hC3hOPiPpdDoptlqaTJ/FYbZl8yFZyelfQwTkPQtUWvI3pWgxSy7n3tXvB
ri1+m3ZaBx/avCZ+wYqm/A2LOErk50bUQ+Rzy/V291dsXRMwYcVSyel353YtNll4bqnI2iVbC3Z9PsB4
YO9xhlEwCgYZAAAiB6BC;

DEFINE COMMENT 1
eJxLZGBg6OUykt8sH6Jgo/FexlM/ROG7qZF8g12IAlCKocN6wQNL0wUPmg0fPxJSOPjwr3Td/RfiBx+W
CC94cJ6T5QlITYPdDmVNa1n1R4ZV1t16r90nax8MF1L4XP1CvG5WuJDRSlkBjp2bOA4+BKlV4/1cPVHk
c7W+4r1mG417zSqGVQ0gcWN/lqhFnmvi37j+yeqwFq19bl3VUOoXMxMkdyPirHRb/HPd2ckMDp/S5ofJ
5H+u3lq4out9ceHEU6UH51yvyd3D2Cp5B6R2WqTkHZ/Y2cd+Jd9ax58hOZ09O2BCc45ev1ktS1Rw3aMI
5xYez1ntEVYB3TuUQepdZ2fGxk5qyn84YUlBaadZ3aSu2Y2hU/X6Z89jmQ+SF1m7Rmrt+lwjng1tLks3
dcU1bLmVOXdrU77k9udFb3ZvqFy0/3N16ZFLVR4ntUpTTy0piD37J+vmOaOULRcOhl+8+Np9y4XpSsIX
jeRBZlkf2tt05UjmoitHbq0TO/J8u9iRkxeuHPlxi2EUjIIBBABENKlM;

DEFINE COMMENT 2
eJwLYGBg2GomKBdnnGtkoj0/rE79bIKW+OO5H0TWLOnl8tktyGl+GKiE4QnvGqnbArdU1FUkp5/VnX0M
JKZoZx38NfKzGYhdGJ0ZGxLlHrM7vCsuN3BnRq23Vqm326WqTc5VDXPt7zWbOZ3sLvWbP1s5dPqawugl
W0F6mnPeyyhWZkqIdZ6V/jblvUz/9LPS76YbyX+bomVg3Z6Qp9cgOf16zftlLBW5e27lF14zq9W7Ita5
9UZXr96V0Km8l0FmGBY/L0queF7U25CQd6fNPle71z5XeUJTPkjObRODA/uyswk75tvnmix8XvR/RUQ9
y+Ytk0FyPw+pif089F6m9IiWwcsTmbEOZ84mXLx4NqH8dkzIxrtb/Hrun3Q7+lDUwvFxqaLj4/cyRx8e
FALpW3N5ejr3lXvN/Ze0dr27FHOPYRSMgiEOAHhniYw;

DEFINE COMMENT 3
eJzLYmBgKOA8K+3M9z3AmW9+mKzA+0R/0T9ZX+Wa8t8qJuRd1QpJ1dHLjE0zmOz7yNDM8r+Rt6GMiaAc
UBuDlCxHSaWsYttumS2T/0pL3gGJebvVhTbYhaQ+tz5aeMncrC7OOLWj2qSt85RVzMzrjpmL9nvJbgSp
E/PrkkwNuWeXGSc5XT0+Zuav5Ev7V2RlPgfJbffNfK4dZH7YPkxwxd8wlvkHErvi8jJKFUFya0us7xoW
v38dVij7DcS3bn8vM6lri5927/vEI/23Mi2mLCl4Nsu77MAc77LARRwlj5bb515amxn7fCODw6HNZ6VB
ehbP/lx9YA5v34E5B+dkzQy4enLmuVcgcYcza+LvHMwtf7JvduOubZLT5261nrFp55olervPLc093r+3
6GLbOZC6uVsFk8WOnHQLOHbP7uHpPmOHM1oGIPFnV93Fg+6elZb8FKLQ+jNEASRme/Pgw0ePHj9qeF93
P/qj9d0336zvgsTVgPK9357rNrw3SnF7u6HS8pngikePOHZG3YKEY9BdjpL8e7nll16I1r75ZlbHMApG
AY0AAP1FuRU;

DEFINE COMMENT 4
eJxLY2BgcOYzkmfkl1V35lN0tBIsTSsRXlKwTlSr1F5atFZIoaohUa2qQVzLrE5HL7fc0cg+95bJmvgw
M+tgHqs/qkDtDG8VUzu4lHP39Ck6n7mgwPIEJLbrI8uT528WPGh+tOCB7U33Z7UH3Z+BxK0PdUl+PPpe
purce5n+S0byUbfOSi94/F7m+7MQhS+fSxWP/zCSB6ljPPD40aSjDKf2nC1d/e7S47lzbjq399z/k1X9
tC701Gtnp1XfIXYHHJvdeOTU7EaNqxsqP9/ZULn1uXfZqde55SC5V5khCtX5zk4dZSGpi1pY5t9pK12d
2r/3+M3JkndA8nkZW2+8ytS7cjS76ujWQsEVp0rrZiVX8PbNrUrtCK7TKn3TIJtzpfOz2ZH+s9Ig9Us3
fQ9w2xQTErZmTfzZxZeqXGev6OKe+brHc+m5pYpbcveA1KyZwRIVOf+af/eSVGe3TYu1QWIhUTEh5pEx
IS+DuuJm+fzJWuSpVdrq8bk62uF1z307oH32ARN6XSWni/mxzH8ZJLjiRsT0NQyjYBTQCQAAzo61Eg;

DEFINE COMMENT 5
eJwLY2BgeCEuGeQusSY+RfJW5mFJ0drDkgETlkmsWQKUYlgmMV0JRD9ViQlpUxFMfqryukddRW0BSOyE
8rmlIDpRLSS12XB+2C0T6+DvpnWhEyx2ZvhZepfxWF2bwmPVtdjPcudakLpFnjEhTzzcY1o9qhoy3FM7
Vrn9mDrXXu0pSK7We2fGLJ/p6ZP8M2NzA1mijoTMD5OKmB+2OSoztjD6faJ+TEKefszsxt3hagvsw9Ys
ORM4fU2p3611CV6CK5w93ReqeagtaPWYP3u/V8xMkHlnM74H6GT+yeLP2FC5IV2vvzszc1FzjuAKmXzB
FYbFdbPcyq/5g9T5lWyZvLaEZb5fSelqsDvauiTl2iKsGFtXuC5qeRSxqGV2I2Pr657atoNztnd0Lb7S
uWZJV++aJU0TWOZbTJndCNJTUL/FT64tJsS63Tr438S60OlTYkIYRsEoGCIAAK0OhyE;

DEFINE COMMENT 6
eJzrZWBgYJVUi3aXiAnhFdviFy4U4O3MV+hznGeLnyCne8wXdqMUM3aOkmAOvf5eLusZarwH58wUrJvF
KzZ5Uqf4yW6gdoZGKUXHFMkVru4S9rnuEveaUyQnTwKJu6iedFNXYYlSV7lUlamc2nFC+fFcdZUfU0Fy
8uqZsb80YkKual3zP2pw0u2R4Um3BUY8nnuNu+L2Gj8vemT4eC5IXamfZFCBC49nhWOA9x/7LX6Kdo8i
FO3WxLPYTk9fasNR0mEtWqtprdj23Pp1zx97yelfnGJmrnKbPKnV42T3Is/ZjSAzPvo7O/30yYy9461V
Kuc9f7a1T8xMkPjq2Bj+vphSRf2Y7wGF0fPDQqIS8swjIe4TT1V0FE+VDJqd/Ll6R0rAhMlpP6bqZFrP
YM+2nvE/d8vkGQUnuy8VXapiqXB2Aqk/VLHX9nmZe0xHmXfZ94I/65tzeC+fzYi5Nznt4MNfyZJ37iY5
nwGpmz9xhavDRGen1P69tmd6qqzFOmfbJLS+dl/U8j1gUcvBcLm2rrhJXSGpHn3T0x9OSMiLnVTVEDvp
ZLfDxC2TX/bWzYroeDxXrm3+7IymgAmrGhlaQWb+mmdmeXfuSTf5ud5li2ev6Fo8e/KkZ7P0+kFykfMf
CYPdt5nHM3vDPTvDdbNtvq/eayuz6rX7/xVq0TKrEvIsVx8tfL6Ro0RxS2653daI+rlbV3Td3/JjavLm
x3P91mcuclyhtoB92Y+p7MsCJhxdxtvHMAqGFQAAZAzo0w;

DEFINE COMMENT 7
eJwzYWBg+KWhZbBCX89rr3FdaId1f0WF4/zZizz7907yl7wDlGZgUiu8Fmc8f3ay7d6mufYbKs+7/Mlq
9XCPkfOeH7Y+QNFxebCZJUjd/crMWM0ywWT+jJPdkSlbJpelSk4PK3y/zK18yVa7Kp/d0dU+u0HqPPqe
6x7pN7N0mLjFb/7E0rSL02Y39k+/1yw/t61z8sK2TscVe5v2rjSrK167M6N47fvEUxvMLE9t4NAH6b26
oHCiycKYmVcXpJ4F8Q8kTk/fkN4V975Y1OJ5Wa4RwygYBaOAJAAA1rlYNQ;

DEFINE COMMENT 8
eJzTY2BgOO/yR9XZMzM2wUswudTPPpcthKPkbYxW6YZ0weQVWXWhzTk8nnvzZNWBShkqI7RKb0QotsWE
P54bE35pv1TE64sgce3eg+G5PXWhi1rOJgTXJeTNrfpcfapUsQ0kd6q0rXNpuV6/WOf0NWz9iZtBYnVz
/6geXWYd/H31zoz7W1I71PbJbjxzfMV5kNzJmScvzJ43+1jZgkv7967U6+/Y+D4xeluA96o9G0xa9/UZ
Wx9q0mIYBaNgFFAFAAD+J095;

DEFINE COMMENT 9
eJxLZmBgCObYobyI72D4C3HrGV/lPh+oU1d7ChRmqGCru1/Auff4Ir6da28LnFvaKNVfwaXMErVDU9RC
XMvb8KoWhz5IXbZVTIiIeVfcf6Pp6ZGa3mUgsefWn6vfW5jVpRmc7P6lsWVyopr1DHn1uln/jd4vO2VV
uhqkRs/1ue5x98m+CV5q0ZP8Q1IfhMrmFEbfyvyVnBn7Ke17gE7mPTvPLIgdf8MS8uzD2jqXB99alxrC
exkkxp/x+uKOlHOvQGy3cg79TXXvE63befv2TILI85Reu8lS0XYuutpn95uG1z132m5lvuw96fZv4mcz
kHzYmi1+/1dYB5ssLE3LmslRIjwttxwk/n7d0cIZq73L9q78XH12sWJb3dyT3dOnxMxsn+W+8NLaxM0g
Ncf3lipeOTJdacm1xdpRtxI0vz87K731uZH80Ycn3RRucJSsuRwwYfthlicBx1iesJ1a8KD/kvXd/48l
77i9rbsP0i93sKrB+KhZnfQ5s7pz95zbl75N7WAYBaNgAAAAIZ+rvQ;

DEFINE COMMENT 10
eJwLYWBgcOa7pbKIz17jCW+bS41AV1yJ8JICe+nP1W8VP1e7qGqV/tI4m9Ctp2XwSq9UEaicQUr2XnOl
bMiqB1Kzj9lL/7g1T/rgw7/SkndAcrscdmYstWnKlzHZ23RV63UPu8G1Ke8tDs6Z6vRnPUhezG+HMl9g
qeK0yOlKixOM5G2SQxTyMozkZxTcUplQfEvlT1WIQnAdxJ7tvpJ32EJi7h1IjLkXmSJ551Xmj1sNlXX3
d1Vb3wXJW/tY393uu/UGW4jWrsLorsXq8QfniKfy9p3NuFT1veBRhGLlPbuKmqM6ZrW3VEDqj4R8rk5M
3FB5qSiiHsTPmjk/THja2YSmCfa5bP0JeT/bP1cvaomo52xiaG1tbusMnfp4buKckFUgtY4rzkpfOZK7
J/bsggcg/oIVdfctV/+4dWntivPee54XnTnubfjwtKAcwygYBUMMAAC2KI9R;

DEFINE COMMENT 11
eJzzZ2BgOGqwwWSDzmezF+IRVhNFZts481VZA4UZ1Hj1rqRItp3rU2w7Z6OhdPqSeepZkPhWs+e6M0w3
mHjqT/YVUkjImyhycM4T3kv7OXnazhVwbr0BUvOEN6K+RDiinlXyc3W3nmjtf6MNlSLmGypBcnuNN5hU
m+QagdiF0YU+jaFq0ZP8E/IYvS5VfY1s60xMnDwJJCdSxKG/tuRguFt5U75i5YbKipqqhiudzu3LgQ56
OKGqYc+k3PJvU1iitkzdYAJSz9j6umd/a8zM/a1Lts5qP3kBJBa97aSb4bqYEJOFHCWfFm6ofL4xYMKf
rVsmT90RMxMk//OQvYbFedFa7ivWM/LvzT529OG1m/8fP34Ekqs9uOBB14n+vU2njVZ+O184MevK0cJz
91KdvR70GR99uFibYRSMgmEAABkVhrY;

DEFINE LABEL 2
eJwTZmBgiPDd4pcb+D4xNzAklS1kScGRkP6K3eEMrfoxj+eeiJPduCPl9UWgMoZab4ZTH/2nr1kezDL/
QWjhxM1Rzu0Xop3b65Jyyx1zJYMYRsEoGAVDDgAA3F8fzQ;

DEFINE LABEL 3
eJwTZWBgMJhuJP9uupbBu+krXLdMfRQhPbk0rau3v0Kv4V5zQ+XeJr+Sz9VbCzlKqvNvZXpmMTiczfij
2p1pJA/UysDZtLeptfngnNbm98s4m3L39DZ0v2AYBaNgFAwZAAA25SV9;

DEFINE LABEL 4
eJxTZGBg0MlUdMwuvWdX2sngoN17z27LVGcnoDBDXobooaPZoofi8iKOrGqMOGLcJXoot+fS/n8TL+0P
nRpxBKTmauql/WnZf9ZbFrxf9ryscKJZ7d4mtv6QVO6ZPJ4g+f+5l6pmFGyo9Cv5XC1ZI1qr17Chsrbt
UtWZng2VDhNFa0OnitYyjIJRMAoGDAAAjBU4/w;