Human Resource Machine Year 40 Prime Factory solution 4

HRM.40.Prime Factory.4.hrm

-- HUMAN RESOURCE MACHINE PROGRAM --

    COPYFROM 24
    COPYTO   1
    COPYTO   2
    COPYTO   3
    COPYTO   5
    COPYTO   7
    COPYTO   11
    COPYTO   13
    COPYTO   15
    COPYTO   17
    COPYTO   19
    COPYTO   4
    BUMPUP   4
    BUMPUP   4
    COPYTO   6
    BUMPUP   6
    COPYTO   9
    COPYTO   8
    BUMPUP   8
    COPYTO   10
    BUMPUP   10
    COPYTO   15
    COPYTO   12
    BUMPUP   12
    COPYTO   14
    BUMPUP   14
    COPYTO   16
    BUMPUP   16
    COPYTO   18
    BUMPUP   18
    COPYTO   20
    BUMPUP   20
a:
    INBOX   
b:
    COPYTO   23
    COPYFROM [23]
    JUMPZ    e
    ADD      [23]
    SUB      23
    JUMPZ    c
    COPYFROM 6
    OUTBOX  
    JUMP     d
c:
    COPYFROM 4
    OUTBOX  
d:
    COPYFROM [23]
    JUMP     b
e:
    COPYFROM 23
    OUTBOX  
    JUMP     a


DEFINE LABEL 1
eJwTYGBg+J8boiCTbyS/tiSG/1SpmtipUgaHjrItfh1l7xOzS83qeEozFz0v634BVMpwNHvNy7i896/9
SgTfXq95/5phFFAdCNYbrQTRGU1LCha1TE8X6zybkNuzJv5l7/vEI/39FWz9patB8mnLdmaYLHSPmT3P
PSZxzvtEjVnPi9bMUGxbM+PgnJMz3y87MGf6Gpt5O9eeXfx+Gfuyx3PTlsXMBOlbsMKK7/+KP6qWqyf7
Wq4+GN68vKqhefnJ7upV9psG0t+jYGAAAFJZWGk;

DEFINE LABEL 2
eJwTZ2BgKIxe4aofE2G1OrbPeHayrLpJ2g7lFVkhChOKQxRYKm6p2FV5G+6qvmfnVp4Zy1M6Pd2ywLvs
bEbhxLLUzEVccU1bNkdx7Hwa77O7O9Nnt2Hx0W12VUe3CdZr7QIazTCrPVPCuEuSN6D7kfD6bi2Dj108
niBxxtYA74gOHs8j/XpeDKNgFIyCAQMAVlgxRQ;

DEFINE LABEL 3
eJyTYmBgKEtdI3U2Y43U87JSRbHOEIXcnvcyfD2lisF1r91ZKtxjNtXND8tomh+2v5UlqrRzevryvsmT
jvR3LT7S/2f9mZ69x427Aq5GdPy45d1Yd39ped39Bbl6V9KyV5zvzow4wp8xfU1exvzZQGsYfGcYyXPP
XCN1d64kr828+YJ35zI4gMQNpp90E1/Q5nJ28Uk3hlEwCkYBXQEA7BpAKg;

DEFINE LABEL 4
eJwTZGBgeF4WonCqdLG2ZUGhz6tM2ZwN6RsqN6SL1q4t6a/QLPMuS+1vygcqY1jUUujD2Po+0bllZ4Zz
y8luteaII63N3S8YRsEoGAVDFgAAiewchA;

DEFINE LABEL 5
eJxTYGBg0MmUVe/OzDXKy1B0PJuh55WXYZTyKnN2Y1jh86Kl5X+yJGtuZfY2hKQmtIak/myfnu7Rt6Gy
acLepqrJWyZvmSq4YsvUJVurJs8+9rNd8s7xpoMPr9ewPHleZn03Lm/2sUc5PruBVjCsyCpVXFuyWNuu
6rnu1Fpvw0ldi7UtpjRpMYwCkoHili1+2Ru2+Bmuc4+ZsTqi/taqmJmX1qotyN6gtoBl8/zZc7fy9oHU
FeyK4RfcdVBIb7eseu/ua/56u7viNu1syg/eaT0DJD/paFP+t/NapSevcJSA+BpXOUqELx4Mrzqn5+Vw
5rX7mePX/CcdzYy9ciQhz/jo86IrR1Z0rT/2Y+qRU+eWxp4VXBF64dxSg0vuC99d+jEVpF/g3hY/3fuP
576+b7QSxD93rzQt/WFX3K2n88Pc3n4PmPtBMkjyU0yI2ec18Wafb2VWfLLPHagwHAUIAACQaaDc;

