25 August    2023   2:19:51.352 PM      
 
asa159_test():
  FORTRAN77 version
  Test asa159().
 
TEST01
  RCONT2 constructs a random matrix with
  given row and column sums.
 
  The rowsum vector:
 
         1             3
         2             2
         3             2
         4             1
         5             1
 
  The columnsum vector:
 
         1             2
         2             2
         3             2
         4             2
         5             1
 
  The rowcolsum matrix:
 
  Col        1       2       3       4       5
  Row
 
    1        1       0       0       1       1
    2        0       1       1       0       0
    3        1       0       1       0       0
    4        0       0       0       1       0
    5        0       1       0       0       0
 
 
  The rowcolsum matrix:
 
  Col        1       2       3       4       5
  Row
 
    1        0       1       1       1       0
    2        0       0       1       1       0
    3        1       0       0       0       1
    4        0       1       0       0       0
    5        1       0       0       0       0
 
 
  The rowcolsum matrix:
 
  Col        1       2       3       4       5
  Row
 
    1        0       1       0       1       1
    2        0       0       1       1       0
    3        1       1       0       0       0
    4        1       0       0       0       0
    5        0       0       1       0       0
 
 
  The rowcolsum matrix:
 
  Col        1       2       3       4       5
  Row
 
    1        1       0       1       1       0
    2        1       1       0       0       0
    3        0       0       0       1       1
    4        0       0       1       0       0
    5        0       1       0       0       0
 
 
  The rowcolsum matrix:
 
  Col        1       2       3       4       5
  Row
 
    1        1       0       1       1       0
    2        0       1       0       1       0
    3        0       1       1       0       0
    4        1       0       0       0       0
    5        0       0       0       0       1
 
 
  The rowcolsum matrix:
 
  Col        1       2       3       4       5
  Row
 
    1        1       0       0       1       1
    2        0       0       2       0       0
    3        0       2       0       0       0
    4        1       0       0       0       0
    5        0       0       0       1       0
 
 
  The rowcolsum matrix:
 
  Col        1       2       3       4       5
  Row
 
    1        0       1       1       0       1
    2        0       0       1       1       0
    3        1       0       0       1       0
    4        0       1       0       0       0
    5        1       0       0       0       0
 
 
  The rowcolsum matrix:
 
  Col        1       2       3       4       5
  Row
 
    1        1       0       1       1       0
    2        1       1       0       0       0
    3        0       1       1       0       0
    4        0       0       0       0       1
    5        0       0       0       1       0
 
 
  The rowcolsum matrix:
 
  Col        1       2       3       4       5
  Row
 
    1        1       1       1       0       0
    2        1       1       0       0       0
    3        0       0       0       2       0
    4        0       0       1       0       0
    5        0       0       0       0       1
 
 
  The rowcolsum matrix:
 
  Col        1       2       3       4       5
  Row
 
    1        0       1       0       1       1
    2        0       1       1       0       0
    3        1       0       1       0       0
    4        0       0       0       1       0
    5        1       0       0       0       0
 
 
asa159_test():
  Normal end of execution.
 
25 August    2023   2:19:51.353 PM