Newsgroups: rec.puzzles
Subject: Cute little puzzle
From: blom@husc15.harvard.edu
Date: 6 Jan 93 17:09:55 EST
Organization: Harvard University Science Center

Here's a neat puzzle/challenge for all of you:  I saw a smaller version
in a toy store that only exchanged 5 at a time.  I had a dollar too little
to buy the puzzle, and none of the local puzzle stores had it in by the
time I had the money.  So I wrote a computer program to do the puzzle.  It
turned out to be annoyingly simple, so I made it bigger and made it swap
eleven pieces at a time.  Now, it's got me stumped, so I guess it's pretty
good, at least.

  puzzle.exe:  decoded size: 4500
               encoded size: 6595

puzzle.exe     section  1/1   UUXFER ver 2.0 by David M. Read

BEGIN----------------------CUT HERE--------------------------
begin 644 puzzle.exe
M35J4`0D````"`-X0WK"(`8`````.`/P`'````$Q:.3%#_`,@_P3\(%6)Y?\?
MN`(`FGP"P@"#[`+&!H[_P_/``6``:@&:<0+YQA\.1OX!ZP/^^FH&BO_G^YB+
MT+@%`"O"4)H3Y/S__^3_OYP#'E>_```.5S!,:L.T!K::"?'G^T:L@'[_%W7<
MW['O:B#B4N+X#OX#=:*X_VKP:TB<_Y@%`P!`G_RH_`0O:JCX%A%US,;X"6+&
M^"XH^`\9M_4H^%!J`[WP#AB]\#<+E?@@4O1J"QW\FE>J^`N*5OWH\<1^!`./
M?_@FB%7_M4!UY\G"!``/$`GP#3'`B6;._^)_^XO]\-'@`?`%!P!0%/\_L_?G
M+08`!4``X1V9N?SW^9)`J_R*188WH9E2U@*:2@=I^`N#/.9I%G6OQP4`J!$4
M:DF_J%[Q7_`*8[WM!:P+K/ZM^"`)=;1]:*WX"@>M^!*X.@`KZD"O^"FVF_0$
M^!<7J_@*+ZL'_@;X([%JD@@!;?&_D_`1P8/:PP6(KUGP"5SQJOY53O`02Q<_
M==S(Z<J(13^Q^!:,N>>P_$"P3KY(K2*P^!@"L/@)!;'X$6OX#!;_HEEW\$3I
M#$3II?@5BD[<^!&(3;K@C@5UKY?^^I?]!(,WFAH(^#+P"D":D[CQ0#P,EORP
M`3K[?Q@I/O;]=_VV!E?HNL;=H_WH=>WP_$C_E_'3_V1UQ:<*<'5Z>FQE+F0O
MI&%TF@``>/'[8)+YX3'`D[]$`![/%?OQ3[^&^+_-!`Y7FI)TC.GQF@(#T#__
M,/$)P'4OQ@:&`@($_MH#^>+\\BKQBM"@\3QL*?B(E4/6MP6-X3[X[O!`==KK
M"*?\)__X_*N'A_R:#0.(HH0`H/WW-SP@=0KI_)_^ZQH\2_+^\[P#+`P\377%
M_33^M-R:U!MUOHC2!XC3B/P'U$%JLNIN^`]U_(J%=8/K,,K;@^OE:O+<;:ME
MT;O\7+O^R??QZ>CQ__@*&Y[B\>@H(ND"V`[H(`,5@/?T\P_K[3;Y__=W7<NT
M#^C6!3P'=/_A"CP#=@:X`P#H5OVA`/\_M`@R_^B^!8K$)'^BF`*B/`0^,\"B
MB?B9_?A_MD"BB`*X0`".P+]L`#\.$NDF.@5T^_BY_^'_SD+G-P"1]]`STO?Q
MH_#_E(@.'[HM`;@;)<TA'_&/P[K-PB:`)H<`_O_AD08\!'("L`-0M))7!?_P
M6`KD="VX$A&S\TH%N`]_,!&W`++V0`6`^BIU%@@`S@[.O/\__;D`!N@L!;02
MLR#H)07#WO!)'P50U/X4O;$`"@__TG4(LA@Y=P*Q`8KRBL/_U/[*HX#^&'8"
MM`&CC'\/`HD6E@*(#HOYP8H"`>/_,J.0[I("PU`>N%8!CL,!V(`^+`!T!>,>
MX"$!'UC/\?@`=2D,`</P`,'-%@#_4+3ZZ_2P7N@;`___L$/H%@/H#`/-(XO<
M-HM'!.$&Z",&;O^@V//*T#P,ZXI7"OQW",/__$\&_&\$.M%W)SKU=_`_(VYX
M'_[.>!O^R3H._"%R=Q/^S3HNE_@+8(!V<@YR#`<(`\H(`!1=/D,\MHL.ZXM=
MZ#<$P-_Y]>@D`\OH&0/C_ND/RHKE'`3+N`$'ZW^*Z@$&4.C\`ECEBM,_R(KN
MQCKN=0(RP.CW,`[';75W!/$X?0*S<A<ZX'<1'!YS`C:1\@DZ-I,@//(MP4$$
M`.BT'(;!PBH&V_[`CQ``J/3&]-T)_O2\%*CP=`0D#X<5#("`)I9P""7I#_U^
M*N8D![$$TN#HC^C]/2ST]\N`#OH(R^+T_=V[BU<$"])T%K[K,__'Z0-\BQZ4
M,)4&`$IU^!1.RK#I2>+YP___U5\$N-TTNA(`.]-S&O?SB___V.1AJ`-U"`P#
MYF&PMN9#B@\(P^9"BL?\RP-LYR3\ZY0^F4CQ"'^`3O*P`'0"L`&([_$'Q@;K
M"L!U$C+DZ3P,^`J()N\*Y&'\F[`.%?YM'C;%?T/X!,=%\-?[!(``C?##A?R)
M10R,70[Q$/_U6@.,31+&13``'^7QU?VXDH<_`[MP!$V!?0*QUW0*/H3&LM>X
M/^_8RO#P%-(6B5T8^AJ)37#Z'/H>,\#(58OLQ'^`?@8FBU4$2DKZ8)__)L1]
M##/;:`[H7/^Y`?__`#P(=#0\$W0P/`1T1$D\&___="<\`70C/`9T-SP:=$8\
M#?__=$\\('+/.]ITRR:(`4/HF/__`#O>=L"+\^N\"]MTN+`(Z!_@AP"P(.B"
M^_9]``\?2^+JZZ3@=*`FB@'_W\J9Z&H`0^+OZY&`/HD=Z?3_BK_K"NA.`";'
M`0T*0P@!0V=;)D9@'FM("ET;-L0@A!Q93>XI_`G:XQE3Q(JH\0M3\?\?Z!P`
M1^+WZP/HG`#HV/R0#\;/^[`-Z-\;WK`*4U%2=NER`%@=X2KC_RLM1#,\"G0U
MM`F*'M/?C@(R%%+H90%:_L)^ZOL?=B"*<NGK%[0.Z%$!ZQ/@`^WS=`W^RNO3
M0?CIFPB;+0`'6N^#65O#_L9<ZG88_LZ>AH<2Z=_@#!:Q6<.T`Z/'-^D,`;2<
MZ04!'J'JV/P1XE``'XO:B_='8\)O(6\L<VL]S#E'?OT\Z&^;H/^/88\LZ&,`
MH0=RPP#X'*WK'.A4`&T3#W]M#^A'V'C_ZP?H/P`*\--'JJ;BINB-_S$`E/R)
ME(K&]B9*`#(/\/8#PHO(A+2P#NXPGNOKQ4+Z2K`/P@_TP?0?PSOW=&-_>)E7
M'@:+SRO.M(L"BC;@^3*[BL>__P./^,/1X(OX1KN#P@;__[@`N(`^20`'=0*T
ML`8?CL#_'_P*VW06K(K8[*@!=?OZ___Z=/N+PZO[XNSK!HKGK*OO_^+\!Q]?
M[?%65U4&S1`'75]@_UXQ__@*N@_9VHP&.``S_X?MB\0%$P"Q!-/HC-),_Q"C
M"@"C#``#!@3Y#D(X_1C]'/TD`"8,_WP"`",@`,<&*@"I]\,`C`XLN,D$ONX!
MN<:0___\+JRT-<TAB1V,10*#QP3BUB'O#M+?/MD.T;KF^".%%/BN^"3XU]KP
M^#_VRKAOR5#^N!@"#X,.4`[H`OKH;@("7&[)[/@)H_Q?`LNGZ?C_A?N#Q`98
M@^<?@<>6`/_#@/PY<P.___]7M%2XB___[(!.%@%86UE:7E]='P?/N-%_T`#5
M]-'(`%E;ZP>X_SC_(,DSVQ/[HS(`B___P0O#=!^A$``+P'01CL`F._#_'O5T
M!B:A%`#K[8S#*^'#'CC"ZQ")#C04'@^Q-@#$'BX6P,\3,$36R?6C,/T\,GB&
M:5`&4\M`7\(^$TO\]PH"[_`-)1[%%3H,&?#R\*&P"P;_(;!T*;L!`N@J`*%X
MZ`P!_;L0]![T_@#IZ$``L#KH5?5#2-KH->D5Z0?#P]VT3,$NB@<*5P;PX^AI
M0^OSP[%DYK'^QPJ=X>L$,N3V\00P4+X/0UB*Q,-0_.@!]E`/PX31Z.@#]R0/
MY#S_\#IR`@0'BM"T!KC#``+__QLA(R0T-38W.#DZ.SP]/C___W52=6YT:6UE
M(&5R<F]R(`##!R!A=/LN#0H`4/+X?^AO;G,@0V]P>7)I9VCX_^@H8RD@,3DX
M,RPY,"#P_T+A;&%N9#/`AP8\`,O!X8,^^]W!RZ'YZ8[_/_Z+]#:.1`(F.U4"
M?P=\%!P/^`5R#_,&?`AP&/'X101WV+C)#O_89OX%<2O$<PGWV#O'$`8Z`'+J
MRNI0_/O"J-'$?P@VQ7<$K=FKN+!PA-?\@`"K]?^/0XU%=*N,[*D#^<C\_^VY
M#@#SJZP\3W8"L$__M8K(,NWSI#+`JA_)P4C;"L88<,(RV03X!O@,W</X)ME%
M#AS>10K*%[H?WK'7ZPBZLOL#NK/78]8['$4"/3+1$CWI=`T]CK]^=!#'&68`
MZR12!B?PR[$E`%J](+G^NQ"K00#H3+[JQ\O'TK#4CLE-F+']Y,P8^*\(PL.T
M9^`84+L4R14]@`!8)/$,NQSU=`"WP/@)F?XF_QE@Z0/KWY+I7P?^P9'+,\F)
M#;@`/:[\C_`-L`+_!?5(=`*TA_\\@'TP?0F-53#-(7)/QSV)!;B%TXO9UOPI
MBQV$_\I$Y[C:!(O(C,OVYS_"@'41QW4#Z"8`N+7KA]5$RTG-31B)71KO.\(<
M^@1'SS/2V[D"\(="N2V``(/:`'/*\(3`ZXO*B]"B0X#IC97HN?WRH7^T/_-S
MV:DSVSO8=""`#'_L&CA#Z_*+TRO0I?7EJ;K]L;1`:>D-]`0F*Z_%50R5R9')
MOW(0I?*P&)?Q>0@`C</V"A;6]NONT/@*O":'8\FW_(<5<@<KP9BX96#'V_@4
M]5]HX/PES!V#^P1V!K0^YOP4'.<S[-'&\W4-XC;>7<55"@7*PT7R:+0A?NN"
MP06MP?A%_,`0NMCH/;'0?@OL=>RP&OG#P/@*LL#X"4:QEL#^:<"'PKP!UZ[`
M_5%6'F3;B<$(!O1=%`7WX.MRZ8.[^`H?7EG#I^SAD5'??_]U%.AP_^:Y#4,\
M#77TZ&08$/0*=:/)U="TM]FSZM+_8](*8\&_#8#_L`KH>__<_1'<^`KH])KW
M\R:#?1H-JC7\#>N_;QAO_83X"=7^=0[H]/YRPQR2_EW+`>OTX0K#W^'VX1.+
M3@9)?@=PN1]J#?_B^8I&DP6*_8W]'H@_U0S5B_[%=@BYOO&5%>BD_F_!#C`*
M0P^_04:(!#N_=>LK\8@,H2')_!_(!LCX"I.=)>(/QIK\K#+D*\@X#NN5HOZ5
M1/\/H_"+R.,'Z.B2\/=XPO@-@^P@/OP3_KZ+(>@O@'>+CQH\('=;ZN@A^/_R
M('8,0X/^('3SB$+@^_]&Z^W!_(O.XQ*-?N`6!^AI;PT!<@+C"C/R:@ZY`.GE
MAKL$J/R+'(M6"MK\R0`/?UK\[?UU'^@&*\%^#8OQP`%K7?_];3Z$LHUVX/PV
M8/+S`HKXG_VY7[;9^GVL#ZLNL022]_.2!<GH-@"3___XT;D@`/;&@'4*T>/1
MTO[(O__B\S+`@.9_])D`S3R?!N`'A^'--P8^]37A_?W-?S@YV<T]R^'_H>^+
M'D#\T_S(+O<F&`C1X?X"C^'I`]$#T[SC^@+SAS^Q!=/C^@4!`(/2`*,,W]*)
M%M+#!82T+#3!_O\.\?S+5_R+V`O2?0WWT_?2X_^#PP'7L"VJOGD(L0DN/_P[
M5`)R!W<,^!QS!X/&_W\$_LEU[/[!L"_^P"XK'"X;>`CC<_4N`_<3&/_WXZKB
MY(O/7RO/___#`,J:.P#A]06`EI@`0$(/PR$`H(:`$"<`&`/4`/QD9[D7X0#N
M_H__G=HS]N-9)H`]*W0'__CZ+74%1D=)XTCU)'1$__\FBAV`ZSJ`PPIS*/?"
M`/!U?Z(Q4]'@T=)24/K\O_A;`\-;$]-;NK)+>!)'/_CBS4YU"O?0.1#\^,/Y
MF![#LOJX^V%R`SJ$LR"P_'(+^!?XX_0&<]#SMP2T<M3^A]?/=?8*T.+1Z[J[
ML`O_^#P*``*V^`P`\`#8!```\/^E`?P`<`"T`5`&#A^+#@P`B_%.B?>,VP,>
M"@".P_WSI%.X+`!0RRZ++@@`C-J)Z#T`$'8#N``0*<4IPBG#CMJ.P[$#T^")
MP4C1X(OPB_CSI0GM==G\CL*.VS'V,?^Z$`"MB<71[4IU!:V)Q;(0<P.DZ_$Q
MR='M2G4%K8G%LA!R(M'M2G4%K8G%LA#1T='M2G4%K8G%LA#1T4%!K+?_BMCI
M$P"MB]BQ`]+O@,_@@.0'=`R(X4%!)HH!JN+ZZZ:L",!T-#P!=`6(P4'KZHG[
M@^</@<<`(+$$T^N,P`'8+0`"CL")\X/F#]/KC-@!V([8Z7+_*D9!0BH.'[Y8
M`5N#PQ")VC'_K`C`=!:T``''B\>#YP^Q!-/H`<*.PB8!'>OEK0G`=0B!PO\/
MCL+KV#T!`'7:B\.+/@0`BS8&``'&`08"`"T0`([8CL`QVUB.UHOGD"[_+Q(-
M!QP:!044!04?$04%'Q$%!2(:!044!04-'!H%!10%!0T'+B$J!04@*04%("<%
M!20H!04/#T]/:0@1104*%PH%&1$>/PH%)04%$04()!,`!@$`\03M`)P$``$`
`
end
END------------------------CUT HERE--------------------------