DEFINE LABEL 6
eJxTY2BgWDPjnp3wtOe6Dye4i0d0TOZobd7CyVJxUOh9saCcSFGC5tbCPmOZ/C1+e/PUomXyf0ydUPx8
+6EK5zN2VYXXCuoPPnzS3P3iZ/v71y97Bd8+nLDm5fQpdfe5Z/bv5Z5Zutp3htFK3xlrllycFjOzanJb
58ve/oqIjqOFrc1HC70btUqn1uaW36+sanAr5+3TLFNb4Feyc+2E4tw9DKNgFIwCugAAXkBL4A;

DEFINE LABEL 7
eJwTZGBg4M/4o1rauUPZd4as+t25t1SAQgyz591SmT5lTbx2L0NrQX3A1es1Bx8uLd/5CSSnknNtilv5
j6kPJ/D2bZnK28cwCkbBKBiyAACbtBzS;

DEFINE LABEL 8
eJzTZ2BgMKv9zs3YKslb2pkpwddjr3Gmx9tQu/d7AF8PS9Sdtj9Zeg3Pi+yqcss1y3LL9+bZ57JnCya/
ylSLzsvY4sefcc/OM0tWvTnnrPT/XHfxCcXzBVkqYvjtquoEgEYz7KrOLWds9S7b3tFfMalLtJatf8vk
+RONVu6ZJHpo/sS2c8v76u6vatz5aVe1/Xe/ksQfYYX2389mGL37lez+jClR8s7TeL0r6vEMp9Tjn28/
kMgy/2oqb9+KrL1N9yu1ShlGwSgYBRQDAEJXUd8;

DEFINE LABEL 9
eJxTZWBg2Bz1+UBIVNs5oeiAqz6xkndk8gXfupULvpWscX9WUB9z73iT+eGE1sTNd9q6Fte2reiybq9q
+Nl+zV+urc94UUuC5vGm6Urn69/LRFeriXWUHRTKLq0TeJUZwx+YPl8wMsVdvC7pvczTeA79tzGZsSfi
7HMTE3PLfyWL1p7NuNe8Ny+143kZQ+uTZq1SubadGdbtatEMo2AUjAK6AQBW60Mj;

DEFINE LABEL 10
eJzTZWBgMPY/K30kZL6gcqia2MugQp+XQe4xbCFN+cuDWeanhmjtehmUelY76OBDoFKGRZ6Zz6/4rXlp
Htn9AsSf1f6d266qTqCjrEsyrNDM8lb+a3eZ/JgQmfznRWGFO9dOKL60/1DF1hvBdWpPW5vXvJRrW/PS
uEvt6fI+yTvzJ7aduznZZ/eWqfabuGdem6Ixi6FVY9atzKJpVdZbpi7WtphyS6Vq8nsZtv75gts7tnCC
7HvS3JTPMApGwSigGgAAOupP0A;

DEFINE LABEL 11
eJxTYWBgCIlyFzePNJI3j9yhXBnxR/VGhFHKvLCT3fPCrGcohx7d5hHcdu5lkNpToFKGWT5rXoZEZT4H
sSf5N2nxBTZpXYh2FwfxGyr/qF6vma6k17BGqrUZIvak+az0k+YdypxNoharGj9X9zZYzzhfP3/2+Xqf
3VNrz70CqekoM3q3qW76x9bm6R8ZRsEoGAV0BQAk4zn1;

