Script started on Tue Sep 15 16:11:59 1998
umbc7[1]% cat shapiro.c

#define P(X)j=write(1,X,1)
#define C 39
int M[5000]={2},*u=M,N[5000],R=22,a[4],l[]={0,-1,C-1,-1},m[]={1,-C,-1,C},*b=N,
*d=N,c,e,f,g,i,j,k,s;main(){for(M[i=C*R-1]=24;f|d>=b;){c=M[g=i];i=e;for(s=f=0;
s<4;s++)if((k=m[s]+g)>=0&&k<C*R&&l[s]!=k%C&&(!M[k]||!j&&c>=16!=M[k]>=16))a[f++
]=s;if(f){f=M[e=m[s=a[rand()/(1+2147483647/f)]]+g];j=j<f?f:j;f+=c&-16*!j;M[g]=
c|1<<s;M[*d++=e]=f|1<<(s+2)%4;}else e=d>b++?b[-1]:e;}P(" ");for(s=C;--s;P("_")
)P(" ");for(;P("\n"),R--;P("|"))for(e=C;e--;P("_ "+(*u++/8)%2))P("| "+(*u/4)%2
);}
umbc7[2]% cc shapiro.c
umbc7[3]% a.out
  _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _
|_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _   _ _ _ _ _ _ _ _  |
|  _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _  |_ _ _ _ _ _ _ _  | |
|_ _ _ _  |  _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _  |_ _ _ _ _ _ _ _ _ _| |
|  _ _ _ _|_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _  |_ _ _ _ _ _ _ _ _ _  | |
|_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _  |_ _ _ _ _ _ _ _ _ _  | | |
|  _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _  |_ _ _ _ _ _  |  _ _ _ _| | |
|_ _ _ _  |  _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _  |_ _ _ _ _ _ _ _|_ _ _ _  | | |
|  _ _ _ _|_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _  |_ _ _ _ _ _ _ _ _ _ _ _ _ _| | |
|_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _  |_ _ _ _ _ _ _ _ _ _ _ _ _ _  | | |
|  _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _  |_ _ _ _ _ _ _ _ _ _  |  _ _ _ _| | |
|_ _ _ _  |  _ _ _ _ _ _ _ _ _ _ _ _ _  |_ _ _ _ _ _ _ _ _ _ _ _|_ _ _ _  | | |
|  _ _ _ _|_ _ _ _ _ _ _ _ _ _ _ _ _  |_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _| | |
|_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _  |_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _  | | |
|  _ _ _ _ _ _ _ _ _ _ _ _ _ _ _  |_ _ _ _ _ _ _ _ _ _ _ _ _ _  |  _ _ _ _| | |
|_ _ _ _  |  _ _ _ _ _ _ _ _ _  |_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _|_ _ _ _  | | |
|  _ _ _ _|_ _ _ _ _ _ _ _ _  |_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _| | |
|_ _ _ _ _ _ _ _ _ _ _ _ _  |_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _  | | |
|  _ _ _ _ _ _ _ _ _ _ _  |_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _  |  _ _ _ _| | |
|_ _ _ _  |  _ _ _ _ _  |_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _|_ _ _ _  | | |
|  _ _ _ _|_ _ _ _ _  |_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _| | |
|  _ _ _ _ _ _ _ _  |_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _  |_  |
|_ _ _ _ _ _ _ _ _|_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _|_ _| |

umbc7[4]% exit

script done on Tue Sep 15 16:12:23 1998