Go to the source code of this file.
|
subroutine | mmc13e (nrows, ncols, nhcols, nhrows, nscols, sqindx, hrzcmp, rowstr, colind, colset, trycol, cbegin, lowlnk, prev, colmrk, ccmstr, rcmstr, cnto, rnto, sqcmpn) |
|
◆ mmc13e()
subroutine mmc13e |
( |
integer | nrows, |
|
|
integer | ncols, |
|
|
integer | nhcols, |
|
|
integer | nhrows, |
|
|
integer | nscols, |
|
|
integer | sqindx, |
|
|
integer | hrzcmp, |
|
|
integer, dimension (nrows+1) | rowstr, |
|
|
integer, dimension (*) | colind, |
|
|
integer, dimension (ncols) | colset, |
|
|
integer, dimension (nrows) | trycol, |
|
|
integer, dimension (nscols) | cbegin, |
|
|
integer, dimension (ncols) | lowlnk, |
|
|
integer, dimension (ncols) | prev, |
|
|
integer, dimension (ncols) | colmrk, |
|
|
integer, dimension (*) | ccmstr, |
|
|
integer, dimension (*) | rcmstr, |
|
|
integer, dimension (ncols) | cnto, |
|
|
integer, dimension (nrows) | rnto, |
|
|
integer | sqcmpn ) |