DEFINE LABEL 12
eJxTY2BgkHQUlDvvwiJ63L1OoNUjU8LZs0nriYd7zCJP92dAaYYKx+4Xk/y7X4DYixM2mLgkPNddnNCk
ZZNsJP8/96CQZpkV36GKGH7JmkfCqxq1DFqb21xam6/5r2o8m3C9ZkPl3KoVXWGFR7d1Z568UJdUd98l
AWKuenz3iwOJ5169yjz3yrIg87lfSebz4DrBt1c6Q94zjIJRMAroAgCRUkDN;

DEFINE LABEL 13
eJwzYmBgcPb8o3rFr0syIOCRMJDLkBt4UCg3cLrSR/8NJgEBdaEf/ds61wfsXCvmd+1mqd+CB2J+71+D
1G1yLvtg7fPni0fwny8g/veCR8KnSrskGyq7JK/XuIt/qc2UmNXuLt7Ve1Do4rSDQiA1a2Y8EraYskbK
YeJ0JeOuCKvW5vlhIPEnzQfDX/auiV/e9z4xdlJI6vQpCXnvpr/uWTPj8VyD6bIbb06efUy799rNhFaW
J3oN7s8E67tfdJQZvfteoPa0OYfhFMMoGAWjgCwAAJb5WeI;

DEFINE LABEL 14
eJzTYGBgUPN4L/PTJ4YfyGSI8I3hF/PLlBDz+6M6y+e1+yyf94nbfb3LxPwU27b7di0u9WvaIuantcvY
/+QFY//Hj8T8pn9kAJsR8n67763PuYE7P4H42aVbOP/nPtf9lGaUUpdkVjc7uarBJG12o2Hxvea5VbMb
F7Xca/43cW/TlqlVDSD1d9oUHa3b1aJr294n1rY9L8poMj98vCnkPcMoGAWjgKYAAGr7Q9g;

DEFINE LABEL 15
eJwzYWBg2OT8SHiVmyTvE49rXEAuA6PXFs4EL0leRi8j+SceTVpqHifdWj3qQtU8Zjc6e16b0uqR+Ryk
bq69+7NVbmpP1weseQnil6Vu4byaOl+wLNUo5VfyhkqQGIhOy/6TNaH4feKX2jXxzi1GKdbtsjmlnbnl
Xb0/pqb2/1mf2r/3+MverTeMu9yfqTWHvBesL/swoTjxx4LcxB95GWUfTNIyn4unWt+dnVx4DWSmSZoV
X17GfMHqfHfxXdVqYt6Nj4Q9+tzF90xiEWUYBaNgFJAEAMJDVTY;

DEFINE LABEL 16
eJwzYWBguOO9RoovUJIXyGQ4A6S7groku4KatHIDL5nmBjI4rA947c4XqPYUJL/Is/vFjYjHj0Bs6ckJ
mtKT/6jOn2gk/7L3kXBp53fu1mZ/NskaHha38kL24qL5grfyz0o75moZdGe+T3yVyVHSnflnvWfWvRNH
s/Wu7M2zvqtYmfk8uK77RUZT5vMrnQseNE3Qu1I1uerolqnT12yZmrnIYope//yJn6tf9ibkLWpZE7+p
LjM2unpNvFv59PS1JU35YYVmdbfyV3Q55v6Yyp5ttJJhFIyCUUASAAC/vVtc;

DEFINE LABEL 17
eJxTZWBgqIx4L/M25pEwV9wjYZcEKz6gEANToiTv0/gETfX457rq8c5OT+MPhssn9VfUJd07kZi49UZi
YtkHkDr7sOkfz2ZM/whiu5Vb8WU0HRS603ZQyKPPXdx3xiPh2fOs+PIWf+e2XH2NC6RmBpA2WbjF7930
yZPWd+tdSWhd8gskvr1jb9O76QytZxdH1DOMglEwCugGAO2bOs4;

