Re: an scos2 test...

On 7/25/2024 3:17 PM, Chris M. Thomasson wrote:

I dug up my old impl of scos2. Does this work for you?
 scos2 247 742
 *,B|A D@[>+i p"= ;_{ )3xy $yx5 ojts wihkb#
 KWNYTZ JYFQV,H.Nw
 rXZ
 

I finally found the original SCOS2 code! Here it is:
scos2 712 901
v^qC{3J= MeCyaDVf5
TmO&vb=u [C&WB!a5&A
3=yK;"R@ UmK-iK&AKk
\R?uaG1Z 46uW[l%{I
"[xV>$a ~uR)2 _-sQ'1Z<!iG_rP~0Y,9hF)qO#zXg
ThF)sU{ bB+aK b2a\"jH-sQ'1Z<!iG_rP~0Y,9hF'
*@2aA(f *sN#9 }kI+tR@2a\"k
XlJ=wY# jL*cQ fBBlJ=uS;3b|$kI+tR@2a\"jH-sQ'1Z<9h*
3(pN~4S 8kC[ xP#nX '3i~$ V<7gO =yO&3
?H-sS.x /-dP kHnN}ox.wk#8WfiK(z+ u \#
7+tR:8W 8 ~
[\"jJ]o [ Y(
fDwm\4 kK+l H~2K}?Z|!a OZ lL=m P&91
d
     ^W.9Z j# \ YN
     @
         b W. W=*+
     l
     +dB*g q? D1 'oia
     C
         o iH j.'?
     y
     'nZ<6Z GL
*
<^r H7mOPsU< qe;y@ /9ZNJ+ C;rdX
|
     Q|!mK 5h<] iV_58g | <^gOx
     6pL~0 G{nb ["UGJ= p nP=4 Q/zh*
     ;z 8'(d, b 6s
     U
         rT, 1a#z ^ g1pB~'cY.he <9 n0=i V D 2 l>
         N~yO ~4h >1s/3sB Q yW:5X:.PD4qr:#9 xb@1J lH,+
         \%j| %pS +md[1N e $kF_lFIdR)45GA{ "pD&X zVK.
         M#xN +yc g =}
         K&rE^sG( nP-8 Q/N
         W\3rn -uF W ZD6d-
         <$i\ _pQ R 79
         #1X~ 3UL G wy
         &gX$iX+ > Q,"T/Ch\@eA@n( uh;(\{
         |5wD-g x )yY+u4.0r\&b7 kX+7'%
         @vm h 7YP4aP%,
         Z=uU[ .UD2V>G*A(D fm ^+ |$T>$^ pM 3r
         T
             sJA > Q,"T/Ch\@| (4N|VF
             U' <aH_n>9is&rzW
             \
                 cE&V<2qn!mue
             .
             M;9S
             i
                 8i? K sQ]iK:'L\wix 0ckU
                 jD MsS) {6 9nB%C
                 _
                     I_u v =wH W qd#%=
                     ;8m q )rD* [ x~tk W XK8u*0
                     (iZ T: R{^V<y}
                     A6x s %tT*pz@vmw ZM!w)2
                     (l u#0M[ |" 4B
                     )
                         H)t tR J,ug&
                     f
                     8eF F) >%r4
                     ]zN@7QZ;4;,? <}hTWyU>A4o
                 E
                 WA_c
                 s
                     =vJ]3MV#0#/@ /9(1
                 R
             '
         0
         _0Z~4h;|mK6eO]C onzuYI
     %
     ;9n,
     M
         gN#pR.s1|$T:*n4 BWR"oJ .qZA= dC3b E!1B$1K ~tk:8U2^q<&\D@8W< 4c'9 l.4qA#|&#PV=8mA*m J=dF= gQ) 8a'"TE $i K{eM@0 y ~1N] x UA1nR-vRh l I+qcG9kGU>HC+5
     V
     0K,9d, +{
n
T; N9sT|
Cx
fya#7n?6 ,O#iK~FPp
DW\zfL6e 9#zG]uKpz[
n6i.&vB^ EW.4S.z[.U
{B)eK;lJ oqeG9Vx7/
v9hF-wK $eB2m 34cA%lJ=uS;3b|$kI+tR@2a\"jHQ
DR@2cE7 L]5K. LmK{vT:4cA%lJ=uS;3b|$kI+tR@%
0^mK[1P 0c<"t 8U/5dB^mK{vU
HV?6gI" T>0MA P]]V?6eC&nL}wU/5dB^mK{vT:4cA%lJ=tR0
n1Z<$oC sU#9 h|"XH %nS$w F=rQ\ 6i\zn
):4cC_h (4N| U:X<8Yh_gU"sGPS.1j5 e {"
r5dB*sG 0LF G(oL
JX>8iK% K e
bpN]0c; b &T
$oR =hM'@S.$ QE5Y4 7j|~}v (5RD<
^
     ;^kM[ fH$0 I>tfiG ^ $oG'X
     gP]2a +xNB zl.+}w P N@we ;7ZHq
     5Z i3rD" B gS
     .
         R?" bA1Z o GbP*23C\9HE $j NawI > ) c L!
         ~2Y' 2eH !bS7dS* ; Y,6f<69@)eQR61j XB4b} L="v
         %nJ^ nP/ vMDzb~ E mK-tL-{D:sef+&x lP)p< Z>[9
         #1X~ 3UL G g<'d|'m!
         ~2Y' wZD H xz
         ]qS-pT=s O;vj :8'
         <^eSO vV+ < A_hEv
         %nJ^ uQ: / ik
         %V?8Y i8rB9juPoQr _] NU nL7jLN '0 C;
         7
             :xo aG I82/
             H* [N.6a{wVf2emJ
             ]
                 P:2I[pdaxZhR
             =
             |)wF
             V
                 vV+ < fD%V<_*\]jVk nPXH
                 W; |fF5 !t wa'0@
                 6
                     >6h i 9j. J dQ^09
                     )vZ d 5e;3 $ k&gX J K<vh3n
                     4VM G_ E!1I[l"
                     ]u 3>9V? I- %K
                     #
                         Q#2 2a SF3p}
                     o
                     (nO O# E=0%
                     .8W\*Zi|%|FC G/qcf7dEJ%x
                 N
                 fJ~l
                 1
                     ;4S.$Ve>9>B\ B)]!
                 a
             <
         9
         ~9i,%q|IvT&nX.L xw83hR
     =
     |)wF
     V
         pW>yaD1!I+cA[w% Kfa-xS DziJ &oA% qH\nJ\w Z;=dF6|L~jMkpbF8j B^aG {gB~mYlMY17TF}mN} vT&rT )2P F$aI5q J- wU*yb< > Z\zX . 6m\[3R/3_ { uS~^sG=s6htoSC
     7
     <wiG&i SU
[
oc