ERRATA in "A Computer Program Illustrating an Ordering Algorithm"

Jsun Yui Wong

Line 364 and line 366 of the September 19 post of the present blog should read as follows:

364 IF ABS(X(K)-X(J)) less than T(K,J) THEN TZ(K,J)=99999! ELSE TZ(K,J)=0
366 NEXT J

The "less than" above should be replaced by <.