DEFINE LABEL 18
eJxzYmBg0A5aI8UW0iUZE35QqDLioNDq2GtcQGEGrrhrXE/jdyi7JPQZP42vsnZJ4O17Gj99zerYFed9
YgXfMkD0vjSPnP7xRNytz/wZOz+BxCymXOP6N9GKT7v3O3dtmySvWnOdgHcji+imuulK0dV7bf9UqUWf
r19SsL/1c/XL3qqGommfq5/Nyi0XX2Cf273EOthzKYODzpI+41/z3ssUTZPkBZm3Z9J3bpDZeyaJ1mrM
6q+4O/dS1dUFVQ0rll6borL88VzHFTvXNi+/tP/s4ms3f81jeWLdfutzb8POT7uqre/Orfpx61DF7GOK
lc+336+cvsastm5WcF3MTM4m3r47bYptfD1VDQyjYBSMUAAAMk96iQ;

DEFINE LABEL 19
eJyzZGBgMPZ/LzMvTJIXyGSYF/ad+2/YGin7sFsq9mFLCo6EXJtyJKRrsX2Y0ukHoUbvQGrE/ATfXogW
fAtiV+cznLqVH3B1a+GCB4bF7s94Ste8vF8Z8v5Lbcj73obpH51bpn8U6xR8m9vT/YKt/+DDfxMDrk6f
EnHEYHrX4ovTGFq5Z55NyJrJ4PBuupbBtymlig8nZEpM6rLiS2jdwnm+fgvnn6oY/uSKOoHnZY+E15a8
l/lecMn0Vv5Jt+p895ithQl5l4qeF10q8i5zK2/rnFr7Y2pt24+p2r16/f8mOrcLT+uv4J65M4NhFIyC
UYATAACZqWtX;

DEFINE LABEL 20
eJyzZWBgqHCssr7uuMGkwOWP6hOPNVLG/vMFKyO2cHLFXeOySZ4vWJZ6VnpD+nPdDelV1uKp7jHySUsK
9GNe9whF6/XHhLPMPxJybumZwMTNH/2fb89wt77b68ryZKrTuVdAoxnMnNa8vOK385NUxK3Pv5Knf3yU
8+cLSHzH/C2c7bP82VL76wR+tp+VZmxN0BSslwz6Ursm/npN1+JNdUu2Pmk+eSG1f/rHm5Ptv8vP5fw3
eaHWf8cViT++ry77sHY9y5OGLVVHJbeHrDLb8WOq5PYVXXO3lqYd2iwZdGhzoc+pDRz6YWvey/xf8UhY
fIEe6695eqwge0/O7K9gGAWjYBTAAQDBU3Pg;

DEFINE LABEL 23
eJwLYWBg+MMyu/E4D0MrrxhD6zKJvU0xMnubMpUV24BSDH+lJ/vuljkYfkL5XjOInyKZuFlK9v0yIQXJ
6ZnKJ7tBYjIma+KrTU52xxlnLlpgdG6pimHuHpB4sblW6VpL2ZxDtoLJX5wyYwVdMmPPu6yJX+WWkHfc
3axulVvAhDeukyedd2GZX+CitQuk522MWrR+zK1M/ZhLVSFRhRNDoroWF0bbb1odm7tncYLoocB088Ps
2Rv2OeY+3743L2QVSM/aEutgvxLB5K2FDK1hhVq7RIo+HzAs3rAPJHe8qS40uC5m5pdan90g/qKW0jTr
9pDUK51nE470q0XHTnKP+TYlJFV4GkdJ0TSG1puTzy21mPJ8e9Vk88M3J/fvBenpnz678cAc+1zxBaVp
K5auiY9buSb+1qr3iVvX2OeKrL1UtWCF7MYFKzh2Ni//fIBhFIyCIQYAVjaK/Q;

DEFINE LABEL 24
eJxTYmBgOF8fw+/dWCeQ0BrDP3/iFk6D6ZK8dXMfCXsuDVGwXL3B5NLaFa5LN3mXuW3i7Tu14fHcsDVL
tqYtW3F+8sKtNxwmZj7nbHr/uqLm3Ku1JWpPLQus7+pkKp2+mrph392kc0vlk/T6r6buzOjO3OIXl9dn
HFZor3GoQk0suG6+4JuG+YJA6xlye+41M4yCUTAKBgQAABzCPvw;