Searched refs:rci_dim1 (Results 1 – 1 of 1) sorted by relevance
110 integer rci_dim1 = 0, rci_offset, i__1, i__2; in pitsyn_() local169 rci_dim1 = *order; in pitsyn_()170 rci_offset = rci_dim1 + 1; in pitsyn_()224 rci[j + i__ * rci_dim1] = rc[j]; in pitsyn_()267 rci[i__ + rci_dim1] = rco[i__ - 1]; in pitsyn_()268 rci[i__ + (rci_dim1 << 1)] = rco[i__ - 1]; in pitsyn_()425 rci[j + *nout * rci_dim1] = (xxy - 1) / (xxy + 1); in pitsyn_()