From 1e54ca86aaa08136e0106164d89591a04003ca23 Mon Sep 17 00:00:00 2001
From: Landon Curt Noll <github-mail@asthe.com>
Date: Tue, 28 Feb 2023 23:15:08 -0800
Subject: [PATCH] remove banks.alt.c from 1998/banks

This file was not an alternate copy, but rather an
original version of the winning code that was
later bug fixed.
---
 1998/banks/Makefile    |  9 +++----
 1998/banks/README.md   |  6 -----
 1998/banks/banks.alt.c | 60 ------------------------------------------
 3 files changed, 3 insertions(+), 72 deletions(-)
 delete mode 100644 1998/banks/banks.alt.c

diff --git a/1998/banks/Makefile b/1998/banks/Makefile
index f015b6c08..b31d38cdb 100644
--- a/1998/banks/Makefile
+++ b/1998/banks/Makefile
@@ -179,10 +179,10 @@ PROG= ${ENTRY}
 #
 OBJ= ${PROG}.o
 DATA= bb.sc horizon.sc mountains.sc pittsburgh.sc pyramids.sc river.sc
-TARGET= ${PROG} ${PROG}.alt
+TARGET= ${PROG}
 #
-ALT_OBJ= ${PROG}.alt.o
-ALT_TARGET= ${PROG}.alt
+ALT_OBJ=
+ALT_TARGET=
 
 
 #################
@@ -199,9 +199,6 @@ all: data ${TARGET}
 ${PROG}: ${PROG}.c
 	${CC} ${CFLAGS} $< -o $@ ${LIBS}
 
-${PROG}.alt: ${PROG}.alt.c
-	${CC} ${CFLAGS} $< -o $@ ${LIBS}
-
 # alternative executable
 #
 alt: data ${ALT_TARGET}
diff --git a/1998/banks/README.md b/1998/banks/README.md
index abdbb2978..04cfe519a 100644
--- a/1998/banks/README.md
+++ b/1998/banks/README.md
@@ -26,12 +26,6 @@
     The provided Makefile should work; you will need an X-ish system, and
     a select() system call.  More on building in the author comments.
 
-    NOTE: On some systems the original entry did not correctly display
-    the altitude and airspeed.  These problems have been fixed.  One can
-    still build the original program by:
-
-	make banks.alt
-
 ## Author's comments
 
     You have just stepped out of the real world and into the
diff --git a/1998/banks/banks.alt.c b/1998/banks/banks.alt.c
deleted file mode 100644
index e51b14c3f..000000000
--- a/1998/banks/banks.alt.c
+++ /dev/null
@@ -1,60 +0,0 @@
-#include				     <math.h>
-#include				   <sys/time.h>
-#include				   <X11/Xlib.h>
-#include				  <X11/keysym.h>
-					  double L ,o ,P
-					 ,_=dt,T,Z,D=1,d,
-					 s[999],E,h= 8,I,
-					 J,K,w[999],M,m,O
-					,n[999],j=33e-3,i=
-					1E3,r,t, u,v ,W,S=
-					74.5,l=221,X=7.26,
-					a,B,A=32.2,c, F,H;
-					int N,q,C,y,p,U,*g
-				       ; Display*e; char f[
-				    52]; GC k; main( ){ Window    
- z=RootWindow(e=XOpenDisplay( 0),0); for (XSetForeground(e,k=XCreateGC (e,z,0,0),BlackPixel(e,0 ))
-; scanf("%lf%lf%lf",y +n,w+y, y+s)+1; y ++); XSelectInput(e,z= XCreateSimpleWindow(e,z,0,0,400,400,
-0,0,WhitePixel(e,0) ),KeyPressMask); for(XMapWindow(e,z); ; T=sin(O)){ struct timeval G={ 0,dt*1e6}
-; K= cos(j); N=1e4; M+= H*_; Z=D*K; F+=_*P; r=E*K; W=cos( O); m=K*W; H=K*T; O+=D*_*F/ K+d/K*E*_; B=
-sin(j); a=B*T*D-E*W; XClearWindow(e,z); t=T*E+ D*B*W; j+=d*_*D-_*F*E; P=W*E*B-T*D; for (o+=(I=D*W+E
-*T*B,E*d/K *B+v+B/K*F*D)*_; p<y; ){ T=p[s]+i; E=c-p[w]; D=n[p]-L; K=D*m-B*T-H*E; if(p [n]+w[ p]+p[s
-]==0|K <fabs(W=T*r-I*E +D*P)|fabs(D=t*D+Z *T-a*E)>K)N=1e4; else{ q=W/(9+K) *4E2+2e2; C= 2E2+4e2/( K
- +9)*D; N-1E4&&XDrawLine(e ,z,k,N ,U,q,C); N=q; U=C; } ++p; } L+=_*(X*t+P*M+m*l); T=X*X+ l*l+M *M; 
-  XDrawString(e,z,k ,20,380,f,17); D=v/l*15; i+=(B *l-M*r -X*Z)*_; for(; XPending(e); u *=CS!=N){
-				   XEvent z; XNextEvent(e ,&z);
-                                       ++*((N=XLookupKeysym
-					 (&z.xkey,0))-IT?
-					 N-LT? UP-N?& E:&
-					 J:& u: &h); --*(
-					 DN -N? N-DT ?N==
-					 RT?&u: & W:&h:&J
-					  ); } m=15*F/l;
-					  c+=(I=M/ l,l*H
-					  +I*M+a*X)*_; H
-					  =A*r+v*X-F*l+(
-					  E=.1+X*4.9/l,t
-					  =T*m/32-I*T/24
-					   )/S; K=F*M+(
-					   h* 1e4/l-(T+
-					   E*5*T*E)/3e2
-					   )/S-X*d-B*A;
-					   a=2.63 /l*d;
-					   X+=( d*l-T/S
-					    *(.19*E +a
-					    *.64+J/1e3
-					    )-M* v +A*
-					    Z)*_; l +=
-                                            K *_; W=d;
-					    sprintf(f,
-					    "%5.0f %4"
-					    "d %6.0f",
-					   l /1.7,( C =
-			      9E3+O*57.3)% 0550,i); d+=T*(.45-14/l*
-			     X-a*130-J* .14)*_/125e2+F*_*v; P=(T*(47
-			     *I-m* 52+E*94 *D-t*.38+u*.21*E) /1e2+W*
-			     179*v)/2312; select(p=0,g,g,g,&G); v-=(
-			      W*F-T*(.63*m-I*.086+m*E*19-D*25-.11*u
-			       )/107e2)*_; D=cos(o); E=sin(o); } }
-
-