Jsun Yui wong
Line 364 and line 366 of the September 7 post of the present blog should read as
follows:
364 IF ABS(X(K)-X(J))less than TBM(K,J) THEN TZ(K,J)=9999 ELSE TZ(K,J)=0
366 NEXT J
The "less than" above should be replaced by <.
The blog's goal is to solve problems.