read `Hardin.txt`:

K:=5:

for B from 2 to 5 do

print(`The first`, K,  ` terms of the sequence the number of`, 2*B,  ` by 2*n balaced 0-1 matrices for n=1 to`, n=K, ` are `):

lprint(SeqB(B,K));

od:


print(`This took`, time(), `seconds. `):

quit: