read Bipartite:
N:=30:
K:=4:
for k from 1 to K do
for R from 1 to k do
print(`The first`, N, `terms of the enumerating sequence for`):
print(` n by n matrices with all the row-sums and column-sums equal to`, k):
print(`and the entries are non-negative integers <=`, R, `equals `):
print(SeqR(k,N,R)):
od:
od:

print(`The whole thing took`, time(), `seconds of CPU time `):

quit: