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) |
|
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 |
|
) |
| |