Go to the source code of this file.
|
subroutine | rectblk (nrows, ncols, marked, unmrkd, colstr, rowidx, colset, rowset, prevcl, tryrow, colmrk, rowmrk, nhrows, nhcols) |
|
◆ rectblk()
subroutine rectblk |
( |
integer | nrows, |
|
|
integer | ncols, |
|
|
integer | marked, |
|
|
integer | unmrkd, |
|
|
integer, dimension (nrows+1) | colstr, |
|
|
integer, dimension (*) | rowidx, |
|
|
integer, dimension (ncols) | colset, |
|
|
integer, dimension (nrows) | rowset, |
|
|
integer, dimension (ncols) | prevcl, |
|
|
integer, dimension (ncols) | tryrow, |
|
|
integer, dimension (ncols) | colmrk, |
|
|
integer, dimension (nrows) | rowmrk, |
|
|
integer | nhrows, |
|
|
integer | nhcols ) |